PDA

View Full Version : Cần Khẩn



TrungTinh95
25-07-2010, 14:04
Làm sao để khi nhấn vào nút close thì xuất hiện thông báo có muốn tắt hay không ( giống như yahoo vậy ) vậy xin bác nào biết chỉ giùm. Thank

kysudat
26-07-2010, 10:16
Private Sub Form_Unload(Cancel As Integer)
If MsgBox("Ban thuc su muon thoat hay khong?", vbYesNo, "Hoi truoc khi dong") = vbYes Then
Cancel = 0
Else
Cancel = 1
End If
End Sub

Chuc ban thanh cong

lengoctuth2010
09-10-2010, 11:23
Private Sub cmdclose_Click()
If MsgBox("Ban chac muon thoat chuong trinh khong ?", 3 + 32, "XAC NHAN THOAT CHUONG TRINH") = 6 Then
Unload Me
End If
End Sub

Hi hi đơn giản gọn nhẹ !