Combo In Ordine Alfabetico

[BOYROMA1]

carico una combo con 3 campi di una tabella di un database
nome1
nome2
nome3

usando il seguente codice

If Data1.Recordset.EOF = False And Data1.Recordset.BOF = False Then


Data1.Recordset.MoveFirst


While Not Data1.Recordset.EOF

Combo1.AddItem (Data1.Recordset("nome1"))
Data1.Recordset.MoveNext

Wend

Data1.Recordset.MoveFirst
End If

lo ripeto per altre 2 volte sia per nome2 sia per nome3.

come posso visualizzare lelenco dei nomi nella combo indicizzati alfabeticamente??
ho provato a indicizzarli da access ma dato che sono 3 campi ne carica 1 poi laltro e poi laltro ancora quidni non sono in ordine?

un'aiutino??

:master:

[tas]

Prova impostando la proprietà del combobox Sorted=True

[BOYROMA1]

grazie tante