ACCESS FEED: Bls: [belajar-access] One click

Rabu, 21 Agustus 2013

Bls: [belajar-access] One click

tambahin kode untuk yg ada source datanya dengan :

DoCmd.RunCommand acCmdSaveRecord

(taruh dibawah command kosong text.)

Salam,

Syarif

Dari: mochamad junus <madjoens@yahoo.co.id>
Kepada: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Dikirim: Selasa, 20 Agustus 2013 9:05
Judul: Bls: [belajar-access] One click

Terima kasih mas syarif atas bantuannya-sudah tak coba dan berhasil - cuma pada saat saya tekan tombol esc datanya kok kembali lagi ya...-terutama untuk control yang ada source nya (untuk control yang unbound datanya memang gak kembali) , gimana mas ada solusi untuk control yang ada sourcenya?, supaya datanya gak tampil lagi seperti control yang unbound. Terima kasih banyak mas atas bantuannya

Dikirim dari Yahoo! Mail pada Android

From: Nyong Arif <nyong_arif@yahoo.com>;
To: belajar-access@yahoogroups.com <belajar-access@yahoogroups.com>;
Subject: Bls: [belajar-access] One click
Sent: Mon, Aug 19, 2013 3:59:36 AM

Dear Mas Junus,

Coba ini ya...

Private Function KosongText()
    Dim ctl As Control
    For Each ctl In Me
        If (ctl.ControlType = acComboBox or ctl.ControlType = acTextBox) Then
            ctl.Value = Null
        End If
    Next ctl
End Function

Salam,
Syarif

Dari: mochamad junus <madjoens@yahoo.co.id>
Kepada: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Dikirim: Jumat, 16 Agustus 2013 14:19
Judul: [belajar-access] One click

Sebelumnya dari hati yang palin dalam saya ucapkan minal aidzin wal fa idzin, mohon maaf lahir dan batin.

Saya ingin menanyakan bagi para master n suhu access yang di rahmati ALLLAH swt, bagaimana ya cara membuat kode vba untuk mengosongkan semua kontrol sekaligus yang ada di form yg sedang aktif.

Demikian , atas bantuannya kami sampaikan terima kasih

Dikirim dari Yahoo! Mail pada Android

__._,_.___

Reply via web post

Reply to sender

Reply to group

Start a New Topic

Messages in this topic (6)

Recent Activity: