[问答题] 完成下列问题:
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生20个0~1000的随机数,放入一个数组中,然后输出这20个整数的平均值。程序运行后,单击命令按钮(名称为Command1,标题为“输出平均值”),即可求出其平均值,并在窗体上显示出来(如图3所示)。这个程序不完整,清把它补充完整,并能正确运行。
要求:在程序中的横线处填写正确的内容,使其实现上述功能,但不能修改程序的其他部分,最后把修改后的文件按原文件名存盘。
[题目提供的源程序]
Option Base 1
Private Sub Command1_Click()
Dim arrN(20) As Integer
Dim Aver As Single
Dim Sum As Integer, i
Randomize
For i=1 To 20
arrN(i)=Int(Rnd* (1) )
Next i
Sum= (2)
For i=1 To 20
Sum= (3)
Next i
Aver= (4)
Print Aver
End Sub