双击列表框以在特定记录上打开另一个表单

Question

我已经在列表框中设置了DblClick功能，这样当双击一行时，它将打开另一个表单（带有自己的列表框），对点击的行中的特定记录进行过滤。

但是，我得到了

  

运行时错误＆＃39; 3075＆＃39;：查询表达式中的语法错误（缺少运算符）＆＃39; [fieldname] =＆＃39;。

（其中字段名称是要过滤的绑定列）。

这是我的dblclick代码：

Private Sub ListBoxname_DblClick(Cancel As Integer)
Dim RecordId As Integer
DoCmd.OpenForm "newformname", acNormal, , "[fieldname] = " & Me.ListBoxname.Column(2)
Forms("newformname").Requery
End Sub

我还设置了新的表单属性（数据选项卡），以便在字段名称上过滤为fieldname =

我做错了什么？

Answer 1

显然Me.ListBoxname.Column(2)返回NULL。

如果您的密钥位于第二个列中，则需要使用Me.ListBoxname.Column(1)，因为列列表从零开始。

https://msdn.microsoft.com/en-us/vba/access-vba/articles/listbox-column-property-access

注意：打开后不需要Forms("newformname").Requery。