如何判断窗体 FORMNAME1是否存在于当前数据库？

sunredday

如何判断窗体  FORMNAME1是否存在于当前数据库？无论是否打开。

AlexLiu

用DOCMD.OPENFORM能打开－》有，不能打开－》没有

sunredday

我想知道当前程序里是否有窗体 FORMNAME1， 如何判断呢？多谢

Trynew

用以下自定已函数：
Public Function isForm(frmName As String) As Boolean
    On Error GoTo isForm_Err
    frmName = CurrentProject.AllForms(frmName).Name
    isForm = True
    Exit Function
isForm_Err:
    isForm = False
End Function

sunredday

allforms 没有NAME 属性。 谢谢。根据您们二位的帮助，我想利用错误判断是解决这个问题的方法。多谢。