Povezani ComboBoxevi u Datasheet formi
Pretpostavimo da imamo dve tabele, Nacelnici i Zaposleni (povezana sa tabelom Nacelnici preko polja ZapNac), i da su Comboboxevi povezani sa poljima u te dve tabele i imaju po dve kolone.
Od pocetka sam nameravao da PRVI Combobox bude filter za drugi. Problem je u tome sto bi unbound kolona DRUGOG Comboboxa nestala sa ekrana za sve podatke u kojima se vrednost PRVOG Comboboxa razlikuje od aktuelne vrednosti PRVOG Comboboxa u izabranom redu.
Pokusavao sam da to resim na razne nacine, dok nisam na netu video da u designu forme NE TREBA postaviti RowSource za drugi Combobox tako da zavisi od drugog. To se radi u On Current Event forme. Kada se promeni vrednost prvog Comboboxa potrebno je uraditi requery za drugi Combobox.
Primer
U designu forme su postavljena sledeca svojstva za RowSource:
Combo1: Select IDNac, ImeNac From Nacelnici;
Combo2: Select IDZap, ImeZap From Zaposleni
Code:
Private Sub Form_Current()
DoEvents ' iz nekog razloga bez ovoga kod nece raditi ?
Combo1.RowSource = "Select IDZap, ImeZap From Zaposleni Where ZapNac = " & Combo1.Value
End Sub
Private Sub Combo2_GotFocus()
Form_Current
End Sub
Private Sub Form_Current()
DoEvents ' iz nekog razloga bez ovoga kod nece raditi ?
Combo1.RowSource = "Select IDZap, ImeZap From Zaposleni Where ZapNac = " & Combo1.Value
End Sub
Private Sub Combo2_GotFocus()
Form_Current
End Sub
Ozbiljan i odgovoran mladić
Re: Povezani ComboBoxevi u Datasheet formi