1、国家二级（ VB）机试模拟试卷 107及答案与解析 一、选择题 1 设某二叉树的后序序列为 CBA，中序序列为 ABC，则该二叉树的前序序列为 （ A） BCA （ B） CBA （ C） ABC （ D） CAB 2 下列叙述中正确的是 （ A）存储空间不连续的所有链表一定是非线性结构 （ B）结点中有多个指针域的所有链表一定是非线性结构 （ C）能顺序存储的数据结构一定是线性结构 （ D）带链的栈与队列是线性结构 3 算法时间复杂度的度量方法是 （ A）算法程序的长度 （ B）执行算法所需要的基本运算次数 （ C）执行算法所需要的所有运算次数 （ D）执行算法所需要的时间 4 设循环队列为
2、 Q(1: m)，初始状态为 front=rear=m。现经过一系列的入队与退队运算后， front=rear=1，则该循环队列中的元素个数为 （ A） 1 （ B） 2 （ C） m-1 （ D） 0或 m 5 计算机软件的构成是 （ A）源代码 （ B）程序和数据 （ C）程序和文档 （ D）程序、数据及相关文档 6 下面不属于软件设计阶段任务的是 （ A）软件的详细设计 （ B）软件的总体结构设计 （ C）软件的需求分析 （ D）软件的数据设计 7 下面属于黑盒测试方法的是 （ A）边界值分析法 （ B）基本路径测试 （ C）条件覆盖 （ D）条件 -分支覆盖 8 一名雇员就职于一家公司
3、，一个公司有多个雇员。则实体公司和实体雇员之间的联系是 （ A） 1:1联系 （ B） 1:m联系 （ C） m:1联系 （ D） m:n联系 9 有关系 R如下，其中属性 B为主键： 则其中最后一个记录违反了 （ A）实体完整性约束 （ B）参照完整性约束 （ C）用户定义的完整性约束 （ D）关系完整性约束 10 在数据库系统中，用于对 客观世界中复杂事物的结构及它们之间的联系进行描述的是 （ A）概念数据模型 （ B）逻辑数据模型 （ C）物理数据模型 （ D）关系数据模型 11 以下合法的 VB变量名是 （ A） x_y （ B） Print （ C） _b （ D） m-n 12 以
4、下关于 VB的叙述中，错误的是 （ A） VB的窗体模块只包含由控件组成的窗体 （ B）在 VB集成开发环境中，既可以运行程序，也可以调试程序 （ C） VB采用事件驱动的编程机制 （ D） VB程序可以编译为 .exe文件 13 VB工程文件的扩展名是 （ A） .vbp （ B） .frm （ C） .vbg （ D） .bas 14 设有数组声明语句如下： Dim a(-1 to 2, ,0 to 5) a所包含的数组元素个数是 （ A） 24 （ B） 20 （ C） 18 （ D） 15 15 能够被窗体或控件所识别的操作称为 （ A）事件 （ B）方法 （ C）过程 （ D）属性
5、16 函数表达式 Sgn(-10)的值是 （ A） -1 （ B） 0 （ C） 1 （ D） 10 17 设： a = 3， b = 5， c = 4， d = 7，表达式 a d) Or Not( b y, “go“, “back“)。以下与该表达式具有相同功能的语句是 （ A） If y = y Then A = “go“ Else A = “back“ End If （ C） If y 0 Sum = Sum + ( _ ) k = k 10 Loop Print Sum End Sub 程序不完整，应该在 _ 处填写的内容是 （ A） k Mod 10 （ B） k （ C） lef
6、t(CStr(k), 1 （ D） mid (CStr(k), 1， 1) 40 窗体上有一个名称为 Command1的命令按钮，一个名称为 List1的列表框。命令按钮的单击事件过程如 下： Private Sub Command1_Click() Open “c:f1.txt“ For Input As #1 Do While Not EOF(1) Input #1, str1 List1.AddItem str1 Loop Close End Sub 对于上述程序，以下叙述中错误的是 （ A）以输入方式打开随机文件 f1.txt （ B） Close的作用是关闭已经打开的数据文件 （ C
7、）单击命令按钮后，把 f1.txt中的所 有内容添加到列表框中 （ D）运行程序后，列表框中的列表项都是 f1.txt中的记录 二、基本操作题 41 (1)在名称为 Form1的窗体上添加两个名称分别为 Frame1、 Ftame2的框架，标题分别为 “字号 ”、 “修饰 ”；在 Frame1 中添加两个单选按钮，名称分别为 Option1、Option2，标题分别为 “10号字 ”、 “20号字 ”，且标题显示在单选按钮的左边；在Frame2中添加一个名称为 (： beckl的复选框，标题为 “下划线 ”。程序运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件 名保存为sj
8、t1 vbp，窗体文什名保存为 sjt1 frm。 (2)在名称为 Form1的窗体上从上到下添加两个文本框，名称分别为 Text1、Text2；再添加一个命令按钮，名称为 Command1，标题为 “选中字符数是 ”。程序运行时，在 Text1中输入若干字符，选中部分内容后，单击 “选中字符数是 ”按钮，则选中的字符个数显示在 Text2中 (如图所示 )。请编写按钮的 Click事件过程。 要求：程序中不得使用变量，事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为 sjt2 vbp，窗 体文件名保存为 sjt2 frm。三、简单应用题 42 (1)在考生文什
9、央下有一个工程文件 sjt3 vbp，窗体上有一个圆和一个矩形，还有水平和垂直滚动条各一个。程序运行时，移动某个滚动条的滚动块，可使圆做相应方向的移动。滚动条刻度值的范围是圆可以在矩形中移动的范围。以水平滚动条为例，滚动块在最左边时，圆靠在矩形的左边线上，如图 1所示；滚动块在最右边时，圆靠在矩形的右边线上，如图 2所示。垂直滚动条的情况与此类似。 已经给出了全部控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的 ?改为正确的内容 。 注意：不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件 sjt4 vbp。窗体中已经给出了所有控件
10、，如图所示。程序运行时，单击 “发射 ”按钮，航天飞机图标将向上运动，速度逐渐加快，全部进入图片云中后则停止，并将飞行距离 (用坐标值表示 )和所用时间 (单位为秒 )分别显示在标签 Label1和 Label2中；单击 “保存 ”按钮，则把飞行距离和所用时间存入考生文件夹下的 out4 txt文件中。 已经给出了程序，但不完整，请去掉程序中的注释符。把程序中的 ?改为正确 的内容。 注意：不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。 四、综合应用题 43 考生文件夹下有一个工程文件 sjt5 vbp。运行程序后，从文件中读出数据，将其放入一个 55的二维数组 a中。请
11、编写程序，找出数组 a中每行的最大值及该值在行中的次序 (列下标 )，并将所找到的结果分别保存到一维数组 b、 c中 (a中第一行的最大值保存在 b(1)中，最大值的列次序保存在 c(1)中 )。 注意：不能修改程序的其他部分和控件属性，最后将修改后的文件按原文什名存盘。程序调试通过后，命令按钮的 事件过程必须至少执行一次。 国家二级（ VB）机试模拟试卷 107答案与解析 一、选择题 1 【正确答案】 C 【试题解析】 二叉树遍历可以分为 3种：前序遍历（访问根节点在访问左子树和访问右子树之前）、中序遍历（访问根节点在访问左子树和访问右子树两者之间）、后序遍历（访问根节点在访问左子树和访问右
12、子树之后）。后序序列为CBA，则 A为根节点。中序序列为 ABC，则 B和 C均为左子树节点或右子树节点，且 B为 C父节点，可知前序序列为 ABC， C选项正确。 2 【正确答案】 D 【试题解析】 一个非空 的数据结构如果满足以下两个条件：有且只有一个根节点；每一个节点最多有一个前件，也最多有一个后件，称为线性结构，称为线性表，可以采用顺序存储和链接存储，其中链式存储空间不连续，所以 A选项错误。双向链表节点有两个指针域，指向前一个节点的指针和指向后一个节点的指针，也是线性结构， B选项错误。顺序存储结构中可能根节点不唯一，故可能不是线性结构， C选项错误。栈是所有的插入与删除都限定在表的
13、同一端进行的线性表；队列是指允许在一端进行插入，而在另一端进行删除的线性表。 D选项正确。 3 【正确答案】 B 【试题解 析】 算法的时间复杂度是指执行算法所需要的计算工作量，算法的计算工作量是用算法所执行的基本运算次数来度量的， B选项正确。 4 【正确答案】 D 【试题解析】 由初始状态为 front=rear=m可知此时循环队列为空。入队运算时，首先队尾指针进 1（即 rear+1），然后在 rear指针指向的位置插入新元素。特别的，当队尾指针 rear=m+1时，置 rear=1。退队运算时，排头指针进 1（即front+1），然后删除 front指针指向的位置上的元素，当排头指针
14、front=m+1时，置 front=1。若经过 运算， front=rear可知队列空或者队列满， D选项正确。 5 【正确答案】 D 【试题解析】 计算机软件由两部分组成：一是机器可执行的程序和数据；二是机器不可执行的，与软件开发、运行、维护、使用等有关的文档。 D选项正确。 6 【正确答案】 C 【试题解析】 软件生命周期分为：软件定义期、软件开发期、运行维护期。软件设计属于软件开发期任务，通常又分为概要设计和详细设计两个阶段，给出软件的结构、模块的划分、功能的分配以及处理流程。需求分析属于软件定义期任务， C选项正确。 7 【正确答案】 A 【试题解析】 黑盒测试是把程序看成一只黑盒子
15、，测试者完全不了解，或不考虑程序的结构和处理过程。它根据规格说明书的功能来设计测试用例，检查程序的功能是否符合规格说明的要求。常用的黑盒测试方法和技术有：等价类划分法、边界值分析法、错误推测法和因果图等， A选项正确。白盒测试的主要技术有逻辑覆盖测试（语句覆盖、路径覆盖、判断覆盖、条件覆盖）、基本路径测试等，B、 C、 D选项错误。 8 【正确答案】 B 【试题解析】 一般来说，实体集之间必须通过联系来建立联接关系，分为 3类：一对 一联系（ 1:1）、一对多联系（ 1:m）、多对多联系（ m:n）。一个公司与多个雇员的关系为 1:m联系， B选项正确。 9 【正确答案】 A 【试题解析】 关
16、系模型中可以有 3类完整性约束：实体完整性约束、参照完整性约束和用户定义的完整性约束。实体完整性约束是指，若属性 M是关系的主键，则属性 M中的属性值不能为空值。属性 B为主键，最后一个记录为空，违反了实体完整性约束， A选项正确。 10 【正确答案】 A 【试题解析】 数据模型按照不同的应用层次分为以下 3种类型：概念数据模型，着重于对客观世界复杂 事物的描述及对它们内在联系的刻画；逻辑数据模型，是面向数据库系统的模型，着重于在数据库系统一级的实现；物理数据模型，是面向计算机物理实现的模型，此模型给出了数据模型在计算机上物理结构的表示。 A选项正确。 11 【正确答案】 A 【试题解析】 在
17、 VB中，保留字不能作为变量名， B选项中 Print为保留字，故B选项错误；变量名的第一个字符必须是英文字母，故 C错误。变量名只能由字母、数字、下划线组成，故 D错误； A选项符合变量的命名规则，故 A项正确。 12 【正确答案】 A 【试题解析】 在 VB中 ，每个窗体模块分为两部分，一部分是作为用户界面的窗体，另一部分是执行具体操作的代码，故 A项错误。在集成开发环境中，即可运行程序，也可调试程序， B项表述正确。 VB是面向对象的， VB的每个窗体和控件都有一个预定义的事件集，当其中的某个事件发生，并且在相关联的事件过程中存在代码时， VB将执行这些代码，故 VB是采用事件驱动的编程
18、机制， C选项表述正确； VB程序可编译为 .exe文件， D选项表述正确。 13 【正确答案】 A 【试题解析】 在 VB中，工程文件的扩展名为 .vbp；窗体文件的扩展名 .frm；工程组文 件的扩展名 .vbg；模块文件的扩展名 .bas。 14 【正确答案】 A 【试题解析】 题目所定义的二维数组 a，第一维的下界为 -1，上界为 2，共 4个（ -1， 0， 1， 2）；第二维的下界为 0，上界为 5，共 6个（ 0， 1， 2， 3， 4， 5），故所含元素个数为 4*6=24，选择 A项。 15 【正确答案】 A 【试题解析】 VB的每个窗体和控件都有一个预定义的事件集，当其中的
19、某个事件发生，并且在相关联的事件过程中存在代码时， VB将执行这些代码。故选择 A项正确。 16 【正确答案】 A 【试题解 析】 Sgn(x)英文全称 Signal(x)，即求变量 x的符号。符号函数 Sgn（ x）返回自变量 x的符号（ x为正数，返回 1； x为负数，返回 -1； x为 0，返回0）。题目中函数表达式 Sgn(-10)返回 -1，故选 A项。 17 【正确答案】 A 【试题解析】 题目中的 Not、 And、 Or属于逻辑运算符， 、 d) Or Not( b d为 假， b y, “go“, “back“)意思是如果 x y,则 A的值为 “go“，否则 A的值为 “b
20、ack“。观察四个选项，和 A=IIf(x y, “go“, “back“)意思相同的只有 A项，故选择 A项。 19 【正确答案】 A 【试题解析】 默认情况下，整个应用程序是从设计时的第一个窗口开始执行的，如果先执行 Sub Main过程，必须通过手动方式设置，故 A项表述错误。不能把标准模块设置为启动模块，故 B项表述正确。 Hide方法功能是将窗体隐藏起来，但窗体仍在内存中，还可以引用窗体中的控件及各种属性，故选项 C表述正确；Show方法 功能是将窗体装入内存并显示出来，故 D项表述正确。 20 【正确答案】 A 【试题解析】 随机文件记录中的每一条记录的长度是固定的，记录中的字段的
21、长度也是固定，但各个字段长度并不一定是相同的，故 A项表述正确， C表述错误。用 Append方式打开的文件，指定文件顺序输出方式，并向文件的尾部追加写入数据，故只进行写操作，不进行读操作，故 B选项表述错误。随机文件占用的空间较大，而顺序文件占用空间少，容易使用，故 D表述错误。 21 【正确答案】 A 【试题解析】 Cls方法用来清除由 Print方法显 示的文本或在图片框中显示的图形。故选择 A项。 22 【正确答案】 A 【试题解析】 当 Enabled属性为 False时，禁用文本框，同时 Tab顺序也不起作用，故 A项表述正确；当 TabStop属性为 false时， Tab不起作
22、用，但能够接收从键盘输入的数据，故 B项表述错误。 当获得焦点时，触发 SetFocus事件，故选项C错误。 PasswordChar属性用来指定显示在文本框中替代的字符，若PasswordChar属性设为 “a“,将会显示出 “*“；若 PassWord属性设为 “a“，则输入到文本框的字符 将显示为 “a“，故选项 D表述错误。 23 【正确答案】 A 【试题解析】 容器是包含其它对象的对象。图像框控件主要作用显示图片，不能放其他控件，故 A不能做容器。框架是一个容器控件 ,用于将屏幕上的对象分组，不同的对象可以放在一个框架中；图片框是一个完整的图形控件，可以作为其他对象的容器。选项 B、
23、 C和 D都可以作为容器使用。故选 A。 24 【正确答案】 A 【试题解析】 当执行 Unload事件后，从当前的内存中清除窗体，包括关闭和执行 Unload语句所触发的事件，故 A项表述错误。当窗体的 Enabled属性为 False时，窗体被禁止，不能响应鼠标、键盘操作，故 B项表述正确。 KeyPreview属性决定是否在控件的键盘事件之前激活窗体的键盘事件， KeyPreview属性为 True时，窗体能优先响应键盘事件， C项表述正确。 Load事件主要用来在启动程序时对属性和相关变量进行初始化，在装入窗体后，如果运行程序，将自动触发该事件，故 D项表述正确。 25 【正确答案】
24、A 【试题解析】 Picture属性可给命令按钮指定一个图片，在 Style属性值为 1的情况下， Picture的属性才有效，也就是当 Style属性为 0时， Picture属性无效，故选择 A项。 26 【正确答案】 A 【试题解析】 列表框中，用户可以选择一个或多个选项，选项 A表述错误。Sorted属性指定控件中的项目是否自动按字母顺序排列， True表述列表中的项目按字母顺序排列，选项 B表示正确。 ListCount属性表述列表框中表项的个数， C项表述正确。 AddItem方法用来在列表框中插入一个项目，参数中的索引值能够将列表项添加到列表框指定的位置，故 D项表述正确。 27
25、 【正确答案】 A 【试题解析】 Value属性表 述滚动块在滚动条中的当前位置， SmallChange用来设置单击滚动条两端箭头时， Value增加或减少的增量值，则 Value属性值的变化量是 SmallChange属性的值， A项正确。当 Value属性值等于 Max属性值时，滚动块位于滚动条的最上部，故选项 B错误。当拖动滚动框时触发 Scroll事件，但当滚动框的位置改变时，触发 Change事件，故选项 C错误。 Min、 Max属性值表述滚动条能达到的最小值和最大值，其取值范围在 -32768 32767，选项 D错误。 28 【正确答案】 B 【试题解析】 如 果光标移到某个
26、位置，按下鼠标键，则产生 MouseDown事件，其中（ x， y）是光标当前所处位置坐标，故选项 A正确。建立弹出式菜单通常分两步进行，首先用菜单编辑器建立菜单，然后用 PopupMenu方法弹出显示，故选项 B错误，不是窗体事件。 PopupMenu方法用来显示弹出式菜单， PopupMenu 后接菜单名。菜单名是在菜单编辑器中定义的主菜单项名，故选项 C正确。通常把 PopupMenu方法放在 MouseDown事件中，该事件响应所有的鼠标单击事件。对于两个键的鼠标来说，左键的 Button参数值为 1，右键的 Button参数值为 2，因此 If Button And 2 条件语句无效
27、，即只要按下鼠标键，不论是左键还是右键都能触发 PopupMenu。故选项 D正确。 29 【正确答案】 A 【试题解析】 程序的功能并不是打开 FileName属性值的文件，而是建立并打开一个文件对话框， A选项表述错误。 FileName属性用来设置文件的路径及文件名。在文件对话框中显示一系列文件名，如果选择了一个文件并单击 “打开 “或 “保存 “按钮就会把该文件名作为要打开或保存的文件。 CD1.ShowOpen将对话框设置成打开对话框， 故 B项表述正确。 DialogTitle属性设置对话框的标题，题目中设置为 Open File，故 C选项表述正确。 Filter属性是用来指定对
28、话框中显示的文件类型，它的属性值有一对或多对文本字符串组成，每对字符串用 “|“隔开， “|“前面部分为描述符，后面部分一般为通配符和文件扩展名。 FilterIndex属性是指定默认的过滤器，当 Filter属性设置为多个过滤器后，每个过滤器都有一个值，本文中FilterIndex=2，则默认的文件类型为 *.Doc，故 D选项表述正确。 30 【正确答案】 A 【试题解 析】 若可见属性被标记为 “，则允许时菜单项可见， A项表述错误。菜单中如果 Enabled属性被设置为 False，即 “有效 “选项未被标记，则相应的菜单项变 “灰 “，不响应用户事件， B项表述正确。菜单中各菜单项可
29、以为控件数组元素，其分隔条必须是唯一的，故 C和 D项表述均正确。 31 【正确答案】 A 【试题解析】 程序大意是，当输入的数字为负数时， y=x*（ -1）；当输入数字为0时， y=0*5=0；当输入数字为正数时， y=x*1+1。经过验证， B项， C项， D项表述都正确。对于 A项，当输入值为 2时， y=3，故 A项表述错误。 32 【正确答案】 A 【试题解析】 Step -1表述步长为 -1， For循环体从 i=5执行到 i=1（ i=5,4,3,2,1）。 T和 S默认值为 0，当 i=5时， T=0*10+1=1， S=0+1=1；当 i=4时， T=1*10+1=11，
30、S=1+11=12；当 i=3时， T=111， S=123；依次类推，当 i=1时， T=11111， S=12345，故选择 A项。 33 【正确答案】 A 【试题解析】 本程序主要是先定义 a(5, 5)的数组，然后当 i从 1到 5时， j从 1到5时，对二 维整型数组 a(5,5)中的部分元素赋值 a(i,j) =i +j，最后输出数组 a中的这部分元素值，得到 A项的显示结果。 34 【正确答案】 A 【试题解析】 a参数是传地址的，即变量将地址传递给实参 a， a的变化能改变了变量的值； ByVal在参数 b前，表明参数 b是传值参数，将变量值传给实参 b，b的变化不影响变量变化
31、。调用 p（ x， y），变量 x将地址传递给实参 a，变量 y将值传递给实参 b， a=4*2=8， b=5+2=7， z=15。 a的变化，改变了 x的值，x=a=8， b的变化并不改变 y的值， y仍为 5， z为 15，故选择 A项。 35 【正确答案】 A 【试题解析】 本题中， Rnd（ x）是一个随机函数，它能产生一个 0到 1之间（不包括 0和 1）之间的单精度随机数，其中变量 x是种子数，若省略 x， Rnd函数采用系统时间为种子值。 Randomize省略了参数，用系统计时器 返回的值作为新的种子值，如果没有使用 Randomize，则（无参数的） Rnd函数使用第一次调用
32、 Rnd函数的种子值， Randomize避免同一序列随机数反复出现， 故 B项表述正确。本程序中定义a(5, 5)的数组，这个数组对角线上数值为 1，其余元素值为 Int（ rnd*50），除了对角线上元素，其余元素被赋予随机值。故 A表述错误， D表述正确。 Rnd的范围在 0到 1之间，故 rnd*50的范围在 0到 50之间（不包括 0和 50）， Int(Rnd * 50)值为不大于（ Rnd * 50）的最大整数，即范围是大于等于 0且小于 50， C表述正确。 36 【正确答案】 A 【试题解析】 判断是否回车，可通过判断当前按键 ASCII码是否为 13, C选项表述正确。通过
33、 For循环，利 用 If Combo1.Text = Combo1.List(i)语句，依次将输入的文本与组合框中的选项逐一比较，若输入文本和其中一个选项相同，那么 flag赋值为 True，表明该字符串在组合框中已存在。如果 For循环完毕， flag仍为False，意味着字符串在组合框中不存在，则通过 Combo1.AddItem Combo1.Text语句将其添加到组合框中。这个程序中， For循环是必要的， A选项表述错误，B， D选项表述正确。 37 【正确答案】 A 【试题解析】 复选框中的 Value属性用来返回或设 置复选的状态，值取 0时，表示没有选中复选框， 1表示选中复
34、选框， 2为该复选框为禁止。故进行修改应在第一个 If条件中将 “If Index=1 And Check1(1).Value“ 改为 “If Check1(1).Value“。这是因为当勾选斜体项时， Check1(1).Value为 True，设置文本为斜体，否则将文本不设置为斜体。故选择 A。 38 【正确答案】 A 【试题解析】 由图和程序可知， A项表述正确。执行 Form2的命令按钮单击事件过程，只显示 Form1，对 Form2没有设置相关隐藏操作 ，故 B选项表述错误。Form1的 2个菜单命令一个是隐藏 Form1，一个是显示 Form2，故 C错误。执行Form2的命令按钮
35、单击事件过程不会出错，因为窗体已经初始化了，故 D错误。 39 【正确答案】 A 【试题解析】 k = Val(InputBox(“输入正整数： “)的意思是将输入对话框中输入的数据转换成数字赋给变量 k。 在内层循环中，循环体的意思是将 k除 10的余数（ k mod 10）加入到 sum变量中，然后 k重新赋值， k除以 10的整数赋值给 k。执行循环体，直到 k=0为止。最后得到的 sum就是 输入整数的各位数字之和，故选择 A项。 40 【正确答案】 A 【试题解析】 FreeFile函数返回一个整数，即下一个可供 OPEN语句使用的文件号， EOF函数用来返回测试文件的结束状态，对于
36、顺序文件来说，如果已达到文件尾，则函数返回值为 True，否则返回值为 False。利用 EOF函数，可以避免在文件输入时出现 “输入超出文件尾 “的错误。 EOF（ 1）的含义是已到达文件号为 1的文件尾， Not EOF(1)的含义是没有到达文件号为 1所对应文件的末尾。 Open语句兼有打开文件和建立文件两种功能。题 目中采用 Input方式打开文件，指定文件顺序输入方式，故 Open打开的是顺序文件。故 A项错误。 Close作用是关闭一个文件，在本题中作用是关闭已经打开的数据文件，故 B选项表述正确。 Input是从一个顺序文件中读出一个数据项，并把它赋值给一个变量。 Input #
37、1, str1和 List1.AddItem str1两个语句通过 str1，将文件中的一个数据项添加到List1中，如此循环，直到文件末尾，程序运行结束， f1.txt中的所有内容被添加到列表框中，列表框中的列表项都是 f1.txt中的记录。故 C,D项表述 正确。 二、基本操作题 41 【正确答案】 步骤 1：建立界面，添加相应的控件并设置控件的属性。程序中的控件及属性见表 3 43。步骤 2：调试并运行程序，关闭程序后按题目要求存柱。 (2)步骤 1：建立界面，添加相应的控件并设置控件的属性。程序中涉及的控件及属性见表 3 44。步骤 2：打开代码编辑窗口，在指定位置编写如下代码。 Pr
38、ivate Sub Commandl C1ick() Text2=Text1 SelLengthEnd Sub 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。 【试题 解析】 (1)通过框架的 Name和 Caption属性设置框架的名称和标题，通过单选按钮的 Name和 Caption属性设置单选按钮的名称和标题，通过复选框的Name和 Caption属性设置复选框的名称和标题。 (2)SelLength属性用于返回设置选定的字符数，通过文本框的 Name和Caption属性设置文本框的名称和标题，通过命令按钮的 Name和 Caption属性设置命令按钮的名称和标题。 三、简单应用题
39、 42 【正确答案】 步骤 1：打开本题工程文件。 步骤 2：打开代码编辑窗口，去 掉程序中的注释符 “”，将问号改为正确的内容。 Private Sub Form_load() HScroll1 Min=Shape2 Left HScroll1 Max=Shape2 Width+Shape2 LeftShape1 width确定水平滚动条的最大值 VScroll1 Min=Shape2 Top VScroli1 Max = Shape2 Height +Shape2 Top Shape1 Height确定垂直滚动条的最大值 ,使 Shape2不 能超过 Shapel的范围 HScrolii
40、Value=1000 VScrolii Value 1000 End Sub Private Sub HScrolll_hange() Shape1 Left HScroll1 Value 使 Shape1随水平滚动条的改变而改变 End Sub Private Sub VScrol 11_Change() Shape1 Top=VScrol11使 Shape1随垂直滚动条的改变而改变 End Sub 程序结束 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。 (2)步骤 1：打开本题工程文件。 步骤 2：打开代码编辑窗口，去掉程序中的注释符 “，将问号改为正确的内容。 Dim a， t，
41、 d Private Sub Commandl C1ick() Timer1 Enabled=True。 使 Timer1事件生效 d=Image1 Top保存飞机初始位置 End Sub Private Sub Command2 Click() Open App Path “、 out4 txt“For OutputAS#1 Print#1， Label1， Label2 将两个标签中的内容保存到文件中 Close#1 End Sub Private Sub FormLoad() a=1 t=0 End Sub Private Sub Timer1_Timer() Imagel Top=Image1_Topa*50 If Image1 Top+Image1 Height=Im。 age2 Top+Image2 Height-200 Then判断飞机是否已进入云朵 Timer1 Enabled=False若飞机已进入云朵。则停止移动。 Timer失效
