Mirate esto y luego lo haces a tu gusto.
Private Sub Command1_Click()
MsgBox Combo1.Text
End Sub
Private Sub Form_Load()
Combo1.AddItem "Nod32"
Combo1.AddItem "AVG"
Combo1.AddItem "Avast"
Combo1.Text = "Avast"
End Sub
El combo1 le cambias la propiedad Style a 2-