codice:
Private Sub Form_Load()
Combo1.Text = Combo1.List(0)
End Sub