Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If MsgBox("Anda Yakin ", vbYesNo + vbQuestion, "Keluar dari Aplikasi") =
vbYes Then
Set db = Nothing
Cancel = False
Else
Cancel = True
End If
End Sub
-------Original Message-------
From: jontampubolon
Date: 31/07/2010 16:06:13
To: [email protected]
Subject: [indoprog-vb] memberi pesan saat tombol Close di-click
Rekan2 sekalian, bagaimana koding VB 6 untuk memunculkan pesan (Msgbox) saat
tombol Close (yang ada dipojok kanan atas sebuah Form)di klik? Mohon
pencerahannya.
[Non-text portions of this message have been removed]