Ordonner en ordre consante les donné une variable
Résolu
cs_li
Messages postés
54
Date d'inscription
vendredi 7 novembre 2003
Statut
Membre
Dernière intervention
6 juin 2011
-
10 nov. 2007 à 05:55
cs_li Messages postés 54 Date d'inscription vendredi 7 novembre 2003 Statut Membre Dernière intervention 6 juin 2011 - 10 nov. 2007 à 14:06
cs_li Messages postés 54 Date d'inscription vendredi 7 novembre 2003 Statut Membre Dernière intervention 6 juin 2011 - 10 nov. 2007 à 14:06
A voir également:
- Allo3
- Variable objet ou variable de bloc with non définie - Forum Visual Basic
- Donne moi une couleur au hasard - Forum Visual Basic
- Erreur 91 : variable non défini ✓ - Forum Visual Basic
- Mise en Gras ou en couleur de certains mots d'une textbox - Forum C# / .NET
- Variable objet ou variable bloc with non défini ✓ - Forum Visual Basic 6
2 réponses
cs_Willi
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
22
10 nov. 2007 à 10:29
10 nov. 2007 à 10:29
Bonjour,
Inspire toi de cet exemple. J'ai considéré que la variable allo est de type générique List(Of Personne) ou personne représente une personne.
Voici la classe Personne:
Public
Class Personne
Public id
As
Integer
Public nom
As
String
End
Class
Voici la méthode de tri à l'aide de system.comparaison:
Private
Function SortListProc(
ByVal x
As Personne,
ByVal y
As Personne)
As
Integer
If x
Is
Nothing
Then
If y
Is
Nothing
Then
Return 0
Else
Return -1
End
If
Else
If y
Is
Nothing
Then
Return 1
Else
Dim retval
As
Integer = x.id. CompareTo (y.id)
If retval <> 0
Then
Return retval
Else
Return x.id.CompareTo(y.id)
End
If
End
If
End
If
End
Function
Pour trier ta liste allo rien de plus simple:
dim allo as new system.collections.generics.List(of Personne)
'ici tu remplis allo....
dim p1 as new personne
p1.id =7
p1.name="mike"
allo.add(p1)........
'Puis tu tris:
allo.Sort(addressOf SortListProc)
Voila ++
Inspire toi de cet exemple. J'ai considéré que la variable allo est de type générique List(Of Personne) ou personne représente une personne.
Voici la classe Personne:
Public
Class Personne
Public id
As
Integer
Public nom
As
String
End
Class
Voici la méthode de tri à l'aide de system.comparaison:
Private
Function SortListProc(
ByVal x
As Personne,
ByVal y
As Personne)
As
Integer
If x
Is
Nothing
Then
If y
Is
Nothing
Then
Return 0
Else
Return -1
End
If
Else
If y
Is
Nothing
Then
Return 1
Else
Dim retval
As
Integer = x.id. CompareTo (y.id)
If retval <> 0
Then
Return retval
Else
Return x.id.CompareTo(y.id)
End
If
End
If
End
If
End
Function
Pour trier ta liste allo rien de plus simple:
dim allo as new system.collections.generics.List(of Personne)
'ici tu remplis allo....
dim p1 as new personne
p1.id =7
p1.name="mike"
allo.add(p1)........
'Puis tu tris:
allo.Sort(addressOf SortListProc)
Voila ++
cs_li
Messages postés
54
Date d'inscription
vendredi 7 novembre 2003
Statut
Membre
Dernière intervention
6 juin 2011
10 nov. 2007 à 14:06
10 nov. 2007 à 14:06
merci beaucoup de cette reponce j'adore ce forum
