LOTUSSCRIPT /COM/OLE のクラス

例:OnIntervalChange イベント
次の OnIntervalChange イベントは、現在の埋め込みスケジューラの間隔を表示します。

Sub Onintervalchange(Source As Notesuischeduler)
 Dim uisdr As NotesDateRange
 Set uisdr = Source.Interval
 Messagebox uisdr.StartDateTime.LocalTime + _
 " to " + uisdr.EndDateTime.LocalTime,, _
 "Interval"
End Sub

関連項目