4月 7th, 2008at 19:11

Tags: ,

確認メッセージを出す

このエントリーをはてなブックマークに追加

処理を続行するかどうかの確認を行い、「はい」を選択した時に処理を続行。「いいえ」を選択した時は何も実行しない。

ソース

'続行の確認を行うSub 処理続行確認メッセージ() Dim Style Dim Response

 Style = vbYesNo + vbInformation + vbDefaultButton2 Response = MsgBox("続行しますか?", Style, "確認") If Response = vbNo Then  End End IfEnd Sub
このエントリーをはてなブックマークに追加