2017年9月计算机二级VB考试自测题及答案(3)

 　一、单选题

　　1). 以下关于多重窗体程序的叙述中，错误的是( ).

　　A.对于多重窗体程序，需要单独保存每个窗体

　　B.在多重窗体程序中，可以根据需要指定启动窗体

　　C.在多重窗体程序中，各窗体的菜单是彼此独立的

　　D.用Hide方法不仅可以隐藏窗体，而且还可以清除内存中的窗体

　　正确答案：D

　　答案解析：用Hide方法只是隐藏窗体，不卸载窗体，所以不会清除内存中的窗体。故选项D错误。

　　2). 以下关于焦点的叙述中，错误的是( )

　　A.如果文本框的TabStop属性为False，则不能接收从键盘上输入的数据

　　B.当文本框失去焦点时，触发LostFocus事件

　　C.当文本框的Enabled属性为False时，其Tab顺序不起作用

　　D.可以用TabIndex属性改变Tab顺序

　　正确答案：A

　　3). 当把框架的何属性设置为False时，其标题会变灰，框架中所有的对象均被屏蔽?

　　A.Name

　　B.Enabled

　　C.Caption

　　D.Visible

　　正确答案：B

　　4). 以下关于函数过程的叙述中，正确的是

　　A.函数过程形参的类型与函数返回值的类型没有关系

　　B.在函数过程中，过程的返回值可以有多个

　　C.当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递

　　D.如果不指明函数过程参数的类型，则该参数没有数据类型

　　正确答案：A

　　5). 下列关于别名和自联接的说法中，正确的是

　　A.SQL语句中允许在WHERE短语中为关系定义别名

　　B.为关系定义别名的格式为：

　　C.在关系的自联接操作中，别名是必不可少的

　　D.以上说法均正确

　　正确答案：C

　　6). 链表不具有的特点是

　　A.不必事先估计存储空间

　　B.可随机访问任一元素

　　C.插入删除不需要移动元素

　　D.所需空间与线性表长度成正比

　　正确答案：B

二、综合应用题

　　在考生文件夹下有一个工程文件sjt5.vbp，按照要求完成以下操作：

　　在名称为Forml的窗体上添加两个命令按钮，其名称分别为Cl和c2，标题分别为"读人数据"和"计算"(如图所示)。程序运行后，如果单击"读人数据"按钮，则调用题目所提供的ReadDatal和ReadData2过程读入datainl.txt和datain2.txt文件中的各20个整数，分别放入Arrl和Arr2两个数组中;如果单击"计算"按钮，则把两个数组中对应下标的元素相减，其结果放入第三个数组中(第1个数组的第n个元素减去第2个数组的第n个元素，其结果作为第3个数组的第n个元素。这里的n为1、2…20)，最后计算第3个数组各元素之和，把所求得的和在窗体上显示出来;并调用题目中给出的WriteData过程将所求得的和存人考生文件夹下的dataout.txt文件中。

　　注意：考生不得修改窗体文件中已经存在的程序，且必须执行一次，最后将修改后的文件以原来的文件名存盘。

 

　　参考答案

　　【考点分析】本题考点有：命令按钮的Name和Caption属性、OptionBase数组下标、Call语句、Print方法、For循环语句以及文件操作。

　　【解题思路】本题源程序已给出读文件中的数据和向文件中写数据的三个过程，只需适时调用它们，即在"读人数据"和保存过程中调用;要把数组Arrl和Arr2中对应下标的元素相减并把结果存入第3个数组中，需利用For循环逐一取出Arrl和Arr2对应元素;由于数组Arrl、Arr2及存储第3个数组和的变量要跨过程使用，因此需定义成窗体级变量;调用过程WnteData时需传递两个参数，分别是存入数据的文件名和存储第3个数组和的变量;语句0ptionBase1用于限定数组下标的下限，默认为1。

　　【操作步骤】

　　步骤1：打开本题工程文件，按照题目要求建立命令按钮控件并设置命令按钮的相应属性，程序中用到的控件及属性见表3.23。

 

　　步骤2：打开代码编辑窗口，在代码编辑窗口指定位置编写以下代码。

　　参考答案

　　PrivateSubCl_Click()

　　CallReadDatal´调用过程ReadDatal

　　CallReadData2´调用过程ReadData2

　　EndSub

　　PrivateSubC2_Click()

　　DimArr3(1To20)AsInteger

　　DimsumAsInteger

　　sum=0

　　Fori=1T020´将Arrl中对应于Arr2中的数

　　相减，结果存入Arr3中

　　Arr3(i)=Arrl(i)-Arr2(i)

　　sum=sum+Arr3(i)将Arr3中的元素累加

　　Nexti

　　Print"sum=";sum´在窗体打印sum

　　WriteData"dataout.txt"，sum

　　EndSub

　　步骤3：调试并运行程序，关闭程序后按题目要求存盘。