Bonjour,

J'essaie de trier chaque ligne de ma TextBox, mais j'ai un soucis au niveau de l'algorithme que je n'arive pas à resoudre!

L'utilisateur doit cliquer sur un label pour que le tri s'effectue.

voici le code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
Private Sub Label10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label10.Click
        Dim tab As String
        Dim chaine() As String
        Dim i As Integer
        Dim Temp As String
        tab = Me.ListeNote.Text
        chaine = tab.Split(vbCrLf)
        For i = 0 To UBound(chaine) - 1
            If chaine(i) > chaine(i + 1) Then
                Temp = chaine(i)
                chaine(i) = chaine(i + 1)
                chaine(i + 1) = Temp
            End If
        Next
 
        For i = 0 To UBound(chaine)
            If i = 0 Then
                Me.ListeNote.Text = chaine(i)
            ElseIf i < 2 Then
                Me.ListeNote.Text = Me.ListeNote.Text + chaine(i)
            End If
 
 
        Next
    End Sub



Le tri ne se fait pas correctement, et il y a plein de bizarrerie, il semblerai qu'il un problème au moment où j'effectue le tri (la première boucle for), car j'ai testé la 2éme boucle et elle m'affiche correctement le contenu tester.

en espérant que vous puissiez m'aider,

Cordialement,

sushis