Visible 属性

       

返回或设置 PageWindowExWebWindowEx 对象的可见状态。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