首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是:单击命令按钮后,程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显示出来。根据题意,填空处应选择
在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是:单击命令按钮后,程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显示出来。根据题意,填空处应选择
admin
2009-02-13
80
问题
在窗体上画一个名称为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
选项
A、List1.Text=Str(a(i))+ vbCrLf
B、List1.Text=Str(a(i))+ vbCrLf
C、List1.AddItem a(i)
D、List1.AddItem=a(i)
答案
4
解析
程序的功能是:先将其下标值作为数组的初值,然后,用2去除它后面的每个数,如能被整除,就将其值赋0,再用3、4.....去除它后面的每个数,也是如能被整除,就将其值赋0,数组剩下的非0值就是素数。最后将其素数在List1列表框中显示出来。注意此题中的数组a是公共变量。向列表框添加内容时,选项C是正确的。
转载请注明原文地址:https://kaotiyun.com/show/4b1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
给出下列的程序片段,m为()时将会输出default。switch(m)case():Systemt.out.println("case0");case1:System.out.println("case1");
下面是一个类的定义,根据程序功能,在指定的空白处填上适当的语句或语法成分,使程序完整。Class______//定义名为myclass的类{staticintvar=666;staticintgetvar()
按运算符操作数的数目划分,运算符的类型是【】元运算符。
______类是所有类的根,它所包含的属性和方法被所有类继承。()
在描述软件的结构和过程中,提出了以下的设计表达工具,其中不正确的说法是()
将具有相同属性和操作(方法)相似的一组对象称为()。
变量属性是描述变量的作用域,按作用域分类,变量有局部变量、_______、方法参数和异常处理参数。
在Windows环境下,实现窗口移动的操作是()。
Java语言具有许多优点和特点,下列选项中能反映Java程序并行机制特点的是()。
在面向对象方法中,【】描述的是具有相似属性与操作的一组对象。
随机试题
简述PowerPoint2010的普通视图的构成。
根据有关国际条约的规定,禁止使用的作战手段主要有哪些?
Onceyourbusinessbeinginternational,_____constantlywillbepartofyourlife.
如下图所示4种外墙变形缝的金属盖缝板,其中哪一种能全面满足伸缩缝、沉降缝、防震缝的要求?[2001年第070题][2006年第120题]
A公司是一个化工生产企业。生产甲、乙、丙三种产品。这三种产品是联产品,本月发生联合生产成本748500元。该公司采用可变现净值法分配联合生产成本。由于在产品主要是生产装置和管线中的液态原料。数量稳定并且数量不大,在成本计算时不计算月末在产品成本。产成品存货
越南曾经使用过的文字叫“字喃”。()
以下多媒体素材编辑软件中,(12)主要用于动画编辑和处理。
分辨率为640×480的真彩色图像,像素分辨率为24bit。如果以每秒25帧动态显示,则需要的通信带宽约为
在窗体中的文本框分为结合型和【】两种。
Hispoorstandardofplayfullyjustifieshis______fromtheteamforthematchnextSaturday.
最新回复
(
0
)