例: CurrentView property (NotesUIWorkspace - LotusScript)

次のスクリプトは、現在のビューの名前を表示します。

Dim workspace As New NotesUIWorkspace
Dim view As NotesUIView
Set view = workspace.CurrentView
Messagebox view.ViewName