首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称为Textl、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为”取数”、”排序”、”存盘”。”取数”按钮的功能是把考生目录下的in5.dat文件中的5
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称为Textl、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为”取数”、”排序”、”存盘”。”取数”按钮的功能是把考生目录下的in5.dat文件中的5
admin
2013-10-18
31
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称为Textl、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为”取数”、”排序”、”存盘”。”取数”按钮的功能是把考生目录下的in5.dat文件中的50个整数读到数组中,并在Textl中显示出来;”排序”按钮的功能是对这50个数按升序排序,并显示在Text2中;”存盘”按钮的功能是把排好序的50个数保存到考生目录下的out5.dat文件中。如图2-146所示。
在窗体中已经给出了全部控件和部分程序,要求阅读程序并去掉程序中的注释符,把程序中的?改为正确的内容,并编写”排序”按钮的Click事件过程,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码: 参考代码: Private Sub C1_Click( ) Dim k As Integer Dim ch As String Open App.Path&”\in5.dat”For Input As #1 ch=““ For k=1 To 50 Input#1,a%(k%) ch=ch+Str(a(k))+” “ Next k Close#1 Textl.Text=ch$ End Sub Private Sub C2 Click( ) Dim k As Integer,i As Integer,j As Integer Dim ch As String For i=1 To 4 9 k=i For j=i+1 To 50 If a(k)>a(j)Then k=j End If Next j j=a(k) a(k)=a(i) a(i)=j Next i ch=““ For k=1 To 50 ch=ch+Str(a(k))+” “ Next k Text2.Text=ch End Sub 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按<F5>键运行程序,先单击”取数”按钮,再单击”排序”按钮,最后单击”存盘”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/AHQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数),现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1_Click()Dim
设有如下通用过程:PubficFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertstr=“”strL=Len(xStr)i=1DoWhilei
在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labell、Lubd2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommandl_Click()X=5:Y=3Callproc
(1)在考生文件夹下有一个工程文件sj3.vbp,窗体上有一个单选按钮数组,名称为Optionl,含4个单选按钮,它们的Index属性分别为O、1、2和3,标题依次为“Iteml”、“Itera2”、“Item3”和“Item4”,再画一个名称为Textl
在名称为Form1的窗体上有两个命令按钮(名称分别为COmmand1和command2、标题分别为“读取”和“保存”)和一个文本框(名称为Textl、MultiLine属性为True、ScrollBars属性为2)。要求程序运行后,如果单击“读取”按钮,则
(1)在名称为Forml的窗体上画一个名称为VScrolll的垂直滚动条,请在“属性”窗口中设置它的属性值,使之满足以下要求:它的最大刻度值为200,最小刻度值为l,在运行时鼠标单击滚动条上滚动块以外的区域(不包括两边按钮),滚动块移动20个刻度。再在滚动
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是______。
以下关于焦点的叙述中,错误的是______。
在软件开发中,下面任务不属于设计阶段的是
下列描述中,不是线性表顺序存储结构特征的是()。
随机试题
患者,男性,26岁,劳动中突然发生剧烈头痛,呕吐和意识不清,以蛛网膜下腔出血入院。护士体检中发现颈抵抗、颏胸距4横指,表示病人存在
8月10日,气温37℃,兽医院接诊一京巴犬,体温40.5℃。主诉该犬比较活跃,有啃咬家中物品习惯,因此常关于笼中置于家中南阳台,就诊当日中午回家发现该犬发病。抱出笼时已经开始呼吸困难,站立不稳、摇晃,盲目乱撞。如用中药治疗,应以下列哪个原则为主组方应用
某医师欲研究五种职业者的卫生保健知识水平的差别,按照规定,把卫生保健知识水平分成四个等级,以随机抽样方式对每种职业者调查了100人。在分析中应用秩和检验,查X2界值表,其自由度为
当水文地质条件不宜采用大开挖建造泵站及水池构筑物时可采用()。
建设工程文件归档整理中,属于施工文件的是( )。
下列关于企业价值评估范围的说法中,正确的是()。
真值0在原码、反码和补码机器数形式下()。
Inastate-of-the-artcleanroom,ascientisdressedinafull-bodycontainmentsuit,ahairnetandblueglovesispreparingso
InterviewTipsforCollegeStudentsMostofthestudentsarebusylookingforajobnow,hence,knowingsomeinterviewtips
【S1】【S8】
最新回复
(
0
)