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]

Kirim email ke