首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2019-03-14
50
问题
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所示)。程序不完整,请在指定的位置把程序补充完整。
注意:不得修改原有程序和控件的属性。程序结束运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并在适当位置编写程序代码。 Dim a As Integer Dim b As Integer a=0 b=err(1) For i=1 To 40’确定素数个数 If prime(err(i))Then’判断是否为素数 a=a+1’素数个数累加 Label3.Caption=a’在标签中显示 Next For i=1 To 40’查找最小素数 工f prime(arr(i))And arr(i) < =b Then’比较素数大小 b=arr(i)’将较小素数赋给b Label4.Caption=b‘在标签申显示 Next 步骤3:按照题目要求调试并运行程序,效果如图3.16所示。 [*] 步骤4:关闭程序后,按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/OzUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于窗体的叙述中错误的是
设计窗体时,双击窗体上没有控件的地方,打开的窗口是
以下关于VB的叙述中,错误的是
设工程中有Form1、Form2两个窗体,要求单击Form2上的Command1命令按钮,Form2就可以从屏幕上消失,下面的事件过程中不能实现此功能的是
要求当鼠标在图片框P1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是
设窗体上有一个名称为List1的列表框,并有若干列表项。下面语句中不能在所有列表项之后追加一个列表项的是
下面描述中,不属于软件危机表现的是
如果要定义一个窗体级变量,定义变量语句的位置应该是
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为Labell、标题为“列表框的使用”的标签。再画一个名称为List1的列表框,列表中含有5个表项,表项内容分别为“北京”、“山西”、
要求当鼠标在图片框Picturel中移动时,立即在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是()。
随机试题
公安机关、银行、支付机构依托电信网络新型违法犯罪交易风险事件管理平台收发电子报文,对涉案账户采取紧急止付、快速冻结措施。
A.正气被伤B.气候因素C.正气不足D.地域因素E.邪气侵害疾病发生的内在根据是()
我国甲公司与瑞士乙公司订立仲裁协议,约定由某地仲裁机构仲裁,但约定的仲裁机构名称不准确。根据最高人民法院关于适用《中华人民共和国仲裁法》的解释,下列哪些选项是正确的?
对连续信号采样时,为保证模拟信号经过采样而不丢失信息,要求采样频率fs与信号的最高频率fc应满足关系()。
从()年3月25日开始,我国证券交易所的国债现货交易采用净价交易。
证券自营业务的资金必须是自有资金或依法筹集的资金。()
甲捡到了一只母山羊饲养起来,后失主乙找到甲要羊。本案应如何处理?()
历史是过去的现实,现实是未来的历史。理想渺茫、信仰动摇,根子在于不知道从哪里来、到哪里去,怎样走过来、怎样走下去,哪些做对了、怎样做才对。抹黑昨天也就________了明天,否定来路也就________了去路。填入划横线部分最恰当的一项是:
简述中世纪基督教的教育形式、机构及其教学内容。
有以下程序main(){inta=1,b=2;for(;a<8;a++){b+=a;a+=2;}printf(’’%d,%d\n’’,a,b);)程序运行后的输出结果是
最新回复
(
0
)