LOTUSSCRIPT /COM/OLE のクラス

例:Ruler プロパティ
次の 2 つのスクリプトは関連して機能します。最初のスクリプトは、ユーザーが挿入点を特定のフィールドに置くとルーラーを表示します。2 番目のスクリプトは、ユーザーが挿入点をそのフィールドから移動するとルーラーを非表示にします。

Sub Entering(Source As Field)
 Dim workspace As New NotesUIWorkspace
 Dim uidoc As NotesUIDocument
 Set uidoc = workspace.CurrentDocument
 uidoc.Ruler = True
End Sub

Sub Exiting(Source As Field)
 Dim workspace As New NotesUIWorkspace
 Dim uidoc As NotesUIDocument
 Set uidoc = workspace.CurrentDocument
 uidoc.Ruler = False
End Sub

関連項目