DIM hComboBox AS ComboBox DIM hComboBoxItem AS .ComboBoxItem hComboBoxItem = hComboBox [ Index AS Integer ]