顯示可以訪問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 

請參見MSDN中SqlCommand.ExecuteReader用法示例。