フォームクローズイベントで私は困惑しています

Question

「x」ボタンをクリックすると、「本当に終了しますか？」というメッセージボックスが表示されます。 「はい」の場合は閉じ、「いいえ」の場合は開いたままにします。だから私のコードは：

Dim a As Integer 
a = MessageBox.Show("Are you sure you want to exit?", _ 
        "Vice Versa 1.0", _ 
        MessageBoxButtons.YesNo, _ 
        MessageBoxIcon.Information) 
If a = vbYes Then 
    Me.Close() 
Else 
    Exit Sub 
End If 

これはいいですか？私のプロジェクトをデバッグするときに "いいえ"をクリックすると、私のプログラムは終了します。これは単にデバッグモードになっているのか、ここに何か不足していますか？

（編集済み）警告またはエラーもありません。

メッセージボックスに表示されたときにゲームが一時停止する方法はありますか？ユーザーがキーボードの「p」を押しても、私はそれを働かせるだけです。また、 "p"を押さずにメッセージボックスが表示されたときにゲームを一時停止したい場合もあります。

Answer 1

閉じるをキャンセルするには、Cancelプロパティを設定する必要があります。

e.Cancel = True 

を、あなたは再びMe.Closeを行う必要はありません。Exit Sub前の行に、追加します。 Ifブロックを書くより良い方法は、単純に次のようにすることです：

a = MessageBox.Show(....) 
If a = DialogResult.No Then 
    e.Cancel = True 
End If