Bpk, kalau saya biasanya memanfaatkan event on close di form, jadinya tombol close Access tetep ada, tapi user kalau klik tombol close Access muncul peringatan hendak save atau tidak. Karena disana kita bisa set Cancel = True.
Thank's ----- Original Message ----- From: Ahmad Qomaruddin To: [email protected] Sent: Wednesday, 17 February 2010 2:19 PM Subject: Re: [belajar-access] Tanya:Mencegah Penggunaan Tombol Silang (X)/close untuk keluar aplikasi Tetap tidak bisa pak, tapi form2 yang lain masih bisa didesign, tetapi form yang saya beri script dibawah ini : Private Sub Form_Load() Cancel = mbol_CanClose mbol_CanClose = True mbol_Select = False Me.Visible = False End Sub Private Sub Form_Unload(Cancel As Integer) Cancel = Not mbol_CanClose End Sub Formnya tidak bisa diapa-apakan, ataukah mungkin script saya yang salah ? Di modul saya beri script sbb : Option Compare Database Option Explicit Private mbol_Select As Boolean Private mbol_CanClose As Boolean Property Get SelectOk() As Boolean SelectOk = mbol_Select End Property Property Let SelectOk(vData As Boolean) mbol_Select = vData mbol_CanClose = True If mbol_Select Then Me.Visible = False End If End Property Terima Kasih 2010/2/17 Sumiyanto - <[email protected]> Kalo dari Form klik kanan tidak bisa, bisa jadi shortcut nya di non akfitkan. Coba Bpk, dari Menu bar View>Design View, jika menu bar tidak muncul karena telah dibuat menu bar by design coba tekan CTRL+F11 dahulu. Trims Sumiyanto ---------------------------------------------------------------------------- From: Ahmad Qomaruddin <[email protected]> To: [email protected] Sent: Tue, February 16, 2010 9:41:36 PM Subject: Re: [belajar-access] Tanya:Mencegah Penggunaan Tombol Silang (X)/close untuk keluar aplikasi Makasih pak, saya sudah coba dan berhasil, tombol silang tidak jalan tp form-nya juga tidak bisa diapa2kan lagi, adakah solusi biar formnya bisa didesign lagi setelah script dijalankan? Terima kasih Pada tanggal 15/02/10, Aksan Kurdin <aksan.kurdin@ gmail.com> menulis: > coba pelajari penggunaan variable bolCanClose yang saya jelaskan pada > message: http://tech. groups.yahoo. com/group/ belajar-access/ message/25006 > masih seger kok ...... > > > aksan kurdin > > > On 2/15/2010 8:40 AM, Ahmad wrote: >> >> Buat teman2 belajar-access, tanya dong >> Gimana caranya mencegah penggunaan tombol silang(X)/close untuk keluar >> dari aplikasi? >> Kalo keluar form kan cukup property close button di buat No tapi kalo >> keluar aplikasi gimana? >> Hal ini sebetulnya hanya untuk membuat supaya setiap keluar dari >> aplikasi harus dengan mengklik command yang telah dibuat, karena sudah >> ada prosedur di dalamnya, kalo langsung klik silang(X) maka prosedur >> yang dibuat pada command kan jadi tidak jalan. >> mohon bantuan dan terima kasih >> >> > > -- Dikirim dari perangkat seluler saya Ahmad Qomaruddin Sulang Rembang email : ud1...@gmail. com blog : ud13en.blogspot. com -- Ahmad Qomaruddin Sulang Rembang email : [email protected] blog : ud13en.blogspot.com
