Examples: Clear method (NotesUIDocument - LotusScript®)
This script deletes the contents of the current field. If the current field is empty, it does nothing.
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
If ( uidoc.FieldGetText( uidoc.CurrentField ) <> "" ) Then
Call uidoc.SelectAll
Call uidoc.Clear
End If
End Sub