vba - 将 Access 表单中的 DefaultValue 设置为表的最后一条记录
问题描述
我有一个带有名为 Box1 的文本框的 Access 表单。
在此文本框中,我希望将表Products中最后一个产品的名称作为默认值。
我的表产品具有以下字段:P_ID和P_Name。
我在 VBA 中以如下形式编码:
Me!Box1.DefaultValue = DLookup("P_Name", "Products", "P_ID = DMax("P_ID", "Products")")
但是,我的代码中有一个错误,因为文本框显示#Name。
解决方案
DefaultValue属性是一个字符串,因此需要引号:
Me!Box1.DefaultValue = "'" & DLookup("P_Name", "Products", "P_ID = " & DMax("P_ID", "Products") & "") & "'"
推荐阅读
- antlr - Reorder token stream in XText lexer
- unity3d - Unity 错误总是发生,无论如何
- php - 数据表在移动设备上删除行
- javascript - 使用函数将 nuxt edge 部署到 firebase 时出错
- swift - 为什么 Swift 不能自动将泛型类型参数转换为其超类?
- regex - 谷歌标签管理器 | 解析 URL - 有或没有正则表达式
- javascript - 窗口调整大小时重置 JQuery 函数
- typescript - 从 Android WebView 调用 Angular 5 函数
- r - R - 在饼图中显示 NA 计数
- launch - 如何在 Cobalt master 16 上启动本地 url