ms-access - 使用 VB 访问 OpenForm 时出现问题

Question

我有一个库存表格。我想创建一个更新按钮，单击该按钮将打开一个新表单 frm_add-remove，其中仅包含选定的库存项目，并允许您编辑库存数量。我在下面列出了点击事件，但它不起作用：

Private Sub A_Click()
Dim var As Variant
var = Forms![frm_Inventory]![ItemID]
DoCmd.OpenForm(frm_add-remove, , , "ItemID = " & var, , , )
End Sub

并得到一个编译错误，预期：表达式。ItemID 是 frm_Inventory 表以及 frm_add-remove 表中的一列。

我尝试使用和不使用尾随逗号。我有语法错误吗？我认为您可以与 + 或 & 连接？

Answer 1

尝试：

DoCmd.OpenForm("frm_add-remove", , , "ItemID = '" & var & "'", , , )

我做了两件事。

1. 加上frm_add-remove引号，这样它就可以作为字符串而不是变量名正确传递。
2. var如果它也是一个字符串，请加上引号。

Answer 2

表单名称必须是字符串。在它周围添加缺少的引号。

DoCmd.OpenForm("frm_add-remove", , , "ItemID = " & var )

最后一个非空参数之后的任何内容都是不必要的（因此要删除:)