【问题标题】:Access 2007: Append data to memo field using a command buttonAccess 2007:使用命令按钮将数据附加到备注字段
【发布时间】:2013-07-02 02:00:20
【问题描述】:
我有一个基于“Issues.accdb”模板的数据库,我想修改其中一个表单。
在“问题详细信息”表单中,有一个打开的文本框,用于在保存记录时将数据附加到备忘录“评论”字段。此 cmets 字段的历史记录显示在下方的锁定文本框中。
我想更改表单的行为,以便用户在表单上打开的文本字段中输入新注释,而不是单击命令按钮并打开一个输入框;然后将评论输入到这里。
我还想输入验证,这样就没有人可以输入空白评论了。
【问题讨论】:
标签:
vba
ms-access
ms-access-2007
【解决方案1】:
我能想到的最快的方法是将你已经拥有的东西装配到你要求的东西上:
由于您已经有一个用于插入的绑定备注字段,只需将其设为不可见即可。在命令按钮的 onClick 事件中,您只需使用 InputBox 填充该备忘录字段,其中包含类似
dim cmt as String
cmt = InputBox("Please provide a comment.")
if cmt = "" then
msgbox("Comments cannot be empty")
else
me.myBoundMemofield = cmt
docmd.save