例: GotoTop method

次のボタンスクリプトはユーザーに位置の入力を求めます。スクリプトは、入力された文字列を現在の文書の最初の編集可能フィールドに挿入します。

Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Dim location As String
  Set uidoc = workspace.CurrentDocument
  location = Inputbox$ _
  ( "Please enter your location", "Location" )
  Call uidoc.GotoTop
  Call uidoc.InsertText( location )
End Subf