当站点窗口视图更改之后发生。
Private Sub application__OnAfterWebWindowViewChange(ByVal pWebWindow As WebWindow)
application 在类模块中以事件方式声明的 Application 类型的对象。
pWebWindow WebWindowEx 对象,其中视图已更改。
下列示例在每次视图更改时向用户显示新视图类型的名称。
Private Sub objApp_OnAfterWebWindowViewChange(ByVal pWebWindow As WebWindow)
'Occurs after the Web window view changes
'Display message to user
MsgBox "The view has changed to " & pWebWindow.ViewModeEx & " mode."
End Sub