Niguru.com | Kamis, 1 Okt 2020 | Posting kali ini melanjutkan posting sehari sebelumnya yang membahas mengenai cara mengatur record source dari suatu form lewat VBA. Dimana biasanya pengaturan record source hanya dilakukan pada saat pembuatan form saja.
Bila pada posting sehari sebelumnya, Niguru.com menjelaskan mengenai cara pembuatan tabel yang akan digunakan sebagai record source, maka pada posting kali ini Niguru.com akan menjelaskan pada bagian form dan cara menyisipkan instruksi VBA didalamnya.
- Klik side tab Forms.
- Double click Create form in Design view.
- Klik icon Label.
- Drag area pada Detail form untuk membuat label > ketikkan : SWITCH RECORD SOURCE.
- Klik side tab Tables.
- Klik Table1.
- Drag Table1 ke area Detail dari form. Dengan cara ini maka secara otomatis tercipta sub form dari Table1.
- Klik Finish.
- Klik icon check box.
- Drag check box di detail area form.
- Double click check box.
- Klik tab Other
- Edit agar Name = PilihBtn.
- Klik tab Event.
- Scroll down After Update > pilih Event Procedure.
- Klik tombol Next (titik tiga).
Ketika VBA Editor tampil, ketikkan instruksi sebagai berikut:
If PilihBtn Then
Table1_subform.Form.RecordSource = "table1"
Else
Table1_subform.Form.RecordSource = "table2"
End If
Ganti label NamaBinatang menjadi Nama, karena kolom ini digunakan juga nantinya untuk nama tumbuhan juga:
Tekan tombol [Ctrl + S] untuk menyimpan form > klik Yes, saat window konfirmasi Save tampil:
Hasilnya, saat Form1 dibuka, dan check box dicontreng:
Hasilnya, saat Form1 dibuka, dan check box dikosongkan:
Untuk pembaca yang ingin mendapatkan file latihan yang sudah dibuat dengan langkah-langkah yang dijelaskan tadi, tanpa membuat sendiri, bisa download di URL: http://hideadew.com/LUK
Demikianlah langkah-langkah untuk mengatur record source dari suatu form lewat VBA.
Semoga penjelasan pada posting kali ini dapat menambah wawasan dan pengetahuan bagi para pembaca sekalian.
Selamat beraktivitas .. Have a nice day :-)
No comments:
Post a Comment