Si lo puedes utilizar, ejemplo:
Private Sub Combo1_Click()
Select Case Combo1.ListIndex
Case 0 To 3
MsgBox Combo1.Text
End Select
End Sub
Private Sub Form_Load()
Me.Combo1.AddItem "Chivas"
Me.Combo1.AddItem "America"
Me.Combo1.AddItem "Dorados"
Me.Combo1.AddItem "Atlas"
End Sub
Nota: Aunque en el evento clic no es necesario poner el Select Case con esto era suficiente, pero era para darte una idea de lo que puedes usar en otra parte del programa.
Private Sub Combo1_Click()
MsgBox Combo1.Text
End Sub