次のボタンスクリプトは現在のフィールドの内容を切り取り、その次のフィールドに貼り付けます。
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Call uidoc.SelectAll
Call uidoc.Cut
Call uidoc.GotoNextField
Call uidoc.Paste
End Sub