首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sit5.vbp,其窗体上有三个标签、三个文本框和两个命令按钮,均使用默认名称。程序的功能是: ①如果单击“读数据”命令按钮,则把考生文件夹下in5.dat文件中两组已按升序方式排列的数(每组30个数)分别读入数组A和B
在考生文件夹下有一个工程文件sit5.vbp,其窗体上有三个标签、三个文本框和两个命令按钮,均使用默认名称。程序的功能是: ①如果单击“读数据”命令按钮,则把考生文件夹下in5.dat文件中两组已按升序方式排列的数(每组30个数)分别读入数组A和B
admin
2016-12-29
47
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
在窗体上画一个通用对话框,其Name属性为Cont,再画一个命令按钮,Name属性为Commandl,然后编写如下事件过程:PrivateSubCommandlClick()Cont.FileName=“”Cont.Flags=vbOF
以下能判断是否到达文件尾的函数是()。
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是()。
软件按功能通常可以分为应用软件、系统软件和支撑软件(或工具软件)。Unix操作系统属于_________软件。
设有如下程序:OptionBase1PrivateSubFormClick()Dima(5)AsString,iAsIntegerFori=1TO5a(i)=Chr(Asc("A")+i)
以下关于函数过程的叙述中错误的是()。
以下能判断是否到达文件尾的函数是_________。
在窗体上设计两个复选框,一个显示粗体,另一个显示斜体,通过对复选框的选择,在一个文本框中显示相应效果的文本,请完成下列程序。PrivateSubForm_Load0Check1.Caption="显示粗体"Cheek2.Capfion="显示斜体
默认情况下,下面声明的数组的元素个数是Dima(5,一2To2)
在用Open语句打开文件时,如果省略“For方式”,则打开的文件的存在方式是______。
随机试题
下列哪部作品不是孔尚任所作()
腰椎间盘突出最重要的体征是()
A.渗出性炎症B.增生性炎C.两者皆有D.两者皆无(1991年)伤寒
丙种球蛋白制剂胎儿胸腺移植
治疗膏淋小便混浊,色白如米泔,宜选用的药物是()治疗热淋,小便淋沥涩痛,兼见心烦尿赤,口舌生疮,宜选用的药物是()
存款人可向开户银行提出撤销银行结算账户申请的情形有()。
甲出于报复动机将乙打成重伤,发现乙丧失知觉后,临时起意拿走了乙的钱包,钱包里有1万元现金,甲将其占为己有。关于甲取财行为的定性,下列哪些选项是不正确的()
不断对网络服务系统进行干扰,改变其正常的作业流程,执行无关程序使系统响应减慢甚至瘫痪属于网络威胁中的______。
Whendoeshistorybegin?Itistemptingtoreply’hithebeginning",butlikemanyobviousanswers,thissoonturnsouttobeun
A、Becausetodayisherbirthday.B、Becausesheisfreethisevening.C、Becauseit’stheman’sbirthday.D、Becausethemanislea
最新回复
(
0
)