Check it out …
From: XL-mania@yahoogroups.com [mailto:XL-mania@yahoogroups.com] On Behalf Of Aziz Yudhistira Alaudin
Sent: Wednesday, November 16, 2011 6:48 AM
To: XL-mania@yahoogroups.com
Subject: ]] XL-mania [[ Login Masih Bisa Di Tembus
Wahai para pakar XL, aku coba bikin form login, sudah berhasil...
Tetapi kenapa yah masih bisa ditembus dengan meng-klik tanda cross di form ?...
Klo ga diperbaiki, bisa ditembus oleh user ilegal dong...
Mohon pencerahannya dong kode syntax-nya.....
Terima kasih sebelumnya
coba pake ini :
ResponderExcluirbuat tombol close (exp : tm_close )
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
tm_close.setfocus
End If
End Sub
----
Private Sub tm_close_Click()
ActiveWorkbook.Close
End Sub