[VB6] Ordinare numericamente gli elementi di una ListView

[pascan2]

Salve ecco il problema.
in una listview inserisco tre colonne di dati:
riporto esempio
N°Ordine Data Ordine Fornitore
1
2
.
.
110
..
quando vado ad ordinare la prima colonna mi succede questo:
N°Ordine Data Ordine Fornitore
1
110
.
.
praticamente invece di vedere 1 2 . . 110 vedo 1 110. 2
come posso risolvere per fare in modo di vedere da 110 a 1
per ordinare uso questo
Private Sub ListOrdini_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
Dim i As Long
Static sOrder
sOrder = Not sOrder

'Usa l'ordinamento standard per ordinare gli items
ListOrdini.SortKey = ColumnHeader.Index - 1
ListOrdini.SortOrder = Abs(sOrder)
ListOrdini.Sorted = True
End Sub

[oregon]

Prima di affrontare il problema, dato che non e' semplice, se i dati ti arrivano da un db, potresti farli ordinare dal db stesso prima di inserirli ...

[pascan2]

grazie per l'attenzione.
Allora i dati sono già ordinati dal db;infatti nella prima esecuzione, tutto Ok.
il problema nasce quando vado ad ordinare che mi crea il problema già descritto. Ma il fatto più importante, è quello che una volta "disordinati" non tornano più come prima.

[oregon]

No ... scusa ... che vuoi dire?

1) I dati sono ordinati

2) il problema nasce quando vai ad ordinare

3) una volta disordinati non tornano come prima

Non e' che abbia capito molto ...

[chico62]

Nelle listview i dati vengono ordinati in alfabeticamente, non numericamente.

Per cui una sequenza 1 2 10 20 , nel caso la proprietà Sorted della Listiew sia impostata a True, restituisce la sequenza 1 10 2 20.

Ergo, basta creare l'ordinamento in fase di selezione dati dal Db, come suggerito dal buon Oregon, e lasciare la proprietà Sorted della ListView impostata a False.

Ciauz

Chico

[Kahm]

forse ha messo una sub di ordinamento nell'evento click della colonna :master:
in questo caso dovresti fare un ciclo "a mano"