2

我在我的代码行中不断出现这个错误,我似乎无法修复它。

这是我的代码:

con.Open()
    Dim dt As DataTable
    Dim ds As DataSet
    ds.Tables.Add(dt)
    Dim da As OleDbDataAdapter

    da = New OleDbDataAdapter("Select From * product info", con)
    da.Fill(dt)

    Dim newRow As DataRow = dt.NewRow
    With newRow
        .Item("Product Name:") = txtItemName.Text
        .Item("Description") = txtDescription.Text
        .Item("Quantity:") = txtItemCount.Text
        .Item("Type:") = cmbItemType.Text
        .Item("Date Received:") = txtDate.Text
        .Item("Barcode:") = txtBarcode.Text
        .Item("Price:") = txtPrice.Text
    End With

    dt.Rows.Add(newRow)
    Dim cb As OleDbCommandBuilder(da)
    da.Update(dt)
    con.Close()

在这一Dim cb As OleDbCommandBuilder(da)行中,我得到了错误da

4

1 回答 1

4

您混合了变量cb的初始化和声明。
要使用的正确语法是

Dim cb As OleDbCommandBuilder = new OleDbCommandBuilder(da)

或者

Dim cb As OleDbCommandBuilder      'declaration
cb = new OleDbCommandBuilder(da)   'initialization

或(如下康拉德所解释)

Dim cb As New OleDbCommandBuilder(da)
于 2012-11-18T13:43:23.807 回答