如何使用access vba获取所有列表框项名称

Question

我在访问中有一个列表框，试图获取变量中的列表框项目，并使用表列名称对这些项目进行comapre，即如果缺少任何列表框项目，则检查所有列表框项目。我如何获得列表框名称。

Answer 1

Controls.Item(index).ControlType属性将返回表单上的控件类型。您可以浏览Form.Controls集合，查找acListBox。 Control.Name将返回控件名称。例如：

'placed this code into a form's module
dim i as long
dim c as control

For i = 0 to Me.Controls.count - 1
    set c = Me.Controls.Item(i)
    If c.ControlType = acListBox Then
        debug.print c.Name
    End if        
Next i