コードの行内でこのエラーが発生し続け、修正できないようです。
これが私のコードです:
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