如何使用以自动编号开头的 VB.Net 在 Access 数据库中创建行条目？答案

【问题标题】：How to create a row entry in an Access database using VB.Net that begins with an Autonumber?如何使用以自动编号开头的 VB.Net 在 Access 数据库中创建行条目？
【发布时间】：2019-08-01 20:44:03
【问题描述】：

我正在尝试在 VB.net 中创建一个 ATM 解决方案，当点击提款时更正他们的余额，并在交易历史数据库中创建一行。它当前写入交易历史数据库，但仅在我删除第一列“TransNo”时出现。但是，如果没有交易号，它就会崩溃。下面概述的是我的 Access 数据库和 VB.net 编写行条目的公共函数。我相信我需要在“dateoftrans”上方添加一行写自动编号的行，但我找不到任何解决方案。任何帮助将不胜感激。

https://i.stack.imgur.com/11Nzc.png

https://i.stack.imgur.com/Xvsx5.png

任何帮助将不胜感激。

【问题讨论】：

请注意。不要发布代码的图像。代码由文本组成，作为文本，我们可以复制和测试它。图像对代码毫无用处。表格结构也可以很容易地用文本编写

标签： vb.net visual-studio ms-access vba

【解决方案1】：

任何插入对你有用吗？

而且“崩溃”是一个糟糕的措辞。您收到的错误信息是什么？

这段代码对我来说很好用：

    Dim MyReader As New OleDb.OleDbDataAdapter("SELECT * from tblHotels2", _
                                               "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Test2\test44.accdb")

    Dim cmdUpate As New OleDbCommandBuilder(MyReader)

    Dim rst As New DataTable()
    MyReader.Fill(rst)
    With rst.Rows.Add()
        .Item("HotelName") = "My Company"
    End With

    MyReader.Update(rst)

【讨论】：