在 Access VBA 中声明和设置表单变量

Question

看起来很简单，但我似乎找不到正确的语法。我希望在 Access 2013 应用程序中为未打开的表单创建一个表单变量，以便我可以将表单对象传递给一系列方法，而不是传递表单的单独属性。

这是我一直在尝试的，但遇到运行时错误“2465”“Microsoft Access 找不到表达式中引用的字段“frmSuppliers”。

Private Sub cmdSuppliers_Click()
    Dim frm As Form
    Set frm = Form("frmSuppliers")

    Debug.Print frm.Name

Answer 1

Private Sub cmdSuppliers_Click()
    Dim frm As Form
    Set frm = Forms("frmSuppliers")

    Debug.Print frm.Name

您引用了 Forms 集合，但将其设为单数而不是复数。