Visual Basic 6表单

Question

我怎么知道表格(我正在处理的表格除外)是开放还是关闭？

Answer 1

你必须区分Loaded和Visible.

• 对于visiblility,只需检查Visible属性(注意对卸载的表单执行此操作将导致它被加载).

• 对于装载状态,遗憾的是没有财产.您必须遍历所有表单,并查看您的表单是否包含在已加载表单的列表中:

  Public Function IsFormLoaded(FormToCheck As Form) As Boolean
    Dim F As Form 
    For Each F In Forms
      If F Is FormToCheck Then
        IsFormLoaded = True
        Exit Sub
      End If
    Next
  End Sub
  

全局集合Forms包含所有当前加载的表单.