OVH Cloud OVH Cloud

Trier un tablo

11 réponses
Avatar
Jean-Michel
Bonjour,

Je veux avoir quelques info sr les tableaux en vb ...
Voici un exemple de tableau que je veux traiter :

-------------------------
| Réf | Longueur |
-------------------------
| R1222 | 2500 |
| R1254 | 3000 |
--------------------------

Donc voici comment est fait mon tableau :

Dim Tableau(1 to 2, 1 to 2) AS String
Tableau(1,0) = "R1222"
Tableau(1,1) = "2500"
Tableau(2,0) = "R1254"
Tableau(2,1) = "3000"


Mais moi ce que je voudrai faire c'est d'inverser les deux lignes

les commandes :

w = Tableau(2)
Tableau(2) = Tableau(1)
Tableau(1) = w

ne passe pas car il y a qu'une donné dans la paranthese
J'aimerai eviter d'inversé chaque donné, et je veux inverser toute la ligne

Merci d'avance pour vos reponses ...

1 réponse

1 2
Avatar
Patrice Henrio
La solution c'est de créer un type contenant chaque colonne, ce qui permet
d'une part d'avoir des colonnes avec des types différents, et d'autre part
de pouvoir inverser les lignes automatiquement.

Exemple
Type Elève
Nom as string
Notes() as integer
End Type

Dim Classe(1 to NbElèves) as Elève
Dim NbDeDevoirs as integer

On suppose que NbDeDevoirs a été initialisé, voire augmenter au fur et à
mesure

A chaque fois que l'on augmente NbDeDevoirs, on redimensionne Notes()

Pour échanger la ligne I et la ligne J

Dim V as Elèves

V=Classe(I)
Classe(I)=Classe(J)
Classe(J)=V



"Jean-Michel" a écrit dans le
message de news:
Bonjour,

Je veux avoir quelques info sr les tableaux en vb ...
Voici un exemple de tableau que je veux traiter :

-------------------------
| Réf | Longueur |
-------------------------
| R1222 | 2500 |
| R1254 | 3000 |
--------------------------

Donc voici comment est fait mon tableau :

Dim Tableau(1 to 2, 1 to 2) AS String
Tableau(1,0) = "R1222"
Tableau(1,1) = "2500"
Tableau(2,0) = "R1254"
Tableau(2,1) = "3000"


Mais moi ce que je voudrai faire c'est d'inverser les deux lignes

les commandes :

w = Tableau(2)
Tableau(2) = Tableau(1)
Tableau(1) = w

ne passe pas car il y a qu'une donné dans la paranthese
J'aimerai eviter d'inversé chaque donné, et je veux inverser toute la


ligne

Merci d'avance pour vos reponses ...








1 2