How to Add items in combo box

something like

cboThing.Clear
do
'selection or whatever
cboThing.AddItem Whatever
'exit do command here
loop
cboThing.ListIndex = 0

Whats meant to go in the combo??????