sei sicuro che sull'evento Click della combo no funzioni questo aggiornamento automatico?

codice:
Private Sub Form_Load()
   Combo1.AddItem ("Dddd")
   Combo1.AddItem ("Fffff")
End Sub

Private Sub Combo1_Click()
   MsgBox Combo1.Text
End Sub
a me funziona.