vba - 如何获取表单的最后一条记录ID?

标签 vba ms-access

我目前有一个表单正在 Access 中。

我想做的是获取最后添加的记录的值。

例如,如果我有 10 条记录,我想获取值“10”,因为这是添加的最后一条记录的 ID。我正在尝试使用 last id inserted() 函数运行查询,但它不起作用。

这是我正在使用的代码:

Dim lastID As Integer
Query = "select last_insert_id()"
lastID = Query
MsgBox (lastID)

我错过了什么?

最佳答案

有一个函数 DMax 可以获取最大的数字。

Dim lastID As Integer
lastID = DMax("IDField","YourTable")
' or = DMax("IDField","YourTable","WhenField=Value")
MsgBox lastID

其他域函数是:

  • 每日平均收入
  • 计数
  • 最后
  • DL查找
  • DM
  • DStDev
  • DStDevP
  • DSum
  • 数据变量
  • DVarP

使用您友好的 F1 键查看更多信息

关于vba - 如何获取表单的最后一条记录ID?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/13587638/

相关文章:

excel - 将线程 ID 传递给 SetWindowsHookEx

sql - Access 2010 限制查询结果

database - “列 'CustID' 不允许为空。”尝试写入 Access 数据库 VB.net 时出错

java - Solr DIH 无效的获取大小

mysql - 决定数据库需求

excel - 工作簿上的默认工作表打开

vba - Mac VBA | Excel/Powerpoint 2016(版本 15.33)| Shapes.AddTextBox 方法上的 Powerpoint 崩溃

excel - 接收运行时错误 58 文件已存在但不存在

vba - 是否可以获得作为过滤器结果的列的最常见值(字符串)? VBA

ms-access - ms Access编译错误: user-defined type not defined