首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sit5.vbp,其窗体上有三个标签、三个文本框和两个命令按钮,均使用默认名称。程序的功能是: ①如果单击“读数据”命令按钮,则把考生文件夹下in5.dat文件中两组已按升序方式排列的数(每组30个数)分别读入数组A和B
在考生文件夹下有一个工程文件sit5.vbp,其窗体上有三个标签、三个文本框和两个命令按钮,均使用默认名称。程序的功能是: ①如果单击“读数据”命令按钮,则把考生文件夹下in5.dat文件中两组已按升序方式排列的数(每组30个数)分别读入数组A和B
admin
2016-12-29
57
问题
在考生文件夹下有一个工程文件sit5.vbp,其窗体上有三个标签、三个文本框和两个命令按钮,均使用默认名称。程序的功能是:
①如果单击“读数据”命令按钮,则把考生文件夹下in5.dat文件中两组已按升序方式排列的数(每组30个数)分别读入数组A和B,并分别将它们显示在Text1、Text2中:
②如果单击“合并”命令按钮,则将A、B两个数组合并为另一个按升序方式排列的数组C,并将合并后数组C中的数据依升序方式显示在Text3中。
窗体中给出了所有控件(如图2.142所示)以及“读数据”命令按钮的Click事件过程,请完善“合并”命令按钮的Click事件过程,使其实现上述功能。
注意:不得修改已经存在的控件和程序,在结束程序运行之前,必须进行合并操作,且必须通过窗体右上角的“关闭”按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤l:打开考生文件夹下的本题工程文件sjt5.Vbp。 步骤2:编写“合并”按钮的单击事件过程。 参考代码: Private Sub Command2一Click() 考生编写程序开始 ia=1:ib=1:ic=1 Do While ia<=30 And ib<=30 If a(ia)
解析
转载请注明原文地址:https://www.kaotiyun.com/show/rnGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
没有数组定义语句:Dima(5)AsInteger,Listl为列表框控件。下列给数组元素赋值的语句错误的是()。
下列程序的执行结果为()。PrivateSubCommandlClick()DimXAsInteger,YAsIntegerx=12:y=20CallValue(x,y)Pri
模块独立性是软件模块化所提出的要求,衡量模块独立性的度量标准是模块的()。
软件按功能通常可以分为应用软件、系统软件和支撑软件(或工具软件)。Unix操作系统属于_________软件。
设有如下程序:OptionBase1PrivateSubFormClick()Dima(5)AsString,iAsIntegerFori=1TO5a(i)=Chr(Asc("A")+i)
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:PublicEnumsa==4b==3EndEnumPrivateSubCommandlClick()DimxASInteger
窗体t有一个名称为Shapel的形状控件和由三个命令按钮组成的名称为emd—Draw的控件数组。窗体外观如图所示(从上到下的3个命令按钮的下标值分别为0、1、2)。有事件过程如下:PrivateSubcmdDraw——Click(IndexAs
以下能判断是否到达文件尾的函数是_________。
在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000,Enabled属性设置为False。程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操
数据结构包括数据的逻辑结构、数据的【】以及对数据的操作运算。
随机试题
患儿,男,9岁,癫痫。CT示右顶叶表面有一裂隙,向内并延伸到侧脑体旁,侧脑室外侧可见一局限性突起与其相连。最可能诊断为
胸腔积液患者,其心尖搏动位置的改变为
地西泮常用来
舌前2/3的边缘或外侧淋巴管一部分到颌下淋巴结,另一部分到
能阻断洋地黄肝肠循环的药物是
下列关于施工总布置的说法错误的是()。
组合投资类理财产品只能满足一种期限类型客户的投资需求。()
什么是心智技能?它有哪些特点?
赵老师自从当上班主任之后,花在工作上的时间大大增多,辛勤的付出终于换来了班级面貌的改变,可是儿子的叛逆以及中考的落榜让他很内疚,自己虽然是合格老师,但却不是合格父亲,赵老师的身上出现了()
若软件项目组对风险采用主动的控制方法,则_____________是最好的风险控制策略。
最新回复
(
0
)