问题
单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是:单击命令按钮后,程序用“筛选法”求出1~100之间的全部素数。将其素数在列表框中显示出来。根据题意,填空处应该选择______。
Option Base 1
Dim a(100)As Integer
Private Sub Command1_Click( )
n=100
For i=2 To Sqr(n)
For j=i+1 To n
If j Mod i=0 And a(j)<>0 Then a(j)=0
Next j
Next i
For i=1 To n
If a(i)<>0 #Then
Next i
End Sub
Private Sub Form_Load( )
For i=1 To 100
a(i)=i
Next i
End Sub
答案
参考答案:C
解析: 程序的功能是:先将其下标直作为数组的初值。然后,用2去除它后面的每个数,如能被整除,就将其值赋0,再用3,4,…[*]去除它后面的每个数,也是如能被整除,就将其值赋0。数组剩下的非0值就是素数。最后将其素数在List1列表框中显示出来。注意此题中的数组a是公共变量。往列表框添加内容时,选项C是正确的。