Maaf ada kurang 1 command. with cboDaerah .Clear 'menghapus list combonya....
Salam, Newbie 2008/3/13 Newbie Semarang <[EMAIL PROTECTED]>: > Private Sub cboKota_Click() > with cboDaerah > Select case cboKota.Text > Case "JAKARTA" > .AddItem "Sunter" > .AddItem "Blok M" > 'dst..... > Case "BANDUNG" > .AddItem "Dago" > .AddItem "Cibadak" > 'dst.... > Case "SEMARANG" > .AddItem "Dr. Cipto" > .AddItem "Pringgading" > End Select > .ListIndex = 0 ' default list pertama > End With > > Bisa juga nama-nama daerah disimpan dalam tabel (berisi field Nama Kota > dan Nama Daerah) > Pengisian list combo daerah berdasar hasil query tabel ini dengan kriteria > sesuai nama kotanya. > > Selamat mencoba. > > Salam, > Newbie > > > 2008/3/13 Setia Bungsu <[EMAIL PROTECTED]>: > > Dear Para Master & Senior VB, > > > > Saya mau membuat dua buah combobox yang salah satunya adalah filter > > (misal ComboA beranggota "Bandung" & "Jakarta", sedangkan ComboB > > beranggota "Sunter", "Blok M", "Karet", "Cicaheum", "Dago"). Saya > > bermaksud membuat filter, misalnya jika memilih "Bandung" di ComboA maka > > yang tampil di ComboB hanyalah "Cicaheum & "Dago". Bagaimana trick atau > > list program nya? > > Thx atas bantuannya. > > > > Salam, > > Setia BK > > > > > > [Non-text portions of this message have been removed]
