首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮,有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”;再画2个名称分别为Text1
在考生文件夹下有一个工程文件sjt5.vbp,窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮,有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”;再画2个名称分别为Text1
admin
2019-05-14
30
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮,有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”;再画2个名称分别为Text1和Text2、初始内容都为空的文本框,并且可多行显示,有垂直滚动条,如图3-55所示。程序功能如下:
1)单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个正整数读入数组A,并将它们显示在Text1文本框中。
2)单击“排序”按钮,则首先将这100个数中的所有完全平方数放入数组B中,并将它们按降序排列显示在Text2文本框中。
提示:一个整数若是另一个整数的平方,那么它就是完全平方数。如144=12
2
,所以144就是一个完全平方数。
要求:去掉注释符,把?改为正确内容,并添加代码使得“排序”命令按钮的Click事件过程可以实现上述功能。
提示:Sort过程可以把求出的完全平方数进行排序,可以直接调用。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“排序”,且须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤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:按<F5>键运行程序,单击“读数据”按钮,然后单击“排序”按钮,最后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://jikaoti.com/ti/SSN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a中(每个
在名称为Form1的窗体上画一个名称为Image1的图像框,并通过属性窗口为其装入考生文件夹中的图标文件CARS.ico;再画一个名称为Timer1的计时器,一个名称为Command1、标题为“开始”的命令按钮,如图所示。要求:通过属性窗口设置适当的属性
在名称为Form1,标题为“组合框”的窗体上画1个名称为Combo1的组合框,利用属性窗口设置适当属性使其在程序刚开始运行时的界面如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sit1.vbp,窗体文件名为sit1.frm。
阅读程序:PrivateSubForm_Click()DimIAsInteger,JAsIntegerDimSAsIntegerc=1ForI=1To2ForJ=1To3S=S+3NextJNextI
为了使组合框能识别双击(DblClick)事件,应把它的Style属性设置为()。
设数据集合为D={1,2,3,4,5},下列数据结构B=(D,R)中为非线性结构的是()。
在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vb
以下关于VB对象属性的叙述中,错误的是
考生文件夹下的工程文件sjt2.vbp中有一个由直线Line1、Line2和Line3组成的三角形,直线Line1、Line2和IJne3的坐标值如下所示:名称X1Y1X2Y2Line160012001600300Line2600
设有如下事件过程:PrivateSubCommand1_Click()Fori=1To5j=iDoPrint"*"j=j-1LoopUntilj=0NextiEndSub运行程序,输出“*”的个数是
随机试题
有关肽键的叙述,错误的是
下列哪种方法可以减少影像的部分容积效应
全口义齿人工牙排列成平衡主要是为了
原发性肾小球疾病临床分类错误的是
依据《职业病防治法》的规定,()有违反本法规定的行为,分别给予警告、责令限期改正、1万元以上30万元以下的罚款、责令停止产生职业病危害的作业,或者提报有关人民政府按照国务院规定的权限给予责令停建、关闭的行政处罚。
某电梯安装工程,经电梯安装公司安装完毕后,电梯安装公司向业主提出了设备试运转申请,经有关单进行了系列试运转后,正式投入使用。[问题]1.设备试运转的目的是什么?2.设备试运转一般按怎样的顺序进行?3.设备空负荷试运转应具备哪些条件?4.联
对国务院部门或者省、自治区、直辖市人民政府的具体行政行为不服的,向做出该具体行政行为的国务院部门或者省、自治区、直辖市人民政府申请行政_____________。对此决定不服的,可以向人民法院提起行政_____________;也可以向国务院申请_____
随着互联网的不断发展,网购、网聊、微信、微博等已经成为人们不可或缺的生活方式。你认为这种生活方式对人们的生活有什么影响,请以“MyPerspectiveonInternet”为题,用英语写一篇短文,谈谈自己的一些想法。要求:(1)内容充实,语言流畅
化学测验试题的语言文字超出学生已有的理解水平,那么该测验属于()
证券组合的收益率序列方差是反映()的指标。
最新回复
(
0
)