首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
在考生文件夹中有一个工程文件sjt5.vbp。该程序的功能是从in5.txt文件中读入40个数据,统计这些数据中素数的个数,并找出所有素数中最小的素数(判断素数的函数已给出)。最后将查找和统计的结果分别显示在标签Label4和Label3中(窗体外观如图所
admin
2019-05-14
62
问题
在考生文件夹中有一个工程文件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://kaotiyun.com/show/LUUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下函数过程:Functionfl(XAsInteger)AsLongDimSAsLongDimiAsIntegerS=0Fori=1ToxS:S+iNexti
下列程序的功能是调用字体对话框来设置文本框中的字体,单击Commandl按钮弹出对话框,进行相应的字体、字号等的设置,然后单击“确定”按钮退出列话框,则文本框中将发生哪些变化()。PrivateSubCommandl—Click0
假定建立了一个名为Commandl的命令按钮数组,则以下说法中错误的是()。
在程序运行时,下面的叙述中正确的是()。
数据结构中,与所使用的计算机无关的是数据的()。
不能正确表示条件“两个整型变量A和B之一为0,但不能同时为0”的布尔表达式是()。
窗体上有两个名称分别为Textl、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndType
在利用菜单编辑器设计菜单时,为了把组合键设置为“打开(0)”菜单项的访问键,可以将该菜单项的标题设置为()。
下列操作中不能向工程中添加窗体的是()。
在文本框中,要设置显示的文本颜色,应该设置()属性。
随机试题
下列各项中,不属于“内风”的是
男性。61岁。突然意识不清1小时。头颅CT显示右侧大脑半球3cm×3cm×6cm高密度影,最可能的诊断是
患者,女,50岁。胃脘胀痛,痛窜两胁,每因情志不舒而加重,嗳气嘈杂,舌质淡,脉弦缓。经胃镜检查诊断为慢性浅表性胃炎。中医治疗首选方剂为
甲公司委托乙行纪行为公司出售一套闲置设备,甲公司定价10万元,乙行纪行以9.9万元的价格将设备卖给丙公司,乙行纪行向甲公司补足了1000元的差额。回答以下小题:如果甲公司向丙公司交付了设备后,丙公司未按约定的时间支付货款,以下说法正确的是:
企业改制重组过程中,同一投资主体内部所属企业之间划转房屋权属的,不征收契税。()
高中阶段思想政治教育中的一个特殊任务是解决_____问题和_____问题。
1936年,沈钧儒等人发表《团结御侮的几个基本条件与最低要求》,强调“中国共产党于去年……主张停止内战,联合各党各派,共同抗日救国”。该“主张”最早见于()。
“四个全面”是新一届党的领导集体治国理政的战略布局。下列与“四个全面”有关的说法正确的是:
IwasinmythirdyearofteachingwritingatRalphHighSchoolinNewYork,whenoneofmystudents,15-year-oldMikey,gaveme
Readthefollowingadonculturalawarenessprogramme.Inmostofthelines(34-45),thereisoneextraword.Iteitherisg
最新回复
(
0
)