VB 获得随机数后 如何取指定数相加结果放在一个文本框
这是我写的代码,首先是随机获得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