OnPageWindowActivate Event

Occurs when the page in the current window obtains focus.

expression   The variable name of an object of type Application declared with events in a class module.

pPage   The PageWindowEx object that contains the view.

Example

The following example prompts the user to refresh the page each time the page window obtains focus.

Private Sub objApp_OnPageWindowActivate(ByVal pPage As PageWindow)
'Occurs when current page in the main window obtains focus.
'Prompts the user to refresh the current page.

     Dim strAns As String
     strAns = MsgBox("Do you want to refresh the page " & pPage.Caption & "?", _
                      vbYesNo)
     If strAns = vbYes Then
         pPage.Refresh
     End If

End Sub