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