InvalidArgument =值'11209485'对于'索引'无效。 参数名称：在VB.NET中运行SQL查询时出现索引错误

Question

当我尝试从数据库中检索卡号并将其放在组合框中时，我不断收到此错误“无法通信InvalidArgument =值'11209485'对于'index'无效。参数名称：index”用户可以在VB.NET 2012中选择其卡号。11209485是数据库中的第一个卡号，因此我认为连接正常，但我根本不理解此错误。

谢谢您对此事的帮助。 谢谢！

导入MySql.Data

导入MySql.Data.MySqlClient

公开课表格1

Dim dbCon As MySqlConnection
Dim strQuery As String = ""
Dim SQLcmd As MySqlCommand
Dim DataReader As MySqlDataReader

' load application Form
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

    'Prepare connection and query
    Try
        dbCon = New MySqlConnection("Server=localhost;Database=***;Uid=***;Pwd=***")

        strQuery = "SELECT CardNumber " &
                   "FROM Account"

        SQLcmd = New MySqlCommand(strQuery, dbCon)

        'Open the connection
        dbCon.Open()

        ' create database reader to read information from database
        DataReader = SQLcmd.ExecuteReader

        ' fill ComboBox with account numbers
        While DataReader.Read
            cboAccountNumbers = cboAccountNumbers.Items(DataReader("CardNumber"))
        End While

        'Close the connection
        DataReader.Close()
        dbCon.Close()

    Catch ex As Exception

        MsgBox("Failure to communicate" & vbCrLf & vbCrLf & ex.Message)


    End Try
End Sub

末级

Answer 1

错误在这一行：

cboAccountNumbers = cboAccountNumbers.Items(DataReader("CardNumber"))

您正在尝试阅读组合框中的第11209485个项目，但没有很多项目。 尝试以下方法：

cboAccountNumbers.Items.Add(DataReader("CardNumber"))