首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2019-05-14
26
问题
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所示)。程序不完整,请在指定的位置把程序补充完整。
注意:不得修改原有程序和控件的属性。程序结束运行之前,必须至少正确运行一次程序,将统计的结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:分析并在适当位置编写程序代码。 参考代码 Dim a As Integer Dim b As Integer a=0 b=arr(1) For i=1 To 40’确定素数个数 If prime(arr(i))Then’判断是否为素数 a=a+1’素数个数累加 Label3.Caption=a’在标签中显示 Next For i=1 To 40’查找最小素数 If prime(arr(i))And arr(i)<=bThen’比较素数大小 b=arr(i)’将较小素数赋给b Label4.Caption=b’在标签中显示 Next 步骤3:按照题目要求调试并运行程序,效果如图3.16所示。 [*] 步骤4:关闭程序后,按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/JNN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序的功能是:把父目录下顺序文件smtext1.txt的内容读入内存,并在文本框Text3中显示出来。淆选择适合横线处的语句()。PrivateSubCommand1_Click()DiminDataAsStri
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1显显示出来。在横线处应填写()。PrivateSubCommandl—Click()DiminDataAsString
窗体上命令按钮的事件过程如下:PrivateSubCommandlClick()A=“34”:B=“26”:C=“98”PrintB+C+AEndSub运行程序后,单击命令按钮,输出结果是(
数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是()。
在窗体上有一个名称为Label1的标签和一个名称为Timer1的计时器,并编写有如下几个事件过程:PrivateSubFormLoad()Timer1,Enabled=FalseTimer1.Interval=_____
在窗体(Name属性为Form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程()。PrivateSubCommandl__Click()
在数据流图中,带有箭头的线段表示的是()。
在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(
设在工程中有一个标准模块,并定义了如下类型:TypeStutypeinoAsIntegerstmameAsString*20strsexAsString*2smarkAsSingle
随机试题
利用Intranet的功能,在单位文档一体化管理过程中不可以实现_______。
下面不是计算机病毒的破坏性的是()
Topreservefood,thegrowthofbacteria(细菌)mustbecontrolled.Water,warmth,andfoodareallneededforbacteriatobecomest
金某因举报单位负责人贪污问题遭到殴打,于案发当日向某区公安分局某派出所报案,但派出所久拖不理。金某向区公安分局申请复议,区公安分局以未成立复议机构为由拒绝受理,并告知金某向上级机关申请复议。下列哪些说法是正确的?()
海关调查人员在调查走私案件时,可以径行查询案件涉嫌单位和涉嫌人员在金融机构、邮政企业的存款、汇款。()
甲和乙都是某服装外贸公司的高级业务员。甲年轻富有,豁达开朗,口头禅是“鄙人有家有业,不愁吃不愁穿,只求有朝一日能实现儿时的梦想,独自驱车横穿撒哈拉沙漠,与非洲土著居民围着篝火唱歌跳舞。”乙则精力充沛,办事风风火火,喜欢对人指手画脚,发号施令,一直渴望有朝一
公民道德建设主要包括的领域有()
有如下函数过程:Functionfun1(ByValxAsInteger,ByValyAsInteger)AsIntegerDoWhiley<>0reminder=xMody
在三级模式之间引入两层映象,其主要功能之一是()。
SECTION1Questions1-10Questions1-2ChoosethecorrectanswerA,B,CorD.
最新回复
(
0
)