我想给dataset添加多条记录后，再一次将这几条添加的记录更新到数据库，如何实现啊？

　

ds.update()

不好意思，问题没说清楚
首先是如何给dataset新增多条记录？我只能增加一条，再增加就覆盖掉原先增加的那一条了～～

'你把DATASET声名为公用的。就行了。每次增加一行的时候都添加在这个公用的DATASET，就不会覆盖了。

你每一回增加的时候只要再定义一个新的数据datarow 就不会覆盖掉原来的了，可以一次加很多个 然后 update

还是不行啊~~~dataset11是公用的 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim mydtb As New DataTable Dim mydrow As DataRow ' SqlDataAdapter1.Fill(DataSet11, "moneyDistr") mydrow = DataSet11.Tables("moneyDistr").NewRow() mydrow("pid") = TextBox1.Text mydrow("wid") = ListBox1.Selectedvalue mydrow("dkrq") = TextBox2.Text mydrow("wdk") = txtmd.Text DataSet11.Tables("moneyDistr").Rows.Add(mydrow) DataSet11.AcceptChanges() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click If DataSet11.HasChanges Then SqlDataAdapter1.Update(DataSet11, "moneyDistr") End If End Sub button2是对dataset11提交添加的记录，button3是更新数据库

可以定义一个..公用变量.然后在主界面里面引用一下.到时再用别名.就可以了吧`

这样当然不行了，你要把  DataSet11.AcceptChanges()
 去掉或都放在 SqlDataAdapter1.Update(DataSet11, "moneyDistr") 的下面
如：
    Dim mydtb As New DataTable
        Dim mydrow As DataRow
' SqlDataAdapter1.Fill(DataSet11, "moneyDistr")
mydrow = DataSet11.Tables("moneyDistr").NewRow()
         mydrow("pid") = TextBox1.Text
        mydrow("wid") = ListBox1.Selectedvalue
        mydrow("dkrq") = TextBox2.Text
        mydrow("wdk") = txtmd.Text
        DataSet11.Tables("moneyDistr").Rows.Add(mydrow)
           
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        If DataSet11.HasChanges Then
        SqlDataAdapter1.Update(DataSet11, "moneyDistr")
        DataSet11.AcceptChanges()

        End If
      
End Sub