【VB数组小例】产生随机数并求和（附带添加图片用法）

刚学VB，最熟悉的控件就是TextBox了，下面将用9个TextBox和1个CommandButton做一个数组的小例子：产生随机数并求和。

效果如下：

前面板的控件选取就不用多说了，来说说这个添加图片的用法：首先，在窗体上添加image1控件，

然后在它的属性Picture上设置，找到一张图片导入即可。

代码部分：

Dim i As Integer, sum As Integer
Private Sub Command1_Click()

sum = 0
For i = 0 To 8
Text1(i) = Int(Rnd * 100 + 200) '产生200-299之间的随机数
sum = sum + Text1(i)
Next
Print sum  ‘输出求和值

End Sub

大家赶紧去试试吧。

以上就是今天的内容，喜欢的话记得一键三连哦。