Probleme de tri en visual basic 2008 (.net)
mrdevil
Messages postés
14
Statut
Membre
-
mrdevil Messages postés 14 Statut Membre -
mrdevil Messages postés 14 Statut Membre -
Bonjour,
bon j'ai réalisé une listbox mais le problem c'est que je n'ai pas trouvé le moyen de trier les composant de la listbox dans un ordre decroissant de z-a
la fontion sorted a marché de a-z
je me demande s'il 'ya pas un e façon de trier cette liste de z-a
merci d'avance
bon j'ai réalisé une listbox mais le problem c'est que je n'ai pas trouvé le moyen de trier les composant de la listbox dans un ordre decroissant de z-a
la fontion sorted a marché de a-z
je me demande s'il 'ya pas un e façon de trier cette liste de z-a
merci d'avance
2 réponses
-
Bonjour,
Il te faudra trier à la main ...
Private Sub btn_Tri_Direct_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles btn_Tri_Direct.Click Dim Valeur As String = String.Empty Dim Indice As Int32 = 0 Dim I As Int32 = 0, J As Int32 = 0 InitialiseListeBox() Indice = Me.ListBox1.Items.Count For I = 0 To (Indice - 1) For J = 0 To (Indice - 1) If (Me.ListBox1.Items(J).ToString < Me.ListBox1.Items(I).ToString) Then Valeur = Me.ListBox1.Items(J).ToString Me.ListBox1.Items(J) = Me.ListBox1.Items(I).ToString Me.ListBox1.Items(I) = Valeur End If Next Next End Sub
Info -
merci ,
j'ai reusi a le fair avec une autre methode
Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
ListBox1.Sorted = False
Dim i As Integer
Dim t(ListBox1.Items.Count - 1) As String
Dim x As New ListBox
For i = 0 To ListBox1.Items.Count - 1
t(i) = ListBox1.Items(i)
Next
Array.Sort(t)
For i = ListBox1.Items.Count - 1 To 0 Step -1
x.Items.Add(t(i))
Next
ListBox1.Items.Clear()
ListBox1.Items.AddRange(x.Items)
End Sub
