Can anyone please help me to understand why my combobox is not being populated?

Public Sub ComboBox1_Change()

ComboBox1.Items.Add ("")

ComboBox1.Items.Add ("Stevel")

ComboBox1.Items.Add ("Janet")

ComboBox1.Items.Add ("Debbie")

ComboBox1.Items.Add ("Roger")

ComboBox1.Items.Add ("Gurpreet")

ComboBox1.Items.Add ("David")

ComboBox1.Items.Add ("Shamas")

ComboBox1.Items.Add ("Diane")

ComboBox1.Items.Add ("Paul")

End Sub