タイトル | : 繰り返しの足し算 |
記事No | : 14730 |
投稿日 | : 2010/06/02(Wed) 15:08 |
投稿者 | : わがし |
TextBoxが10個あり、ボタンをクリックすると、TextBoxに入力された数字をどんどん足していき、Labelに答えを表示させたいのですが、うまくできません。 For Nextでしているのですが、何がいけないのでしょうか? OSはXP、VB歴は1年のペーペーです。どなたかよろしくお願いします。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Goukei As Double
For i = 1 To 10 Goukei = Goukei + CDbl(TextBox(i).Text) Next
Label1.Text = Goukei End Sub
|