LOTUSSCRIPT /COM/OLE のクラス

例:DialogBoxCanceled プロパティ
次のスクリプトは DialogBoxCanceled プロパティをテストし、続いてダイアログをキャンセルしたいかどうかをユーザーに確認するプロンプトを表示します。NotesUIWorkspace クラスの DialogBox メソッドで指定したフォームの QueryClose イベントにこのスクリプトを添付しなければなりません。

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

Sub Queryclose(Source As NotesUIDocument, Continue As Variant)
 If Source.DialogBoxCanceled Then
   If Messagebox ("Do you really want to Cancel", _
   MB_YESNO+MB_ICONQUESTION, "Cancel") = IDNO Then
     Continue = False
   End If
 End If  
End Sub

関連項目