[单项选择题] 在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是：单击命令按钮后，程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显

17 查阅

[单项选择题] 在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是：单击命令按钮后，程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显示出来。根据题意，填空处应选择Option Base 1Dim a(100)As IntegerPrivate 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 iEnd SubPrivate Sub Form_Load () For i = 1 To 100 a (i)=i Next iEnd Sub

A．List1.Text=Str(a()+ vbCrLf

B．List1.Text=Str(a()+ vbCrLf

C．List1.AddItem a(

D．List1.AddItem=a(

参考答案:

C解析：[分析]：程序的功能是：先将其下标值作为数组的初值，然后，用2去除它后面的每个数，如能被整除，就将其值赋0，再用3、4.....去除它后面的每个数，也是如能被整除，就将其值赋0，数组剩下的非0值就是素数。最后将其素数在List1列表框中显示出来。注意此题中的数组a是公共变量。向列表框添加内容时，选项C是正确的。

计算机考试