怎样知道一个窗口是否已经被load

Question

同上

Answer 1

在窗体中添加一个Public的标志变量
如
public isLoad as Boolean
在Form_Load中赋值
 isLoad = True
在Form_Unload赋值
 isLoad = False
通过访问该变量得知其是否已经Load
如 Form1.isLoad

Answer 2

Private Function IsFormLoaded(sFormName As String) As Boolean
Dim I As IntegerIsFormLoaded = FalseFor I = 0 To Forms.Count - 1
    If Forms(I).Name = sFormName Then
        IsFormLoaded = True
        Exit Function
    End If
Next I
End Function
用用看