ＯＵＴＰＵＴを蓄積したいです

質問

ＶＢはじめたばかりの素人です
まずうまく説明ができなくてすみません…
付データを参考してください…！

Ａｄｄ　Ｔｈｉｓ　のボタンを押すと
左のＵｓｅｒＩｎｐｕｔ（Ｑｕａｎｔｉｔｙ*Ｐｒｉｃｅ）で
右上の　Ｃｕｒｒｅｎｔ　Ｃｈａｒｇｅの方に計算結果がでて、

Ｕｐｄａｔｅのボタンを押すと、
ＣｕｒｒｅｎｔＣｈａｒｇｅの数値を参考し、Ｓｕｍｍａｒｙの計算をするプログラムなのですが、

たとえば、ＣｕｒｒｅｎｔＣｈａｒｇｅが　＄10で、Ｕｐｄａｔｅし、Ｓｕｍｍａｒｙの計算をしたあと、

また新しく　ＵｓｅｒＩｎｐｕｔ、　ＱｕａｎｔｉｔｙやＰｒｉｃｅを入力し
ＣｕｒｒｅｎｔＣｈａｒｇｅが　＄15だった場合、

Ｕｐｄａｔｅボタンを押したとき、
前の＄10のＳｕｍｍａｒｙの結果に＄15のＳｕｍｍａｒｙの結果を足すような形にしたいのですが
どうしたらいいですか？？

ちなみにＶＢ2008を使ってます！

回答No.1

田中 裕之（@bybalsendercase） · ベストアンサー

すいません

＞付データを参考してください…！
これってどこにありますか？

あと、使わないボタンとかラベルを削除した画像とかアップできませんか？

お手数おかけします。

下記のサンプルはたぶんぜんぜん違いますね。

Public Class Form1
Dim ar As New List(Of TextBox)
Private Sub f() Handles MyBase.Shown
For i As Integer = 0 To 8
Dim txtbx As New TextBox
txtbx.Location = New Point(100, 20 + 30 * i)
txtbx.Text = "0"
ar.Add(txtbx)
Me.Controls.Add(txtbx)
Next
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim ans As Integer = CInt(ar(6).Text) * CInt(ar(8).Text)
MsgBox(ans)
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim currentcharg As Integer = 5
Dim total As Integer
For k As Integer = 0 To 8
total += CInt(ar(k).Text)
Next
MsgBox(total)
End Sub
End Class