ACCESS FEED: Re: Re: [belajar-access] Trs: Cara mencegah form di tombol ALL CLOSE

Selasa, 22 Oktober 2013

Re: Re: [belajar-access] Trs: Cara mencegah form di tombol ALL CLOSE

Mantap...

I see another Program using it...

Pada 22 Oktober 2013 18.48, mochamad junus <madjoens@yahoo.co.id> menulis:

Terima bang aksan atas bantuannya, akhirnya form di aplikasi ku bisa terprotect

Dikirim dari Yahoo! Mail pada Android

From: aksan kurdin <aksan.kurdin@gmail.com>;
To: <belajar-access@yahoogroups.com>;
Subject: Re: [belajar-access] Trs: Cara mencegah form di tombol ALL CLOSE
Sent: Mon, Oct 21, 2013 4:22:52 PM

caranya, cegah di event yang menutup form tersebut.

ini contoh sederhananya.
buat form dengan satu tombol, lalu pelajari kode berikut (code behind form):

Option Compare Database Option Explicit Dim bol_bisa_ditutup As Boolean Private Sub Command0_Click() bol_bisa_ditutup = True DoCmd.Close acForm, Me.Name End Sub Private Sub Form_Unload(Cancel As Integer) Cancel = Not bol_bisa_ditutup End Sub

segala usaha untuk menutup form, pada akhirnya harus mengeksekusi event unload form.
unload bisa di cancel
kita akali dengan membuat variabel bol_bisa_ditutup hanya bernilai true saat button command0 di click, selain dari itu nilainya false.

aksan kurdin

On 10/21/2013 7:36 AM, mochamad junus wrote:

Pada Rabu, 16 Oktober 2013 14:01, mochamad junus <madjoens@yahoo.co.id> menulis:

Assalammualaikum Wr.Wb

kepada Para master dan Suhu Access yang terhormat, Saya ingin menanyakan -malu sebetulnya karena sering tanya- bagaimana ya cara memprotek form-form yang harus aktif terus- dari menu "Close ALL" shortcut yang ada di form pojok atas kiri (seperti gambar ).

demikian, atas segala bantuannya selama ini saya sampaikan banyak terima kasih.