bonjour a tous le monde je suis un nouvel inscri dans se forum et j'éspére trouvé de aide içi de gens sympa voila mon problém

j'essaie d'excuté un programme de caisse qui lit un article et affiche le prix et la quantité et calcule le montant et le total des article pour a la fin calculte la tva et le prix TTC mais mon problem c'est que quand je choisir par exemple bc d'aryicle dans affichage il m'afiche et calcule just le dérnier voila 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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
 
Module Module1
Structure caisse
Dim article As String
Dim qte As Integer
Dim prix As Double
Dim MT As Double
End Structure
 
Sub Main()
Dim a As caisse
Dim total As Double = 0
Dim TTC As Double = 0
Dim t(100) As String
Dim rep As String = "oui"
Dim i As Integer = 1
While rep = "oui"
Console.WriteLine("donner le nom de l'article" & i)
a.article = Console.ReadLine
Console.WriteLine("donner la quantité")
a.qte = Console.ReadLine
Console.WriteLine("donner le prix")
a.prix = Console.ReadLine
a.MT = a.prix * a.qte
Console.WriteLine("le mantant total et:" & a.MT)
t(i) = a.article
Console.WriteLine("voulais vous choisir un autre article ? oui /non")
rep = Console.ReadLine
total = total + a.MT
i = i + 1
End While
Console.WriteLine("________________________________")
Console.WriteLine("article qte prix montant")
Console.WriteLine("________________________________")
Dim x As String = (a.article & " ").Substring(0, 10)
Dim b As String = (a.qte & " ").Substring(0, 8)
Dim c As String = (a.prix & " ").Substring(0, 8)
Dim d As String = (a.MT & " ").Substring(0, 8)
Console.WriteLine(x & b & c & d)
Console.WriteLine("________________________________")
Console.WriteLine("PRIX TOTAL:" & total)
Dim TVA As Double = total * 0.2
Console.WriteLine("TVA:" & TVA)
TTC = total + TVA
Console.WriteLine("PRIX TTC:" & TTC)
Console.ReadKey()
End Sub
 
End Module
s'il a quelqu'un qui peux m'aider je serais vraiment ravie merçi d'avance