显示可以在MySQL中访问表的用户列表

Question

我想在VB应用程序中显示访问表(MySQL)的用户列表。我想把这个放在一个列表盒里。

        MysqlConn = New MySqlConnection()
        MysqlConn.ConnectionString = "server=" & serverTB.Text & ";" & "user id=" & userTB.Text & ";" & _
            "password=" & pwdTB.Text & ";" & "database=" & databaseTB.Text
        MysqlConn.Open()

        Dim cmd As New MySqlCommand()
        Dim conn As New MySqlConnection(MysqlConn.ConnectionString)

        conn.Open()
        cmd.Connection = conn

        cmd.CommandText = "SELECT USER FROM users"

        Dim list = cmd.ExecuteReader()
        For Each user In list
            userListCBX.Items.Add(user)
        Next

我在“字段列表”中得到了未知列'USER‘，。我想让用户从数据库测试，表用户。

Answer 1

在从当前记录中获取信息之后，您需要调用Read()将读取器移动到下一条记录：

Dim reader = cmd.ExecuteReader()
While reader.Read()
    serListCBX.Items.Add(reader(0))
End While 

参见SqlCommand.ExecuteReader在MSDN中的示例用法。