Pertama-tama, pastikan kita memahami konsep di balik "cascading combo box". Logika berjalan sedemikian rupa sehingga setelah Anda membuat pilihan dari Combo1, opsi yang tersedia di Combo2 akan berubah sehingga hanya item yang terkait dengan Combo1. Demikian pula, setelah kami memilih item dari Combo2, item di Combo3 hanya akan menjadi item yang terkait dengan apa yang dipilih pengguna di Combo2.
Jadi, pertama-tama, setiap kotak kombo selain Combo1 harus kosong, atau harus terkait dengan nilai default Combo1. Anda bisa melakukannya dengan cara apa pun.
Selanjutnya, di acara AfterUpdate Combo1, Anda harus memiliki sesuatu seperti ini:
Me.cboCombo2.RowSource = "SELECT MyFieldNames " & _
"FROM tblMyTable " & _
"WHERE SomeID = " & Nz(Me.cboCombo1) & _
"ORDER BY SomeValue"
Me.cboCombo2.Requery
Jelas, MyFieldNames, tblMyTable, dan semua nilai lainnya akan bergantung pada apa yang sebenarnya Anda cari, nama tabel/kueri sumber dan nama bidang, dll...
Oke, jadi sekarang Combo2 harus diisi dengan data yang hanya relevan dengan apa yang Anda pilih di Combo1, karena kami menggunakan Combo1 sebagai filter dalam SQL di atas.
Jika itu terlihat OK, lakukan hal yang kurang lebih sama persis untuk Combo3. Anda mungkin perlu memfilter nilai dari kedua kombo, atau Anda mungkin bisa lolos hanya dengan menggunakan nilai tersebut di Kombo2, bergantung pada kumpulan data Anda.
Busa, Bilas, Ulangi. Saya kira Anda perlu melakukannya 50 kali jika Anda memiliki 50 kombo, tetapi begitulah cara melakukannya.
Untuk referensi lebih lanjut, lihat artikel ini:http://www.fmsinc .com/microsoftaccess/forms/combo-boxes/cascading.html
