Combo Box Frustration With Add Item

I simply added a combo box to my sheet and or word doc. I have tried using .additem, but I get nothing in the drop down. I am on 2003 SP 2.

I have tried the following:

Private Sub combobox1_form_initialize()
ComboBox1.AddItem "Computer"
ComboBox1.AddItem "Internet"
ComboBox1.AddItem "Book"
ComboBox1.Text = ComboBox1.List(0)
End Sub

and

Private Sub combobox1_userform_initialize()
ComboBox1.AddItem "Computer"
ComboBox1.AddItem "Internet"
ComboBox1.AddItem "Book"
ComboBox1.Text = ComboBox1.List(0)
End Sub

Neither gives me anything in the list.