如何判断一个窗体是否正在加载

Question

Private Function FormExists(ByRef FName As String) As Boolean
    Dim lngIndex As Long
    
    For lngIndex = 0 To Forms.Count - 1
        If Forms(lngIndex).Name = FName Then
            FormExists = True
            Exit For
        End If
    Next
End Function

Answer 1

我是要判断窗体是否正在加载，不是要判断是否有这个窗体。