VB 获得随机数后 如何取指定数相加结果放在一个文本框

[qczl1234]

这是我写的代码，首先是随机获得20个100-200的数放在第一个框，然后取其中能被7整除的数放在第2个文本框，第3步就是我要问的，如何让第2步获得的数相加然后把值放在第3个框。谁帮下我，谢谢！
Private Sub Command2_Click()
Dim a%
Dim x%
For x = 1 To 20
Randomize
a = Int(Rnd * 100 + 100)
T1.Text = T1.Text + " " + CStr(a)
If a Mod 7 = 0 Then
T2.Text = T2.Text + " " + CStr(a)

End If
Next

[wangjuenhui520]

先在for 外面dim 一个 integer 的变量 如:I
你可以在t2.text = t2.text+ "" +Cstr(a) 的下一行写如如下行
i = cint(i) + cint(a)
这样