[VB6] ordinamento record

[keeper76]

Con questo pezzo di codice io popolo un combo dove seleziono i miei clienti, pero' vengono in ordine di inserimento e non alfabetico, come posso fare in modo che quando io apro il mio combo i nominativi siano in ordine alfabetico ?


....................
Do While Not rstAnagrafica.EOF = True
cboClienti.AddItem rstAnagrafica!Cognome & Space(1) & stAnagrafica!Nome
rstAnagrafica.MoveNext
Loop
....................................

[IKON]

quando apri il recordset metti nell'istruzione SQL che passi al metodo Open una cosa del tipo "ORDER BY cognome, Nome"

[buba88]

guarda nn vorrei sbagliare ma mi sa che basta che imposti la proprietà sorted della combo su true per mettere in ordine alfabetico

Do While Not rstAnagrafica.EOF = True
cboClienti.AddItem rstAnagrafica!Cognome & Space(1) & stAnagrafica!Nome
rstAnagrafica.MoveNext
Loop

boclienti.sorted = true