例: FindString method

次のスクリプトは、ユーザー定義の文字列を現在の UI 文書中で検索します。

Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Set uidoc = workspace.CurrentDocument
  Call uidoc.FindString(Inputbox$( _
  "Word or phrase to look for:"))
End Sub