プログラム :プログラムの終了方法(Close End)

VB2008でCloseとEndでプログラムを終了させる使用例サンプルです。

プログラムへ



プログラムの終了方法に「Close」と「End」があります。
Closeを使った場合、FormClosingのイベントが発生します。
Endを使った場合、FormClosingのイベントは発生しません。

終了時よくある、「終了しますか?」のメッセージを表示し、キャンセルを実行させるにはCloseで終了させる必要があります。

■実行画面
「Closeで終了」ボタンをクリックした場合、下のメッセージが表示されます。
「Endで終了」ボタンをクリックした場合、終了確認は行われずに終了します。


「Closeで終了」ボタンをクリックした場合のメッセージ画面


■実行コード

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Close()
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.
 FormClosingEventArgs) Handles Me.FormClosing
Dim smsg As String
Dim ans As MsgBoxResult

smsg = "終了しても、よろしいですか?"

ans = MessageBox.Show(smsg, "終了確認", MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
If ans <> MsgBoxResult.Yes Then
e.Cancel = True
End If
End Sub
End Class


Visual Basic 2008 Express Edition実践入門