hatena
hatena
2024/01/22 (月) 16:21:49
Report_Closeイベントはキャンセルできません。
自動生成されたイベントプロシージャにCancel引数がないイベントはキャンセルできません。
読み込み解除時(Report_Unload)イベントならキャンセルできます。
Private Sub Report_Unload(Cancel As Integer)
Dim res As String
res = MsgBox("正常に印刷が完了しましたか?", vbQuestion + vbYesNo, "完了確認")
If res = vbNo Then
Cancel = True
Else
MsgBox "さようなら"
End If
End Sub
通報 ...