首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2019-03-14
63
问题
在考生文件夹中有一个工程文件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全国计算机二级
相关试题推荐
下列控件中,不响应Click事件的是
窗体上有1个名称为Textl的文本框,1个名称为Labell的标签。程序运行后,如果在文本框中输入信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程为
窗体上有一个Textl文本框,一个Commandl命令按钮,并有以下程序:PrivateSubCommandl_elick().DimnIfTextl.Text◇”123456”Thenn=n+1:Print”口令输入错误”&n&“
数据的存储结构是指
在软件开发中,需求分析阶段产生的主要文档是
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
以下关于DoUntil…Loop循环的说法正确的是()。
关系数据库管理系统能实现的专门关系运算包括()。
对于循环队列,下列叙述中正确的是
某二叉树共有150个结点,其中有50个度为1的结点,则()。
随机试题
()是因人的认识需要是否得到满足而产生的体验。
已知X1,X2,…,X100的平均值为7,标准差为1,则4X1,4X2,…,4X100的平均值、标准差分别为()和()。
库存管理者责任中,测量和跟踪过程主要包括()、补充订购、入库和出库管理等方面。
有人说要做正确的事,有人说要正确地做事,你怎么看?
对于8259A的中断请求寄存器IRR,当某一个IRi端呈现______时,则表示该端有中断请求。
【S1】【S4】
Mostofyouwouldprobablysaythatwhatmakesyoutrulyhappyisyourfamilyandtheloveyoushareinyourrelationships,an
Duringrecentyearswehaveheardmuchabout"race":howthisracedoescertainthingsandthatracebelievescertainthingsand
Therearealargenumberofreferencebooks______toyou;youcanmakeuseofthematanytimeyoulike.
W:Ray,aren’tyougoingstraighthomeafterschooltoday?M:________
最新回复
(
0
)