首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其功能是: ①单击“读数据”命令按钮,则将考生文件央下in5.dat义件中的100个正整数读入数组a中,同时显示在文本框Text1中。 ②单击“素数”按钮,则将数组a中所有素数(只能被1和自身整
在考生文件夹下有一个工程文件sjt5.vbp,其功能是: ①单击“读数据”命令按钮,则将考生文件央下in5.dat义件中的100个正整数读入数组a中,同时显示在文本框Text1中。 ②单击“素数”按钮,则将数组a中所有素数(只能被1和自身整
admin
2015-10-23
66
问题
在考生文件夹下有一个工程文件sjt5.vbp,其功能是:
①单击“读数据”命令按钮,则将考生文件央下in5.dat义件中的100个正整数读入数组a中,同时显示在文本框Text1中。
②单击“素数”按钮,则将数组a中所有素数(只能被1和自身整除的数称为素数)存人数组b中,并将数组b中的元素显示在文本框Text2中。
在给出的窗体文件中已经有了全部控件(如图所示),但程序不完整。
要求:完善程序使其实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须先执行“素数”操作,然后再用窗体右上角的关闭按钮结束程序,否则将没有成绩。最后,程序按原文件名进行存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:打开代码编辑窗几,在代码编辑窗亡1指定位置编写以下代码。 For k=1 To 100 flag=True i=2 Do While i<=Int(a(k)/2)And flag’循环判断a(k)是否为素数 If Int(a(k)/i)=a(k)/i Then flag=False’若为素教,则使flag为False Else i=i+1’若不为素数,则i加1 End If Loop If flag=True Then num=num+1’满足条件则num累加 b(num)=a(k)。将满足条件的数存入b数组 End If Next k 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
单击“读数据”按钮,将考牛文件夹下in5.dat文件中的100个正整数读入数组a中,同时显示在Text1文本框中;运用Space()函数使数值之间空两个格,并判断是否为素数,如果是素数则flag标记为True,并将这个数存入数组b,通过变量num累加数组b的素数个数。最后通过循环语句将数组h中的元素显示在文本框Text2中。
转载请注明原文地址:https://kaotiyun.com/show/UHLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下事件过程:PrivateSubFormClick()DimnAsIntegerx=0n=InputBox(”请输入一个整数”)Fori=1ToiForj=1Toix=x+1Nextj
在窗体上画一个图片框,再在图片框中画一个命令按钮,位置如图所示,则命令按钮的Top属性值是()。
下列程序段运行后,a的值为______。a=600b=50a=a+bb=a-ba=a-b
声明一个变量为局部变量应该用()。
当数据的物理结构(存储结构)改变时,不影响数据库的逻辑结构,从而不致引起应用程序的变化,这是指数据的【】。
程序测试分为静态分析和动态测试。其中【】是指不执行程序,而只是对程序文本进行检查,通过阅读和讨论,分析和发现程序中的错误。
用LineInput语句从顺序文件读出数据时,每次读出一行数据。所谓一行是指遇到【】分隔符,即认为一行的结束。
以下各项中,VisualBasic不能接收的图形文件是
一个关系中属性个数为1时,称此关系为
下面有关注释语句的格式,错误的是()。
随机试题
判断急性心肌梗死面积最有价值的是
患者女性,40岁,超声显示:乳头下导管扩张,管内充满中低回声团,后方有衰减。挤出分泌物涂片找到瘤细胞如果需要进一步检查,最常用的需要进行哪项影像学检查
患者,女,28岁。右下腹隐痛1个月余、腹泻,每日3~5次,大便呈糊状,无黏液及脓血。腹部未触及肿块。经胸片检查发现,两上肺尖部可见斑片状、条索状阴影,病灶密度高低不一,并可见细小空洞。小肠造影发现回盲部和盲肠、升结肠变形,肠功能紊乱,可见跳跃征。考虑为
张某没有上过任何层次的医学专业的学校,但他仍有资格参加执业医师资格或执业助理医师资格考试,张某必定具有执业医师法规定的以下情形之一,除了
依照国家对药品标签、说明书管理的要求,药品标签、说明书必须最显著标示药品的
孙某因涉嫌组织、领导黑社会性质组织罪被批准逮捕,随后委托律师吴某为其辩护人。关于吴某履行辩护律师职能,下列哪一说法是正确的?()
(2011年卷二第17题)村民钱某与村办食品厂共同设立了具有独立法人资格的“美新农副产品有限责任公司”(以下简称“美新公司”),钱某担任公司的执行董事并兼任经理。根据民法通则及相关规定,下列说法哪些是正确的?
加富尔
A、十月一号B、十月二号C、九月二十九号D、九月三十号D
Thepriceofvegetablesfluctuatesaccordingtotheweather.
最新回复
(
0
)