在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将统计和查找的结果分别显示在标签Label3和Label4中(窗体外观如图1-282所示)。程序不完整,请在指定的位置把程序补充完整。注意:不得修改原有程序和控件的属性。在结束程序运行前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
【正确答案】【操作步骤】
步骤1:打开考生文件中的本题工程文件sjt5.vbp,打开代码编辑窗口,编写“统计”按钮的单击事件过程。
参考代码:
n = 0
For k = 1 To 40
If prime(arr(k)) Then
If n = 0 Then
mini = arr(k)
Else
If mini  > arr(k) Then
mini = arr(k)
End If
End If
n = n + 1
End If
Next
Label3.Caption = Str(n)
Label4.Caption = Str(mini)
步骤2:按要求将文件保存至考生文件夹中。
步骤3:按< F5 >键运行程序,先单击“读入数据”按钮,接着单击“统计”按钮,然后单击窗体右上角的关闭按钮结束程序。
【答案解析】