1、二级 VISUAL+BASIC 笔试-425 及答案解析(总分：106.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.软件生命周期中所花费用最多的阶段是A) 详细设计 B) 软件编码C) 软件测试 D) 软件维护（分数：2.00）A.B.C.D.2.在结构化程序设计中，模块划分的原则是A) 各模块应包括尽量多的功能B) 各模块的规模应尽量大C) 各模块之间的联系应尽量紧密D) 模块内具有高内聚度，模块间具有低耦合度（分数：2.00）A.B.C.D.3.树是结点的集合，它的根结点数目是A) 有且只有 1 B) 1 或多于 1C) 0 或 1 D) 至少 2（分数：2
2、.00）A.B.C.D.4.下列工具中为需求分析常用工具的是( )。A) PAD B) PFDC) N-S D) DFD（分数：2.00）A.B.C.D.5.下列关于线性表的叙述中，不正确的是( )。A) 线性表可以是空表B) 线性表是一种线性结构C) 线性表的所有结点有且仅有一个前件和后件D) 线性表是由 n 个元素组成的一个有限序列（分数：2.00）A.B.C.D.6.对长度为 n 的线性表排序，在最坏的情况下，比较次数不是 n(n-1)/2 的排序方法是A) 快速排序 B) 冒泡排序 C) 直接插入排序 D) 堆排序（分数：2.00）A.B.C.D.7.在数据管理技术的发展过程中，可实现
3、数据共享的是A) 人工管理阶段 B) 文件系统阶段C) 数据库系统阶段 D) 系统管理阶段（分数：2.00）A.B.C.D.8.表达式 32*2+3MODl0/4 的值是( )。A18 B1 C19 D0（分数：2.00）A.B.C.D.9.数据库系统的核心是A) 数据库 B) 数据库管理系统 C) 模拟模型 D) 软件工程（分数：2.00）A.B.C.D.10.下列选项中，不属于数据模型所描述的内容的是( )。A) 数据类型 B) 数据操作 C) 数据结构 D) 数据约束（分数：2.00）A.B.C.D.11.下列 _ 是 Single 型变量。A) Time% B) Sheight! C)
4、 Name D) cxyz（分数：2.00）A.B.C.D.12.有如下 Sub 过程：Sub Sun(x As Single, y As Single)t=xx=t/yy=t Mod yEnd Sub在窗体上的命令按钮 Command1 中，编写如下事件过程，执行该事件过程调用 Sun 过程，结果为( )。Private Sub Command1_Click()Dim a As SingleDim b As Singlea=5b=4Sun a, bPrint a; bEnd SubA) 1.25 1 B) 5 4 C) 4 5 D) 1 1.25（分数：2.00）A.B.C.D.13.在运行
5、阶段，要在文本框 Text1 获得焦点时选中文本框中所有内容，对应的事件过程是) Private Sub Text1_GotFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub ) Private Sub Text1_LostFocus() Text1.SelStart=0Text1.SelLength=Len(Text1.Text)End Sub) Private Sub Text1_Change()Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub )
6、Private Sub Text1_SetFocus() Text.SelStart=0Text1.SelLength=Len(Text1.Text)End Sub（分数：2.00）A.B.C.D.14.下列叙述中错误的是A) Visual Basic 是采用了事件驱动编程机制B) Visual Basic 是面向过程的程序设计语言C) Visual Basic 是可视化程序设计语言D) Visual Basic 是面向对象的程序设计语言（分数：2.00）A.B.C.D.15.为了使标签中的内容居中显示，应把 Alignment 属性设置为( )。A) 0 B) 1 C) 2 D) 3（分数：
7、2.00）A.B.C.D.16.若看到程序中有以下事件过程，则可以肯定的是，当程序运行时Private SubClick_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Print “VB Program“End Sub) 用鼠标左键单击名称为“Command1“的命令按钮时，执行此过程) 用鼠标左键单击名称为“MouseDown“的命令按钮时，执行此过程) 用鼠标右键单击名称为“MouseDown“的控件时，执行此过程) 用鼠标左键或右键单击名称为“Click“的控件时，执行此过程（分数：2.00）A
8、.B.C.D.17.在使用打印直接输出信息时，下列哪个属性或方法实现了使文件结束打印( )。A) Print 方法 B) Page 属性C) NewPage 方法 D) EndDoc 方法（分数：2.00）A.B.C.D.18.以下能判断是否到达文件尾的函数是_。A) BOF B) LOC C) LOF D) EOF（分数：2.00）A.B.C.D.19.组合框是文本框和( )特性的组合。A) 复选框 B) 标签 C) 列表框 D) 目录列表框（分数：2.00）A.B.C.D.20.以下叙述中错误的是( )。A一个工程中可以包含多个窗体文件B在一个窗体文件中用 Public 定义的通用过程不能
9、被其他窗体调用C窗体和标准模块需要分别保存为不同类型的磁盘文件D用 Dim 定义的窗体层变量只能在该窗体中使用（分数：2.00）A.B.C.D.21.某人在窗体上画了一个名称为 Timer1 的计时器和一个名称为 Labe11 的标签，计时器的属性设置为Enabled=True，Interval=0，并编程如下。希望在程序运行时，可以每 2 秒在标签上显示一次系统当前时间。Private Sub Timer1_Timer()Labe11.Caption=TimeEnd Sub在程序执行时发现未能实现上述目的，那么，应作的修改是( )。A) 通过属性窗口把计时器的 Interval 属性设置为
10、2000B) 通过属性窗口把计时器的 Enabled 属性设置为 FalseC) 把事件过程中的 Labe11.Caption=Time语句改为 Timer1.Interval=TimeD) 把事件过程中的 Labe11.Caption=Time$语句改为 Labe11.Caption=Timer1.Time（分数：2.00）A.B.C.D.22.要使文本框获得输入焦点，则应采用文本框控件的A) GotFocus 方法 B) LostFocus 方法C) KeyPress 方法 D) SetFocus 方法（分数：2.00）A.B.C.D.23.使用 Public Const 语句声明一个全局
11、的符号常量时，该语句应放在_。A) 过程中 B) 窗体模块的通用声明段C) 标准模块的通用声明段 D) 窗体模块或标准模块的通用声明段（分数：2.00）A.B.C.D.24.假定用下面的语句打开文件：Open “File1.Txt“ For Input As #1则不能正确读文件的语句是( )。A) Input#1, ch$ B) Line Input#1, ch$C) ch$=Input$(5, #1) D) read#1, ch$（分数：2.00）A.B.C.D.25.窗体上画一个命令按钮，然后编写如下代码：Private Type RecordID As IntegerName As S
12、tring * 20End TypePrivate Sub command1 _ Click(Open “c: /file. txt“ for Input AsMaxSize = LOF (1)for NextChar =MaxSize To Step-1Seek #1, NextCharMyChar=Input(1，#1)Next NextCharPrint EOF(1)Close #1 End Sub程序运行后，单击命令按钮，其输出结果为_。A) True B) False C) 0 D) Null（分数：2.00）A.B.C.D.26.下列程序段的执行结果为( )。ForX=5 To 1
13、 Step-1For Y=1 To 6-XPrint Tab (Y+5)；“*“Next YPrintNext XA*B*C*D *（分数：2.00）A.B.C.D.27.Sub 过程与 Function 过程最根本的区别是( )。A)Sub 过程可以使用 Call 语句或直接使用过程名调用，而 Function 过程不可以B)Function 过程可以有参数，Sub 过程不能有参数C)两种过程参数的传递方式不同D)Sub 过程的过程名不能有返回值，而 Function 过程能通过过程名返回值（分数：2.00）A.B.C.D.28.要获得当前驱动器应使用驱动器列表框的哪个属性_。A) Path
14、 B) Drive C) Dir D) Pattern（分数：2.00）A.B.C.D.29.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )Dim n As IntegerFor n=0 To 9 Step 3Print rel(n)；Next nEnd SubPrivate Function tel(ByVal i As Integer)As IntegerDim x As Integerx=0For j=1 To iIf i5 Then rel=i：Exit Functionx=x+jNext jrel=
15、xEnd Function程序运行后，单击命令按钮，则窗体上显示的内容是_。A) 1 3 5 7 B) 2 8 14 53C) 0 3 21 45 D) 0 5 11 34（分数：2.00）A.B.C.D.30.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )Dim m(10)As IntegerDim b(3)As Integers = 0For i = 1 To 10m(i)= iNext iFor i = 1 To 3b(i)= m(i * i)Next iFor i = 1 To 3s = s + b(
16、i)* 3Next iPrint sEnd Sub程序运行后，单击命令按钮，则窗体上显示的内容是_。(A) 78(B) 10(C) 33(D) 42（分数：2.00）A.B.C.D.31.在下列关于菜单的说法中，错误的是A) 每个菜单项都是一个控件，与其他控件一样都有自己的属性和事件B) 除了 Click 事件之外，菜单项还能响应其他的(如 DblClick 等)事件过程C) 菜单项的快捷键不能任意设置D) 在程序执行时，如果菜单项的 Enabled 属性为 False，则该菜单项变成灰色，不能被用户选择（分数：2.00）A.B.C.D.32.设已经在窗体上添加了一个通用对话框控件 Commo
17、nDialog1，以下语句正确的是( )。A) CommonDialog1.Filter=ALLL Files |*.*|=|Pictures(*.Bmp)*.BmpB) CommonDialog1.Filter=“ALLL Files“|*.*|“Pictures(*.Bmp)“|*.BmpC) CommonDialog1.Filter=ALLL Files|*.*|Pictures(*.Bmp)|*.BmpD) CommonDialog1.Filler=“ALLL Files|*.*|Pictures(*.Bmp)|*.Bmp/（分数：2.00）A.B.C.D.33.在窗体中添加一个命令按
18、钮，名称为 Command1，然后编写如下程序：Private Sub Command1_Click( )Dim a As Integer，b As String，c As Integera=1234 : b=Str(a)c=Len(b)Print cEnd Sub程序运行后，单击命令按钮，则在窗体上显示的内容是_。A) 0 B) 5 C) 6 D) 7（分数：2.00）A.B.C.D.34.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z
19、As Integer)z = x * x + y * yEnd SubPrivate Sub Command1_Click( )Dim a As Integera = 8Call sub1(1, 2, a)Print aEnd Sub程序运行后，单击命令按钮，则窗体上显示的内容是_。(A) 8(B) 2(C) 5(D) 11（分数：2.00）A.B.C.D.35.在用 Open 语句打开文件时，如果省略“For 方式”，则打开的文件的存取方式是( )。A) 顺序输入方式 B) 顺序输出方式C) 随机存取方式 D) 二进制方式（分数：2.00）A.B.C.D.二、填空题(总题数：13，分数：36
20、.00)36.算法的基本特征主要包括四个方面，它们分别是可行性、确定性、_和拥有足够的情报。（分数：2.00）填空项 1:_37.软件定义时期主要包括 1 和需求分析两个阶段。（分数：2.00）填空项 1:_38.Visual Basic 的对象是 1 和控件的总称。（分数：2.00）填空项 1:_39.软件测试是保证软件质量的重要手段，而软件测试的主要和重要的测试方法是通过测试数据和 1 的设计来实现。（分数：2.00）填空项 1:_40.按“先进后出”原则组织数据的数据结构是 1。（分数：2.00）填空项 1:_41.下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以 4 余
21、 1，除以 5 余 2”条件，则在窗体上输山文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。Private Sub Command1_Click()x=Val(Text1.Text)If_ThenPrint xElse_Text1.Text=“End IfEnd Sub（分数：4.00）填空项 1:_42.列表框中有若干项，现在用 Timer 控件控制时间，每隔 100ms 删除一项，直到删完为止，用一个滚动条来显示删除的项目数，请将以下程序补充完整。（分数：6.00）填空项 1:_43.当对象得到焦点时，会触发 GotFocus 事件，当对象失去焦点时将触发 1 事件
22、。（分数：2.00）填空项 1:_44.在窗体上画一个名称为“Command1”的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a As Stringa=“123456789“For i=1 To 5Print Space(6-i);Mid$(a,_,2*i-1)Next iEnd Sub程序运行后，单击命令按钮，窗体上的输出结果是如下，请填空。5456345672345678123456789（分数：2.00）填空项 1:_45.文件根据数据性质，可分为U /U文件和U /U文件。（分数：2.00）填空项 1:_46.执行以下程序段，并输入
23、1.23，则程序的输出结果应是U /U。N= Str(InputBox(“请输入一个实数：”)p= InStr(N，“.“)Print Mid(N，p)（分数：2.00）填空项 1:_47.下面语句 Static x(7，8)As Double 定义了 1 个元素。（分数：2.00）填空项 1:_48.在当前目录下有一个名为 myfile.txt 的文本文件，其中有若干行文本。下面程序的功能是读入此文件中的所有文本行，按行计算每行字符的 ASCII 码之和，并显示在窗体上。请填空。Private Sub Command1_Click()Dim ch$, ascii As IntegerOpen
24、 “myfile.txt“ ForU /U As #1While Not EOF(1)Line Input #1, chascii=toascii(U/U)Print asciiWendClose #1End SubPrivate Function toascii(myStr$) As Integern=0For k=1 ToU/Un=n+Asc(Mid(myStr,k,1)Next ktoascii=nEnd Function（分数：6.00）填空项 1:_二级 VISUAL+BASIC 笔试-425 答案解析(总分：106.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.
25、00)1.软件生命周期中所花费用最多的阶段是A) 详细设计 B) 软件编码C) 软件测试 D) 软件维护（分数：2.00）A.B.C.D. 解析：解析 软件生命周期分为软件定义、软件开发及软件运行维护 3 个阶段。本题中，详细设计、软件编码和软件测试都属于软件开发阶段。维护是软件生命周期的最后一个阶段，也是持续时间最长，花费代价最大的一个阶段，软件工程学的一个目的就是提高软件的可维护性，降低维护的代价。2.在结构化程序设计中，模块划分的原则是A) 各模块应包括尽量多的功能B) 各模块的规模应尽量大C) 各模块之间的联系应尽量紧密D) 模块内具有高内聚度，模块间具有低耦合度（分数：2.00）A.
26、B.C.D. 解析：解析 在结构化程序设计中，一般较优秀的软件设计尽量做到高内聚、低耦合，这样有利于提高软件模块的独立性，也是模块划分的原则。3.树是结点的集合，它的根结点数目是A) 有且只有 1 B) 1 或多于 1C) 0 或 1 D) 至少 2（分数：2.00）A. B.C.D.解析：解析 树是一个或多个结点组成的有限集合，其中一个特定的结点称为根，其余结点分为若干个不相交的集合。每个集合同时又是一棵树。树有且只有 1 个根结点。4.下列工具中为需求分析常用工具的是( )。A) PAD B) PFDC) N-S D) DFD（分数：2.00）A.B.C.D. 解析：解析 需求分析常用的工
27、具有数据流图(DFD)、数据字典(DD)、判定树和判定表。 PAD(问题分析图)、PFD(程序流程图)、N-S(盒式图)都是详细设计的常用工具，不是需求分析的工具。5.下列关于线性表的叙述中，不正确的是( )。A) 线性表可以是空表B) 线性表是一种线性结构C) 线性表的所有结点有且仅有一个前件和后件D) 线性表是由 n 个元素组成的一个有限序列（分数：2.00）A.B.C. D.解析：解析 线性表是一种线性结构，由 n(n0)个元素组成，所以线性表可以是空表。但是在线性表中，第一个结点没有前件，最后一个结点没有后件，其他结点有且只有一个前件和后件，所以选项 C)是错误的。6.对长度为 n 的
28、线性表排序，在最坏的情况下，比较次数不是 n(n-1)/2 的排序方法是A) 快速排序 B) 冒泡排序 C) 直接插入排序 D) 堆排序（分数：2.00）A.B.C.D. 解析：解析 在最坏的情况下，快速排序、冒泡排序和直接插入排序需要的比较次数都是 n(n-1)/2，堆排序需要比较的次数为 nlog2n。7.在数据管理技术的发展过程中，可实现数据共享的是A) 人工管理阶段 B) 文件系统阶段C) 数据库系统阶段 D) 系统管理阶段（分数：2.00）A.B.C. D.解析：命题目的 本题考查了考生对数据库基础知识的记忆。解题要点 数据库技术的主要目的是有效地管理和存取数据资源，包括提供数据的共
29、享性，使多个用户能够同时访问数据库中的数据；减少数据的冗余度，以提交数据的一致性和完整性；提供数据与应用程序的独立性，从而减少应用程序的开发和维护代价。错解分析 数据库的人工管理阶段和文件系统阶段，数据都不能实现共享，出现数据冗余现象。选项 D)的说法是错误的。考点链接 掌握关系数据库的功能及特点。8.表达式 32*2+3MODl0/4 的值是( )。A18 B1 C19 D0（分数：2.00）A.B.C. D.解析：9.数据库系统的核心是A) 数据库 B) 数据库管理系统 C) 模拟模型 D) 软件工程（分数：2.00）A.B. C.D.解析：解析 数据库管理系统(Database Mana
30、gement System，简称 DBMS)是数据库的机构，它是一种系统软件，负责数据库中的数据组织、数据操纵、数据维护、控制及保护和数据服务等。数据库管理系统是数据库系统的核心。10.下列选项中，不属于数据模型所描述的内容的是( )。A) 数据类型 B) 数据操作 C) 数据结构 D) 数据约束（分数：2.00）A. B.C.D.解析：解析 数据模型描述的内容包含数据结构、数据操作和数据约束。11.下列 _ 是 Single 型变量。A) Time% B) Sheight! C) Name D) cxyz（分数：2.00）A.B. C.D.解析：解析 在 VB 中定义变量时，可采用 DIM
31、等语句来进行显式说明，也可以通过在变量名后加一个用于规定变量类型的说明字符，来规定变量的类型，这种方法称为“隐式说明”。字符与变量类型的对应关系请参看下表。说明字符 示例 类型% A% A 是整型变量bEnd SubA) 1.25 1 B) 5 4 C) 4 5 D) 1 1.25（分数：2.00）A. B.C.D.解析：解析 本题考查过程的调用，如果用 Call 句调用子过程时，实际参数要放在括号中，如果不使用 Call 子句，则不必使用括号。本题参数调用时是按地址传递，因此 Sun 过程中变量的值改变也即改变了单击事件中的 a、b 变量值。Sun a,b 的执行过程是：t=x=5,x=t/
32、y=1.25，y=t Mod y=1。13.在运行阶段，要在文本框 Text1 获得焦点时选中文本框中所有内容，对应的事件过程是) Private Sub Text1_GotFocus() Text1.SelStart=0 Text1.SelLength=Len(Text1.Text) End Sub ) Private Sub Text1_LostFocus() Text1.SelStart=0Text1.SelLength=Len(Text1.Text)End Sub) Private Sub Text1_Change()Text1.SelStart=0 Text1.SelLength=L
33、en(Text1.Text) End Sub ) Private Sub Text1_SetFocus() Text.SelStart=0Text1.SelLength=Len(Text1.Text)End Sub（分数：2.00）A. B.C.D.解析：解析 GotFocus 事件过程用以指定当控件或窗体首次接收焦点时发生的操作。属性：SelStart返回或设置所选择的文本的起始点。如果没有文本被选中，则指出插入点的位置；SelLength返回或设置所选择的字符数。14.下列叙述中错误的是A) Visual Basic 是采用了事件驱动编程机制B) Visual Basic 是面向过程的程序
34、设计语言C) Visual Basic 是可视化程序设计语言D) Visual Basic 是面向对象的程序设计语言（分数：2.00）A.B. C.D.解析：命题目的 考查考生对 Visual Basic 集成开发环境的了解情况。解题要点 Visual Basic 是面向对象，采用事件驱动机制的程序设计方法。考点链接 Visual Basic 基础知识。15.为了使标签中的内容居中显示，应把 Alignment 属性设置为( )。A) 0 B) 1 C) 2 D) 3（分数：2.00）A.B.C. D.解析：解析 本题考查 Alignment 属性。控件的 Alignment 属性表示控件中的
35、文字水平对齐方式，属性值可取 3 种值：0 为左对齐，1 为右对齐，2 为居中。16.若看到程序中有以下事件过程，则可以肯定的是，当程序运行时Private SubClick_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Print “VB Program“End Sub) 用鼠标左键单击名称为“Command1“的命令按钮时，执行此过程) 用鼠标左键单击名称为“MouseDown“的命令按钮时，执行此过程) 用鼠标右键单击名称为“MouseDown“的控件时，执行此过程) 用鼠标左键或右键单击名称为
36、“Click“的控件时，执行此过程（分数：2.00）A.B.C.D. 解析：解析 在鼠标单击事件过程中，Button 属性值为 1 时代表按下鼠标左键，值为 2 时代表按下鼠标右键，题中所述代码中没有定义 Button 值，所以单击鼠标左键或者右键都能触发 MouseDown 事件；代码中控件名称为 Click，所以答案为 D) 。17.在使用打印直接输出信息时，下列哪个属性或方法实现了使文件结束打印( )。A) Print 方法 B) Page 属性C) NewPage 方法 D) EndDoc 方法（分数：2.00）A.B.C.D. 解析：解析 每次应用程序结束时，它们会自动使用 EndD
37、oc 方法，将打印机对象中任何未确定的信息送到打印机，即通过“Printer.EndDoc”方法用来结束文件打印。18.以下能判断是否到达文件尾的函数是_。A) BOF B) LOC C) LOF D) EOF（分数：2.00）A.B.C.D. 解析：评析 Visual Basic 中，LOC 函数是用来在已打开的文件中指定当前读/写的位置，LOF 函数是用来返回已打开文件的长度，EOF 函数是用来判断是否到达已打开文件的尾部。19.组合框是文本框和( )特性的组合。A) 复选框 B) 标签 C) 列表框 D) 目录列表框（分数：2.00）A.B.C. D.解析：解析 本题考查组合框。组合框控
38、件(ComboBox)是将文本框和列表框的功能结合在一起，用户可以在列表中选择某项(注：只能选取一项)，或在编辑区域中直接输入文本内容来选定项目。20.以下叙述中错误的是( )。A一个工程中可以包含多个窗体文件B在一个窗体文件中用 Public 定义的通用过程不能被其他窗体调用C窗体和标准模块需要分别保存为不同类型的磁盘文件D用 Dim 定义的窗体层变量只能在该窗体中使用（分数：2.00）A.B. C.D.解析：21.某人在窗体上画了一个名称为 Timer1 的计时器和一个名称为 Labe11 的标签，计时器的属性设置为Enabled=True，Interval=0，并编程如下。希望在程序运行
39、时，可以每 2 秒在标签上显示一次系统当前时间。Private Sub Timer1_Timer()Labe11.Caption=TimeEnd Sub在程序执行时发现未能实现上述目的，那么，应作的修改是( )。A) 通过属性窗口把计时器的 Interval 属性设置为 2000B) 通过属性窗口把计时器的 Enabled 属性设置为 FalseC) 把事件过程中的 Labe11.Caption=Time语句改为 Timer1.Interval=TimeD) 把事件过程中的 Labe11.Caption=Time$语句改为 Labe11.Caption=Timer1.Time（分数：2.00）
40、A. B.C.D.解析：解析 Timer 控件有两个重要的属性和一个事件。其中，Interval 设置响应 Timer 事件的时间间隔，单位是毫秒。要每隔 2 秒显示一次当前时间，就是每隔 2 秒触发一次 Timer()事件，所以应设置Interval 属性为 2000 毫秒。22.要使文本框获得输入焦点，则应采用文本框控件的A) GotFocus 方法 B) LostFocus 方法C) KeyPress 方法 D) SetFocus 方法（分数：2.00）A.B.C.D. 解析：解析 要获得焦点，既可通过获得焦点方法 SetFocus 来实现；也可通过在程序运行时，选择或单击相应控件来实现
41、。23.使用 Public Const 语句声明一个全局的符号常量时，该语句应放在_。A) 过程中 B) 窗体模块的通用声明段C) 标准模块的通用声明段 D) 窗体模块或标准模块的通用声明段（分数：2.00）A.B.C. D.解析：评析 Const 语句格式：作用范围 Const 常量名 As 数据类型=常量值“作用范围”可以使用 Private 或 Public 关键字，缺省使用 Private 关键字，表示所声明的常量只在包含该声明的模块内可用；使用 Public 关键字，表示所声明的常量在所有模块中对所有过程都可用。只有在标准模块的通用声明中才可以使用 Public 关键字来声明常量。2
42、4.假定用下面的语句打开文件：Open “File1.Txt“ For Input As #1则不能正确读文件的语句是( )。A) Input#1, ch$ B) Line Input#1, ch$C) ch$=Input$(5, #1) D) read#1, ch$（分数：2.00）A.B.C.D. 解析：解析 顺序文件的读操作可以有如下三种形式：Input#语句可从一个顺序文件中读出数据项，并把这些数据项赋给程序变量，其格式为 Input#文件号、变量表。Line Input#语句从顺序文件中读取一个完整的行，并把它赋给一个字符串变量，其格式为 Line Input#文件号，字符串变量。I
43、nput$函数可返回从指定文件中读出的包含 n 个字符的字符串，其格式为 Input$(n,#文件号)。25.窗体上画一个命令按钮，然后编写如下代码：Private Type RecordID As IntegerName As String * 20End TypePrivate Sub command1 _ Click(Open “c: /file. txt“ for Input AsMaxSize = LOF (1)for NextChar =MaxSize To Step-1Seek #1, NextCharMyChar=Input(1，#1)Next NextCharPrint EO
44、F(1)Close #1 End Sub程序运行后，单击命令按钮，其输出结果为_。A) True B) False C) 0 D) Null（分数：2.00）A.B. C.D.解析：解析 本题的难点是如何确定文件的指针是否指在文件的末尾处。Seek 语句把相应文件的文件指针由后向前移动，当循环结束时，文件指针在文件的开始处，所以 EOF(1)为 False。26.下列程序段的执行结果为( )。ForX=5 To 1 Step-1For Y=1 To 6-XPrint Tab (Y+5)；“*“Next YPrintNext XA*B*C*D *（分数：2.00）A.B.C. D.解析：27.S
45、ub 过程与 Function 过程最根本的区别是( )。A)Sub 过程可以使用 Call 语句或直接使用过程名调用，而 Function 过程不可以B)Function 过程可以有参数，Sub 过程不能有参数C)两种过程参数的传递方式不同D)Sub 过程的过程名不能有返回值，而 Function 过程能通过过程名返回值（分数：2.00）A.B.C.D. 解析：解析Function 过程与 Sub 过程的相似之处是：都可以获取参数，执行一系列语句，以及改变其参数值的独立过程；不同之处是：Function 函数有返回值，可以在表达式的右边使用，使用方式与内部函数一样，而 Sub 过程没有返回值
46、。28.要获得当前驱动器应使用驱动器列表框的哪个属性_。A) Path B) Drive C) Dir D) Pattern（分数：2.00）A.B. C.D.解析：评析 驱动器列表框的 Drive 属性，用来设置或返回程序运行时所选择的驱动器名。格式为：驱动器列表框名称。Drive=驱动器名“驱动器名”是指定的驱动器，如果省略，则 Drive 属性是当前驱动器。29.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )Dim n As IntegerFor n=0 To 9 Step 3Print rel(n)；
47、Next nEnd SubPrivate Function tel(ByVal i As Integer)As IntegerDim x As Integerx=0For j=1 To iIf i5 Then rel=i：Exit Functionx=x+jNext jrel=xEnd Function程序运行后，单击命令按钮，则窗体上显示的内容是_。A) 1 3 5 7 B) 2 8 14 53C) 0 3 21 45 D) 0 5 11 34（分数：2.00）A.B.C. D.解析：解析 Exit Function 的功能是立即终止函数的运行并回到调用函数的地方继续执行其他语句。在 Function 过程的任何位置都可以设置：Exit Function 语句。变量 n 传值为 0、3、6、9，4 次调用 rel函数过程，由于 0 和 3 都小于 5，使得 i5 不成立，被执行了“Exit Function”，函数名将 0 和 3 传回。而 6 和 9 没有使得 i5 成立，变量 x 的计算结果分别为 21 和 45，也被函数名传回。30.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Cli
