LOTUSSCRIPT /COM/OLE のクラス

例:QueryEntryResize イベント
次の QueryEntryResize イベントは、ユーザーが [カレンダー] ビューのエントリの開始時刻と終了時刻を承認すると、サイズ変更操作を続行します。

(Globals) (Declarations)
%INCLUDE "lsconst.lss"

Sub Queryentryresize(Source As Notesuiview, _
Continue As Variant)
 If Messagebox (Source.CalendarDateTime & Chr(13) & _
 Source.CalendarDateTimeEnd, _
 MB_YESNO + MB_ICONQUESTION, _
 "Are these start and end times OK?")= IDYES Then
   Continue = True
 Else
   Continue = False
 End If
End Sub

関連項目