Question

我想在Access数据库中添加一条新记录，但它给了我这个错误：

'System.Data.dataRow.Protected Friend Sub New（builder As System.DataRowBuilder）'在此上下文中无法访问，因为它是“受保护的朋友”。

在dsNewRow中 - 在线«Dim dsNewRow As New DataRow»

Dim ds As New DataSet'HOLDS DataSet OBJECT Dim da As OleDb.OleDbDataAdapter'HOLDS a DataAdapter OBJECT

Private Sub Button_Add_Click（sender As System.Object，e As System.EventArgs）处理Button_Add.Click

    Dim cb As New OleDb.OleDbCommandBuilder(da)

    Dim dsNewRow As New DataRow

    dsNewRow = ds.Tables("Ensaios").NewRow()

    dsNewRow.Item("Nº Ensaio") = N_de_Ensaio.Text

    ds.Tables("Nº Ensaio").Rows.Add(dsNewRow)

    da.Update(ds, "Nº Ensaio")

    MsgBox("Acrescentado um novo Registo à Base de Dados")

End Sub

Answer 1

我确定之前我已经在某处看过这个...尝试从DataRow中删除New。

我没有亲自调查过这个，但我确实遇到了一段时间了！

H个鸡

Private Sub Button_Add_Click(sender As System.Object, e As System.EventArgs) Handles Button_Add.Click
Dim cb As New OleDb.OleDbCommandBuilder(da)

'Dim dsNewRow As New DataRow
Dim dsNewRow As DataRow

dsNewRow = ds.Tables("Ensaios").NewRow()

dsNewRow.Item("Nº Ensaio") = N_de_Ensaio.Text

ds.Tables("Nº Ensaio").Rows.Add(dsNewRow)

da.Update(ds, "Nº Ensaio")

MsgBox("Acrescentado um novo Registo à Base de Dados")

End Sub

将新记录追加到Access数据库 - VB.NET和ADO.NET

1 个答案: