Discussion :

[menyarito]

Salut tout le monde,
J'essaie de faire un programme qui tri un tableau mais ça n'as
bien marcher. J'espère que l'un de vous me détectera l'erreur
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
Sub Main()
        Dim T(5) As String
        T(0) = 88
        T(1) = 67
        T(2) = 78
        T(3) = 98
        T(4) = 32
        Dim N As Integer = 5  'Nombre d'éléments
        Dim i, j As Integer
        Dim Temp As Integer
 
        For i = 0 To N - 1    'Boucle externe
 
            For j = 0 To N - 1   'Boucle interne
 
                If T(j) > T(j + 1) Then
 
                    Temp = T(j) : T(j) = T(j + 1) : T(j + 1) = Temp  'Inverser si pas dans le bon ordre
 
                End If
                Console.WriteLine(T(i))
            Next j
        Next i
        Console.ReadKey()
    End Sub

@++

[methylene]

Salut,

Si je comprends bien, tu veux trier ton tableau par valeurs croissantes.

Alors désolé de te l'apprendre mais tu as une méthode qui fait déjà cela, et qui tient en une ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Tontableau.sort

En espérant t'avoir aidé.

[menyarito]

Merci pour ta réponse,
Comme tu as utilisé les méthodes, est ce qu'il ya une methode pour faire un tri
décroissant ou seulement croissant avec "Array.sort()" ,
et c'est pourquoi j'ai utilisé la méthode classique car si elle réussi elle
peut faire un tri croissant comme elle peut faire aussi un tri décroissant.


@++

[methylene]

En fait dans le tri je n'ai pas tout écris :

Il manque les parenthèses :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

tontableau.sort()

Sans arguments dans les parenthèses tu as un tri croissant, tu as il me semble plus de 10 possibilités pour donner tes arguments, donc tu dois surement avoir la possibilité de faire du tri décroissant avec sort()

Voila l'extrait msdn qui devrait t'aider

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Visual Basic (Déclaration) 
Public Overridable Sub Sort ( _
    sortExpression As String, _
    sortDirection As SortDirection _
)Visual Basic (Utilisation) 
Dim instance As GridView
Dim sortExpression As String
Dim sortDirection As SortDirection
 
instance.Sort(sortExpression, sortDirection)

Sinon, voilà qui devrais pouvoir t'aider, dans ce tuto tu as plusieurs méthode pour faire du tri, sur des chiffres mais sur les lettres également :

http://plasserre.developpez.com/cour...e-vb1#LV-B-4-b

[Nathanael Marchand]

D'abord Sort puis Reverse.
Si tu veux implémenter ton propre tri tu peux utiliser les surcharges de Sort http://msdn.microsoft.com/en-us/library/w56d4y5z.aspx

[methylene]

Et pour ton information, ton exemple ne marche pas car tu te retrouves hors limites :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

       Temp = T(j) : T(j) = T(j + 1) : T(j + 1) = Temp

Ton tableau comporte 5 lignes, tu itères de j = 0 à 4, or quand j est égal à 4, tu recherche dan ton tableau (T(0), T(1), T(2), T(3), T(4)), la valeur pour T(5), tu est donc hors du tableau.

[methylene]

J'avais pas penser à reverse ...

Shame on me.