Load Combo From Listbox?

I'm having problems loading everything from a listbox to a combobox. Example is loading List1 into Combo1. All I can get is the first item.
Thanks in advance.

VB Code:

Dim i As Long
For i = 0 To List1.ListCount - 1
      Combo1.Additem List1.List(i)
Next

Thank you very much. I can see now I was trying to make it more diffucult than it had to be.