例: Copy method

次のボタンスクリプトは [Description] フィールドの内容をクリップボードにコピーします。

Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Set uidoc = workspace.CurrentDocument
  Call uidoc.GoToField( "Description" )
  Call uidoc.SelectAll
  Call uidoc.Copy
End Sub