问题:[问答题]
第一步:启动VisualBasic,打开考生文件夹下的工程文件T507.vbp。
第二步:双击窗口中的任何位置,进入程序编辑窗口,补充程序如下:
1PrivateSubC1_Click()
2StaticaAsInteger
3DimiAsInteger
4Fori=1To2000
5Callisprime(i)
6Ifisprime(i)=TrueThen
7a=i
8EndIf
9Nexti
10Me.Text1.Text=a
11EndSub
第三步:调试运行程序,正确后以原文件名保存。
● 参考解析
本题主要考查过程函数的调用以及For循环语句的使用。考生可在窗体上双击C1,进入程序编写窗口。根据题意,主要是使2000以内的最大素数显示在文本框中,故可以使用For循环语句,令变量i在1~2000之间取值,逐一作为实参调用isprime()函数过程,当遇到isprime()函数过程返回True值时,把i的值赋给a。这样循环便可得到2000以内的最大素数。这也是本题最后所给两点要求的原因。