首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2019-05-14
57
问题
在考生文件夹中有一个工程文件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://www.kaotiyun.com/show/LUUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面()不是VB的文件系统控件。
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drivel、Dirl和Filel,为了使它们同步操作,必须触发驱动器的Change事件和目录的Change事件,在这两个事件中执行的语句分别为()。
不能正确表示条件“两个整型变量A和B之一为0,但不能同时为0”的布尔表达式是()。
若将变量TestDate声明为Date类型,则下列为变量TestDate赋值的语句中正确的是()。
下面程序计算并输出的是()。PrivateSubCommandlClick()Num=10Sum=0DoSum=Sum+Num*Num*NumNum=Num.1LoopU
函数过程F1的功能是:如果参数a为奇数,则返回值为1,否则返回值为0。以下能正确实现所述功能的代码的是()。
窗体上有两个名称分别为Textl、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndType
在利用菜单编辑器设计菜单时,为了把组合键设置为“打开(0)”菜单项的访问键,可以将该菜单项的标题设置为()。
下列操作中不能向工程中添加窗体的是()。
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为ComTestl。设窗体Forml标题为“MyForml”,双击控件数组中的第3个按钮,打开代码编辑器,编写如下代码:PrivaeSubComTestl——Click(Index
随机试题
患者,男,45岁。上呼吸道感染2周后出现皮肤瘀点,血小板检查为30×109/L,骨髓象示骨髓巨核细胞数量轻度增加,巨核细胞发育成熟障碍。现斑色暗淡,多散在出现,时起时消,过劳则加重,心悸,气短,头晕目眩,食欲缺乏,面色苍白,舌质淡,苔白,脉弱。应首先考虑的
骨髓增生异常综合征患者的骨髓原始细胞中有Atler小体,见于
某建筑公司向某钢厂发出一个要约表明了想要购买钢材,钢厂发出的承诺由于快递公司的失误,该承诺到达建筑公司时已超过了承诺期限,则下列说法正确的是()。
美国学者拜伦和克霄昔斯根据员工工作的成果分布决定因素,将工作划分为()。
阿特金森的研究表明,力求成功者倾向于选择非常容易或非常困难的任务。
什么是“大国关系”?在传统的国际关系认识中,大国关系的基本目标是“争霸”——争夺___________区域事务乃至世界事务的___________。填入划横线部分最恰当的一项是:
由于狂风暴雨,李某家门口的电线杆松动,倒在了李某家的房屋上。李某立即向电力局打电话要求排除险情,电力局答应派人过去维修,但李某等到第二天仍无人过来,李某再次打电话催促电力局,电力局始终不对何时派人过去维修进行明确答复,故李某立即向法院起诉电力局不履行法定职
资本主义萌芽于14世纪末15世纪初,其途径包括()
0.1
【S1】【S4】
最新回复
(
0
)