M
Michelle Bryant
Can anyone help - Im new to this stuff!
Im trying to add list entries to combo box. My form initializes - the combo
is there but there is nothing in the list. What am I doing wrong?
Private Sub UserFormSection1_Initialize()
ComboBoxWeather.AddItem "Poor" 'index 0
ComboBoxWeather.AddItem "Fair" ' index 1
ComboBoxWeather.AddItem "Good" ' index 2
ComboBoxWeather.Style = fmStyleDropDownCombo
ComboBoxWeather.ListIndex = 0
ComboBoxWeather.Enabled = True
ComboBox1.Left = 252
ComboBox1.Top = 6
ComboBox1.Width = 168
ComboBox1.Height = 18
End Sub
Im trying to add list entries to combo box. My form initializes - the combo
is there but there is nothing in the list. What am I doing wrong?
Private Sub UserFormSection1_Initialize()
ComboBoxWeather.AddItem "Poor" 'index 0
ComboBoxWeather.AddItem "Fair" ' index 1
ComboBoxWeather.AddItem "Good" ' index 2
ComboBoxWeather.Style = fmStyleDropDownCombo
ComboBoxWeather.ListIndex = 0
ComboBoxWeather.Enabled = True
ComboBox1.Left = 252
ComboBox1.Top = 6
ComboBox1.Width = 168
ComboBox1.Height = 18
End Sub