例: Close method (NotesUIView - LotusScript®)

次のビューアクションは、現在のビューを閉じます。

Sub Click(Source As Button)
  Dim ws As New NotesUIWorkspace
  Dim uiview As NotesUIView
  Set uiview = ws.CurrentView
  Call uiview.Close
End Sub