För att fylla den kör jag:

<code>
While Not dbRec.EOF
intID = Val(dbRec.Fields(0))
strResult = dbRec.Fields(1) & " "
Combo1.AddItem strResult
Combo1.ItemData(Combo1.ListCount - 1) = intID
dbRec.MoveNext
Wend

</code>

Men när jag drar igång programet vill jag ha första för vald eller kunna välja en med hjälp av intID:t?

Nee... Nu går jag fan och lägger mig... *tokig*

För att den första ska vara förvald:

if combo1.listcount > 0 then combo1.listindex = 0

/Emma

tackar... fixade sig med idt oxå..