Kevin.Ory
Messages postés840Date d'inscriptionmercredi 22 octobre 2003StatutMembreDernière intervention 7 janvier 200911 9 juil. 2008 à 22:00
Salut,
VB.NET 2003? C'est à dire le framework 1.1, ça se fait bien vieux donc. Je te conseil vivement de passer au minimum à la version 2.0 du framework (VB 2005), il y a eu d'énormes améliorations entre la version 1.1 et 2.0.
Ton triage ne fonctionne pas comme tu le veux car tu trie alphabétiquement (car c'est une liste de String). 2 solutions:
1. Tu créé une liste de nombre entiers :
Dim list As New List(Of Integer)
list.Add(1)
list.Add(10)
list.Add(2)
list.Add(20)
list.Add(2003)
list.Add(3)
list.Sort()
2. Tu garde ta liste de String mais tu créé un Comparer qui comparera des valeurs entière :
Private Class MyListComparer
Inherits Comparer(Of String)
Public Overrides Function Compare(ByVal x As String, ByVal y As String) As Integer
Dim val1 As Integer = x
Dim val2 As Integer = y
Return val1.CompareTo(val2)
End Function
End Class
' La liste :
Dim list As New List(Of String)
list.Add(1)
list.Add(10)
list.Add(2)
list.Add(20)
list.Add(2003)
list.Add(3)