vb编程求和代码

来源:百度知道 编辑:UC知道 时间:2024/06/03 19:10:48
我在左侧输入了一个textbox,右面建立了10个textbox,想编写一段代码,当左面输入为5时则求右侧5个数的和,当输入为7时则求右面7个text的和。依此类推。

最好建立控件数组,这样方便一点~
另外写代码的时候,一起写那10个textbox的和就好,反正别的你又没输入,值=0啊~

建立控件数组Text2(0 To 9)
Private Sub Command1_Click()
Dim Sum As Double
For I = Val(Text1.Text) - 1 To 0 Step -1
Sum = Val(Text2(I).Text) + Sum
Next I
End Sub

建立控件数组,然后用循环相加就可以了。。。