返回或设置 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