I followed you example,but it doesnt work in my code.
Code:Do Until reIndex.EOF strIme = rsIndex("Ime") & "#" & rsIndex("Prezime") Combo1.AddItem = strIme rsIndex.MoveNext Loop MyArray = Split(strIme, "#") Trim (MyArray(0)) Trim (MyArray(1)) end sub
That part is under FormLoad.I open a connection with the DB before that,and select fields,as shown in my post num.1.
So the error is ARGUMENT NOT OPTIONAL
And .AddItem is highlited




Reply With Quote