例: EditMode property

次のボタンスクリプトは現在の文書を編集モードにします。

Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Set uidoc = workspace.CurrentDocument
  uidoc.EditMode = True
End Sub