如何获取表单的最后一个记录ID?

der*_*rek 1 access-vba

我目前有一个访问表单.

我想要做的是获取最后一条记录的值.

例如,如果我有10条记录,我想得到值"10",因为这是添加的最后一条记录的id.我试图使用函数last id inserted()运行查询,但它不起作用.

这是我正在使用的代码:

Dim lastID As Integer
Query = "select last_insert_id()"
lastID = Query
MsgBox (lastID)
Run Code Online (Sandbox Code Playgroud)

我错过了什么?

Sea*_*anC 7

有一个功能可以获得DMax最高的数字.

Dim lastID As Integer
lastID = DMax("IDField","YourTable")
' or = DMax("IDField","YourTable","WhenField=Value")
MsgBox lastID
Run Code Online (Sandbox Code Playgroud)

其他域功能是:

  • DAVG
  • DCOUNT
  • DFirst
  • DLast
  • 使用DLookup
  • DMIN
  • DSTDEV
  • DSTDEVP
  • DSUM
  • DVAR
  • DVARP

请查看友好F1密钥以获取更多信息