Discussion :

[BenjaminT]

Bonjour, mon problème est synthétisé dans cette boucle:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
dim nbfactures as integer
nbfactures=4
Dim nblignes_f1 As integer 
nblignes_f1=13
Dim nblignes_f2 As integer
nblignes_f2=20
Dim nblignes_f3 As integer
nblignes_f3=8
Dim nblignes_f4 As integer
nblignes_f4=12
 
for i = 1 to nbfactures
'jaimerais afficher dans la boucle la valeur de nblignes_fi à chaque tour de boucle'
next

merci de votre aide

[Gold Bug]

Ben c'est qu'il faut réfléchir un petit peu......

A mon avis il te faut une classe Facture qui contient au moins une propriété NombreLignes, puis une liste de factures que tu pourras parcourir dans ta boucle.
Ca devrait donner un truc comme ça :

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
List<Facture> factures = new List<Facture>();
// Ajout facture 1
Facture facture = new Facture();
facture.NombreLignes = 13;
factures.Add(facture);
// Ajout facture 2
facture = new Facture();
facture.NombreLignes = 20;
factures.Add(facture);
// Idem pour facture 3 et 4.
 
// Affichage de la liste
for (int i=0; i < factures.Count; i++)
{
    Console.WriteLine("La facture {0} contient {1} ligne(s).", i.ToString(), facture(i).NombreLignes.ToString());
}

Attention, code non testé

[dudule]

Bonjour,
Tu peux faire un truc du genre :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
dim nbfactures as integer = 4
Dim nblignes_f1 As integer = 13
Dim nblignes_f2 As integer = 20
Dim nblignes_f3 As integer = 8
Dim nblignes_f4 As integer = 12
Dim list as integer() = {nblignes_f1 ,nblignes_f2, nblignes_f3, nblignes_f4}
 
for i = 0 to list.Length -1
'Affichage list(0)
next

[Gold Bug]

Bonjour,
Tu peux faire un truc du genre :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
dim nbfactures as integer = 4
Dim nblignes_f1 As integer = 13
Dim nblignes_f2 As integer = 20
Dim nblignes_f3 As integer = 8
Dim nblignes_f4 As integer = 12
Dim list as integer() = {nblignes_f1 ,nblignes_f2, nblignes_f3, nblignes_f4}
 
for i = 0 to list.Length -1
'Affichage list(0)
next

S'il a 499 factures, ça va pas être facile à maintenir

[dudule]

Pour son exemple ça suffit...
Personnellement, je l'aurais fait en objet. Après chacun son truc.

[BenjaminT]

Merci Dudule ta réponse me convient.