If MessageBox.Show("Do you want to exit now?", "Exit application", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
Application.Exit()
End If
If MessageBox.Show("Do you want to exit now?", "Exit application", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.No Then
e.Cancel
End If
Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
If MessageBox.Show("Do you want to exit now?", "Exit application", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.No Then
e.Cancel = True
End If
End Sub