WebBrowserから実行した印刷、印刷プレビューの終了を取得したい

ゆき 2006-07-25 20:22:13 No: 96088

いつも参考にさせて頂いています。
あるFrom1にWebBrowserコントロールを貼り付け、
Fromロード時に、HTMLファイルを指定し、

印刷、もしくは印刷プレビューを表示しているのですが、
印刷処理、もしくは印刷プレビューが閉じられた時に、
動的にFrom1を終了させたいのですが、どのように
印刷、プレビューの終了を取得すればいいのかが、分かりません。

どなたか、ご教授願います。

Private Sub Form_Load()

    Call WebBrowser1.Navigate("c:\hogehoge.html")
    ' プレビュー
    If mode = 0 Then
        WebBrowser1.ExecWB OLECMDID_PRINTPREVIEW,
                             OLECMDEXECOPT_DONTPROMPTUSER, Null, Null
    ' 印刷
    Else
        WebBrowser1.ExecWB OLECMDID_PRINT,
                           OLECMDEXECOPT_DONTPROMPTUSER, Null, Null
    End If

End Sub