在考生文件夹下有一个工程文件 sjt3.vbp ,相应的窗体文件为 sjt3.frm 。其功能是产生 30 个 0~1000 的随机整数,放入一个数组中,然后输出其中的最小值。程序运行后,单击命令按钮(名称为 Command1 ,标题为“输出最小值”),即可求出其最小值,并在窗体上显示出来(如图所示)。这个程序不完整,请把它补充完整,并能正确运行。 要求: 去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。 Option Base 1 Private SubCommand1_Click( ) Dim arrN(30) as Integer Dim Min as Integer Randomize For i=1 to 30 ‘arrN(i)=Int(Rnd * ? ) '这里是生成随机数,而随机数的生成方法我们之前章节有介绍。 Next i ‘ ? =arrN(1) For i=2 to 30 ‘If ? Then Min=arrN(i) End if Next i Print Min End Sub