LOTUSSCRIPT/COM/OLE CLASSES
Sub Click(Source As Button) Dim ws As New NotesUIWorkspace Dim uiview As NotesUIView Set uiview = ws.CurrentView Call uiview.DeselectAll End Sub
See Also