DataBase Microsoft Visual Basic 6.0

Rumus/Syntax DataBase Pada Keluar (CommandButton)

Private Sub KELUAR_Click()

pesan = MsgBox("Yakin Akan Keluar", vbYesNo, "Perhatian")

If pesan = vbYes Then

End

End If

catatan :

anda bebas menuliskan pesan apa yang akan anda tampilkan pada project anda.