例: OnChange event

次に示すのは、フォームの [Subject] フィールドに対する OnChange イベントです。このイベントは、[Subject] フィールドの値を [SubjectDisplay] フィールドに書き込みます。

Sub Onchange(Source As Field)
  Dim ws As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Set uidoc = ws.CurrentDocument
  Call uidoc.FieldSetText("SubjectDisplay", _
  uidoc.FieldGetText("Subject"))
End Sub