WindowSelectionChange Event Example

This example applies bold formatting to the new selection.

Private Sub App_WindowSelectionChange _
        (ByVal Sel As Selection)
    Sel.Font.Bold = True
End Sub