首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮,有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”:再画2个名称分别为Text1
在考生文件夹下有一个工程文件sjt5.vbp,窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮,有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”:再画2个名称分别为Text1
admin
2016-01-31
46
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮,有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”:再画2个名称分别为Text1和Text2、初始内容都为空的文本框,并且可多行显示,有乖直滚动条,如图3-47所示。程序功能如下:
1)单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个正整数读入数组A,并将它们显示在Text1文本框中;
2)单击“排序”按钮,则首先将这100个数中的所有完全平方数放入数组B中,并将它们按降序排列显示在Text2文本框中。
提示:一个整数若是另一个整数的平方,那么它就是完全平方数。如144=12
2
,所以144就是一个完全平方数。
要求:去掉注释符,把?改为正确内容,并添加代码使得“排序”命令按钮的Click事件过程可以实现上述功能。
提示:Sort过程可以把求出的完全平方数进行排序,可以直接调用。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“排序”,且须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
审题分析 程序设计思路:通过For循环逐一取出数组a中的100个元素,依次判断每个元素是否是完全平方数。判断完全平方数的过程只需要将该数组元素开平方根以后取整,若其和数组元素开平方根的结果相等,则意味着该数组元素的平方根是一个整数,该数为完全平方数,将该数放入数组b中。 sort过程的作用是将数组进行排序,该过程有两个参数,第一个参数为待排序的数组,第二个参数为要排序的元素个数,根据题意为数组b排序的语句为Call sort(b,n)。 操作步骤 步骤1:打开考生文件夹下的工程文件sjt5.vbp,在码编辑窗口的指定位置输入以下代码: 参考代码: ′考生编写的代码 n=0 For k=1 To 100 If a(k)>0 Then d=Sqr(a(k)) If Int(d)=d Then n=n+1 b(n)=a(k) End If End If NeXt ′考生编写代码结束 步骤2:在代码编辑窗口中,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: Call sort(b,n) 步骤3:按
键运行程序,单击“读数据”按钮,然后单击“排序”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。 考点链接 数组定义与操作、Sub过程和函数过程、参数传递。
解析
转载请注明原文地址:https://kaotiyun.com/show/YuLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对于长度为n的线性表,在最坏情况下,下列各种排序法所对应的比较次数中正确的是()。
如果在C盘当前文件夹下已存在名称为studata.dat的顺序文件,那么执行语句Open"C:\studata.dat"ForAppendAs#1之后,将
下列叙述中正确的是
把窗体的KeyPreview属性设置为True,然后编写如下事件过程:PrivateSubForm_KeyPress(KeyAsciiASInteger)DimchAsStringch=Chr(KeyAscii)
软件工程研究的内容主要包括:【】技术和软件工程管理。
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项"大图标",则在该菜单项前添加一个"√"。以下正确的事件过程是
在窗体上画一个名称为List1的列表框,列表框中显示若干城市的名称。当单击列表框中的某个城市名时,该城市名消失。下列在List1_Click事件过程中能正确实现上述功能的语句是
要将窗体Form1标题设为“学习VB”,以下能正确实现该功能的语句为
关于变量作用域,下列叙述中正确的是()。
随机试题
(2014年)根据证券法律制度的规定,下列主体中,对招股说明书中的虚假记载承担无过错责任的是()。
道家的管理思想。
患儿,女,3岁,自幼青紫,发热、咳嗽2天,今晨哭闹后突然出现抽搐入院。体温37.8℃,咽充血,心前区隆起,胸骨左缘闻及心杂音,双肺无干湿啰音,指(趾)端发绀明显。胸部X线检查,肺段凹陷,肺心片缩小,肺野透亮度增加,呈网状肺纹理、“靴形”心。目前该患儿应
在工程咨询服务招标中,评价技术建议书时,咨询公司的资历和经验部分通常所占权重为()。
下列关于职工取得量化资产的个人所得税税务处理的表述中,说法错误的是()。
“分析已知条件和未知条件,确定问题的主要矛盾,寻求解决矛盾的条件和方法”,这指的是知识应用四个基本环节中的()
研究人员对平均年龄为66岁的648名痴呆症患者进行研究。发现掌握两种语言的患者罹患痴呆的时间比只掌握一种语言的患者晚大约四年半。研究人员因此认为掌握两种语言可以延缓痴呆的发生。以下哪项如果为真,最能质疑上述结论?()
若有如下程序段:intn=1O;while(1)n--;printf("%d";n);则while循环执行的次数是()。
ThelargestuniversityinCanadais______University.
Peopletravelinglongdistancesfrequentlyhavetodecidewhethertheywouldprefertogobyland,sea,orair.Hardlycananyon
最新回复
(
0
)