LOTUSSCRIPT /COM/OLE のクラス

例:CaretCategory プロパティ
次のビューアクションは、現在の文書に対応するカテゴリを表示します。

Sub Click(Source As Button)
 Dim workspace As New NotesUIWorkspace
 Dim view As NotesUIView
 Dim category As Variant
 Set view = workspace.CurrentView
 category = view.CaretCategory
 Messagebox category
End Sub

関連項目