フィールドの値を入力(セット)する

以下は、開いている文書において、指定フィールドの値を変更します。
「test」フィールドに「テスト」と入力します。

対象フィールド名：test

Sub Click(Source As Button)
 Dim workspace As New NotesUIWorkspace
 Dim uidoc As NotesUIDocument
 Dim doc As NotesDocument
 Set uidoc = workspace.CurrentDocument
 Set doc = uidoc.Document
 doc.test = "テスト"
End Sub

以上

フィールドの値を取得(ゲット)する

開いている文書の値を取得し、メッセージボックスに表示します。

取得フィールド名：test

Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Dim doc As NotesDocument
  Set uidoc = workspace.CurrentDocument
  Set doc = uidoc.Document
  Msgbox doc.test(0)
End Sub

以上