Arraylist et affichage
nancy_co
Messages postés
6
Date d'inscription
Statut
Membre
Dernière intervention
-
java4ever -
java4ever -
Bonjour,
svp j'aimerai savoir comment faire l'affichage des objets stokés dans une araylist en mode console sur vb.net
j'ai fait ce cod mais ca n'a pas marché il n'affiche que le dernie objet
(liste est arraylist)
For Each a As Article In liste
Console.WriteLine(a.ToString)
Next
svp j'aimerai savoir comment faire l'affichage des objets stokés dans une araylist en mode console sur vb.net
j'ai fait ce cod mais ca n'a pas marché il n'affiche que le dernie objet
(liste est arraylist)
For Each a As Article In liste
Console.WriteLine(a.ToString)
Next
A voir également:
- Arraylist et affichage
- Affichage double ecran - Guide
- Windows 11 affichage classique - Guide
- Affichage ips processeur graphique ✓ - Forum Matériel & Système
- Problème affichage facebook ✓ - Forum Facebook
- Affichage youtube trop grand ✓ - Forum YouTube
3 réponses
Bonjour,
Es tu sûr(e) que ta liste contient d'autres éléments ?
tu devrais ajouter le code (par exemple avant le for each) :
Si tu obtiens 1, c'est que le remplissage de la liste est incorrect.
Cordialement
Es tu sûr(e) que ta liste contient d'autres éléments ?
tu devrais ajouter le code (par exemple avant le for each) :
Console.WriteLine( "Nombre dans la lste: {0}", liste.Count );
Si tu obtiens 1, c'est que le remplissage de la liste est incorrect.
Cordialement
oui je pense qu'il y a un prb de remplissage
Public Sub saisir(ByVal a As Article)
Console.WriteLine("entrez le num de reference ")
a.NumReference = Console.ReadLine
Console.WriteLine("entre le nom de l'article")
a.Nom = Console.ReadLine
Console.WriteLine("entre le prix d'achat ")
a.PrixAchat = Console.ReadLine
Console.WriteLine("entrez le prix de vente ")
a.PrixVente = Console.ReadLine
End Sub
Public Sub AjouterAticle(ByVal a As Article)
saisir(a)
liste.Add(a)
MsgBox("L'article est Ajouté!", MsgBoxStyle.Information)
End Sub
mais l voilà le code
Cordialement
Public Sub saisir(ByVal a As Article)
Console.WriteLine("entrez le num de reference ")
a.NumReference = Console.ReadLine
Console.WriteLine("entre le nom de l'article")
a.Nom = Console.ReadLine
Console.WriteLine("entre le prix d'achat ")
a.PrixAchat = Console.ReadLine
Console.WriteLine("entrez le prix de vente ")
a.PrixVente = Console.ReadLine
End Sub
Public Sub AjouterAticle(ByVal a As Article)
saisir(a)
liste.Add(a)
MsgBox("L'article est Ajouté!", MsgBoxStyle.Information)
End Sub
mais l voilà le code
Cordialement
Si tu mets "ByVal" devant l'argument d'une procédure, ça veut dire que l'argument utilisé dans la procedure (sub) est une COPIE de celui passé en argument.
Donc si tu modifie cette copie, tu comprendra facilement qu'au retour, l'original ne soit pas modifié.
Remplaces les ByVal par des ByRef et je pense que ça devrait mieux marcher.
Cordialement
Donc si tu modifie cette copie, tu comprendra facilement qu'au retour, l'original ne soit pas modifié.
Remplaces les ByVal par des ByRef et je pense que ça devrait mieux marcher.
Cordialement
