LOTUSSCRIPT /COM/OLE のクラス

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

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

関連項目