返回或设置 PageWindowEx 或 WebWindowEx 对象的可见状态。PageWindowEx 对象的可见状态是只读 Boolean 类型。WebWindowEx 对象的可见状态是可读写 Boolean 类型。
expression.Visible
expression 必选。返回“应用于”列表中的对象之一的表达式。
在以下示例中,GetVisibleState 过程从 CheckIfVisible 函数返回第一个 PageWindowEx 对象的可见状态。
Private Sub GetVisibleState()
    Dim myIsVisible As Boolean
    myIsVisible = CheckIfVisible
End Sub
Function CheckIfVisible() As Boolean
    Dim myPage As PageWindowEx
    Dim myVisibleState As Boolean
    Set myPage = Application.Webs(0).WebWindows(0).PageWindows(0)
    myVisibleState = myPage.Visible
    CheckIfVisible = myVisibleState
End Function
本示例将 WebWindowEx 对象的可见状态设置为无窗口状态。
Private Sub OpenInNoWindow()
    Dim myWebWindow As WebWindowEx
    Set myWebWindow = Webs(0).WebWindows(0)
    myWebWindow.Visible = False
End Sub