sort number field in list view vb6

[mktilu]

hi

   With ListView1
        .SortKey = ColumnHeader.Index - 1
        .SortOrder = IIf((.SortOrder = lvwAscending), lvwDescending, lvwAscending)
        .Sorted = True
    End With

this the code for sorting list view can any one tell me why it does not sort serial number in vb6

Its argent

[danp129]

hi

With ListView1
.SortKey = ColumnHeader.Index - 1
.SortOrder = IIf((.SortOrder = lvwAscending), lvwDescending, lvwAscending)
.Sorted = True
End With

this the code for sorting list view can any one tell me why it does not sort serial number in vb6

Its argent

There's better ways but you could preceed the numbers with 0's:


Replace(Space(13 - Len(myval)), " ", "0") & myval

.. or use spaces and right align the column if it's not the first column :
Space(13 - Len(myval)) & myval