LOTUSSCRIPT /COM/OLE のクラス

例:OnBlur イベント
次に示すのは、フォームの [Subject] フィールドに対する OnBlur イベントです。このイベントでは、ユーザーが値の入力を求められます。

Sub Onblur(Source As Field)
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = ws.CurrentDocument
If uidoc.FieldGetText("Subject") = "" Then
uidoc.GotoField("Subject")
Print "Subject cannot be blank"
Else
Print "Subject:""" & uidoc.FieldGetText("Subject") & """"
End If
End Sub

関連項目