Saya memiliki kotak pesan yang muncul ketika saya menekan tombol tutup yang pada dasarnya mengatakan "Apakah Anda yakin ingin keluar" tetapi ketika saya mengklik tombol tidak atau membatalkan tetapi program ditutup dengan cara apa pun
ini adalah kode saya:
'Close Button
Private Sub BtnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnClose.Click
Dim result = MessageBox.Show(" Are you sure you want to quit", "Are you sure?", MessageBoxButtons.YesNoCancel)
Me.Close()
End Sub
Private Sub btnClose_Click(sender As Object, e As EventArgs) Handles btnClose.Click
If MsgBox("Are you sure you want to quit?", MsgBoxStyle.YesNo Or MsgBoxStyle.DefaultButton2, "Close application") = Windows.Forms.DialogResult.Yes Then
Me.Close()
End If
End Sub