Мне надо заполнить ComboBox данными из массива при нажатии кнопки на форме
На событие OnClick кнопки запускается процедура:

Private Sub Command2_Click()
Combo4.RowSourceType = "Value List"
Combo4.AddItem "Male"
End Sub

Но почему то выдает ошибку
Не могу понять что я делаю неправильно

Help me please !

http://www.sql.ru/forum/1084674/kak-zapolnit-combobox