vb高手进 ！～！如何用代码求任意输入十位正整数的总和

先新建一个text控件,然后把以下代码复制进去
Dim a(9) As Long
Dim i As Long
Dim b As Long
Private Sub Form_Load()
For i = 0 To 9
a(i) = InputBox("请输入第" + Str(i + 1) + "个数字")
Next i
For i = 0 To 9
b = b + a(i)
Next i
Text1.Text = b
End Sub

你的问题说明不是很明确,再详细些吧!
比如你是要求输入的任意多个的最大位数为10位的正整数的和?
这种代码?你看看书完全能解决的,真的,如果这样的问题都要问别人来解决,我觉得你不适合搞编程的,呵呵!有点打击人啊!