从MS Access中的表中获取“自动编号”字段值

时间:2020-07-23 17:47:47

标签: ms-access

如何从MS Access中的表中获取“自动编号”列值。我需要将该值存储在另一个表中。 例如,

Table1:    Table2:
Id value    CId    City
1   aaa     1      abc
2   bbb           
表1中的

Id是自动编号的,其中表2中的CId不是自动编号,请注意,表1中的所有值不是都存在于表2中。我正在创建一个表格来在各个表中存储城市的价值。如何获取自动编号值,以便可以将其作为CId存储在表2中。 因此,如果输入新值,则需要Id 3,我需要将Id 3存储在Table2中

此外,我不能使用“表单向导”选项,因为我不希望表中的所有记录都可见。我只需要一个空白表格来保存新数据。 请帮助我。谢谢

1 个答案:

答案 0 :(得分:1)

我已使用“未绑定”文本框Text1来运行以下代码。

Private Sub cmdSQLRun_Click()
Dim MyAutoNumber As Long

    CurrentDb.Execute "INSERT INTO Table1(MyValue) VALUES('" & Me.Text1 & "')"
    'MyValue is value field of your example.
    MyAutoNumber = DMax("ID", "Table1")
    CurrentDb.Execute "INSERT INTO Table2(CID) VALUES(" & MyAutoNumber & ")"
    'CID is table2 field name.
End Sub