Vb.net 使用dataset在msaccess中插入新记录

我正在尝试将一条新记录插入msaccess2003 mdb文件我的版本是VB.net 2005，它没有显示任何错误，而且当我打开我的access db文件时，没有插入任何记录，以及如何格式化它给我带来错误的日期字段，如何将txtdate.text转换为与ms acess兼容的日期

这是密码

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    Dim ds As New DataSet
    Dim db As New ClassDB

    ds = db.FetchData("ricemill.mdb", "sales")


    Dim anyRow As DataRow = ds.Tables(0).NewRow
    Dim mydate As DateTime
    Dim cmydate As String

    cmydate = txtdate.Text
    mydate = DateTime.Parse(mydate)


    anyRow("description") = txtdesc.Text
    anyRow("date") = DateTime.Parse(txtdate.Text)
    anyRow("amount") = txtamount.Text



    ds.Tables(0).Rows.Add(anyRow)
    ds.Tables(0).AcceptChanges()
    ds.AcceptChanges()

    MsgBox("Record Added ! ")

End Sub

---

好吧，我可以给你一个开始的提示（即使这是一个旧线程），如果我在一个月前开始我的项目时偶然发现了这个问题，我会发现它是有用的

这里所做的是虚拟地创建一个新行，并将其添加到虚拟数据库（数据集）中

接受更改方法只更改行与数据集的关系，它将提交更改，以便数据集将该行视为新创建的行，而不是常规行。

这里需要的是打开连接，在dataAdapter上使用Update命令，这样它（DA）将查看数据集中的所有更改，并将它们提交到实际的数据库

我花了一段时间才让它工作起来，大部分时间是在测试和出错，阅读大量的博客/互联网信息

从这里开始，一旦你理解了DA，你将非常接近你的答案