1、二级 VISUAL+BASIC 笔试-267 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.以下控件可以用来实现定时地执行某段代码的是 _。（分数：2.00）A.OLEB.TimerC.ComboBoxD.FileListBox2.视图设计一般有 3 种设计次序，下列不属于视图设计的是 _。（分数：2.00）A.自顶向下B.由外向内C.由内向外D.自底向上3.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下程序：Function Func(ByVal x As Integer，y As Integer)y=x*yIf y0
2、 ThenFunc=xElseFunc=yEnd IfEnd FunctionPrivate Sub Command1_Click()Dim a As Integer，b As Integera=3b=4c=Func(a,B) Print “a=“;aPrint=b=“；bPrint“c=“；cEnd Sub程序运行后，单击命令按钮，其输出结果为 _。（分数：2.00）A.a=3 b=12 c=3B.a=3 b=4 c=3C.a=3 b=4 c=12D.a=13 b=12 c=124.要把一个命令按钮设置成无效，应设置属性 _ 的值为 False。（分数：2.00）A.VisibleB.Ena
3、bledC.DefaultD.Cancel5.在用菜单编辑器设计菜单时，必须输入的项是 _。（分数：2.00）A.快捷键B.标题C.索引D.名称6.下列程序段的结果为 _。A=“ABBACDDCBA“For I=6 To 2 Step-2X=Mid(A，I，I)Y=Left(A，I)Z=Right(A，I)Z=X aPrint=b=“；bPrint“c=“；cEnd Sub程序运行后，单击命令按钮，其输出结果为 _。（分数：2.00）A.a=3 b=12 c=3 B.a=3 b=4 c=3C.a=3 b=4 c=12D.a=13 b=12 c=12解析：评析 函数 Func(3,4)的返回值为
4、 3，故 c 的值为 3。由于参数 x 是按值传递的，s 的值仍为 3；而参数 y 是按地址传递的，b 的值变为 3*4。4.要把一个命令按钮设置成无效，应设置属性 _ 的值为 False。（分数：2.00）A.VisibleB.Enabled C.DefaultD.Cancel解析：评析 命令按钮的部分属性：Visible 属性：返回/设置一个值，决定对象是否可见；Cancel 属性：当一个命令按钮的 Cancel 属性设置为 True 时，按 Esc 键与单击该命令按钮的作用相同。Enabled 属性：返回/设置一个值，决定对象是否响应用户生成事件。Default 属性：当一个命令按钮的
5、Default 属性被设置为 True 时，按回车键和单击该命令按钮的作用相同。5.在用菜单编辑器设计菜单时，必须输入的项是 _。（分数：2.00）A.快捷键B.标题C.索引D.名称 解析：评析 菜单项的快捷键用来在程序运行过程中快速地选取这一菜单项。菜单项的标题是程序运行时该菜单项所显示出来的名字，相当于控件的 Caption 属性。索引用于用户建立菜单控件数组时给数组元素设置下标。菜单项也是一个控件，需要有一个惟一标识它的控件名，就是菜单项的名称，相当于控件的 Name 属性，在设计菜单时必须填写。6.下列程序段的结果为 _。A=“ABBACDDCBA“For I=6 To 2 Step-
6、2X=Mid(A，I，I)Y=Left(A，I)Z=Right(A，I)Z=X & Y & ZNext IPrint Z（分数：2.00）A.ABAB.AABAABC.BBABBA D.ABBABA解析：评析 Right(字符串，n)：返回字符串的最后 n 个字符。Mid(字符串，p，n)：从第 p 个字符开始，向后截取 n 个字符。p 和 n 都是算术表达式。Left(字符串，n)；返回“字符串”的前 n 个字符“&”：字符串连接运算符，将两个字符串按顺序连接起来。分析程序：因为每次循环，z 都被重新赋值，所以只需要跟踪最后一次循环即可得出最终结果：最后一次循环时，I=2X=Mid(“ABB
7、ACDDCBA“,2,2)=“BB“Y=Left(“ABBACDDCBA“,2)=“AB“Z=Right(“ABBACDDCBA“,2)=“BA“Z=X & Y & Z=“BBABBA“。7.在下列几种排序方法中，要求内存量最大的是 _。（分数：2.00）A.插入排序B.选择排序C.快速排序D.归并排序 解析：评析 快速排序的基本思想是，通过一趟排序将待排序记录分割成独立的两部分，其中一部分记录的关键字均比另一部分记录的关键字小，再分别对这两部分记录继续进行排序，以达到整个序列有序：插入排序的基本操作是指将无序序列中的各元素依次插入到已经有序的线性表中，从而得到一个新的序列：选择排序的基本思想
8、是：扫描整个线性表，从中选出最小的元素，将它交换到表的最前面(这是它应有的位置)，然后对剩下的子表采用同样的方法，直到表空为止；归并排序是将两个或两个以上的有序表组合成一个新的有序表。8.使用 Public Const 语句声明一个全局的符号常量时，该语句应放在 _。（分数：2.00）A.过程中B.窗体模块的通用声明段C.标准模块的通用声明段 D.窗体模块或标准模块的通用声明段解析：评析 Const 语句格式：作用范围 Const 常量名 As 数据类型二常量值“作用范围”可以使用 Private 或 Public 关键字，缺省使用 Private 关键字，表示所声明的常量只在包含该声明的模块
9、内可用；使用 Public 关键字，表示所声明的常量在所有模块中对所有过程都可用。只有在标准模块的通用声明中才可以使用 Public 关键字来声明常量。9.编写如下事件过程：Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)If Shift=6 And Button=2 ThenPrint“BBBB“End IfEnd Sub程序运行后，为了在窗体上输出“BBBB”，应执行的操作为 _。（分数：2.00）A.同时按下 Shift 键和鼠标左键B.同时按下 Shift 键和鼠
10、标右键C.同时按下 Ctrl、Alt 键和鼠标左键D.同时按下 Ctrl、Alt 键和鼠标右键 解析：评析 在鼠标的 Mouse_Down 事件中，当按下左键时，Button=1，右键时 Button=2，在键盘上按下 Shift 键时， Shift 值为 1，Ctrl 键时，Shift 值为 2，Alt 时，Shift 值为 4，如果同时按下多键，则它们的值也相加。10.下列程序段的执行结果为 _。N=0For I=1 To 3For J=5 To 1 Step-1N=N+1Next JNext IPrint N；J；I（分数：2.00）A.12 0 4B.15 0 4 C.12 3 1D.
11、15 3 1解析：评析 跟踪程序：外循环执行 3 次，内循环执行 5 次，循环体 N=N+1 一共执行了 3*5=15 次，故 N的值应当为 15。值得注意的是；For 循环的控制变量，在每次循环体执行完之后，会自动加循环步长值，直到这个值超出循环语句指定的范围，循环结束，由此可见，循环结束后，I 的值应当为 3+1=4，J 的值应当为 1+(-1)=0。11.栈和队列的共同点是 _。（分数：2.00）A.都是先进后出B.都是先进先出C.只允许在端点处插入和删除元素 D.没有共同点解析：评析 栈和队列都是一种特殊的操作受限的线性表，只允许在端点处进行插入和删除。二者的区别是：栈只允许在表的一端
12、进行插入或删除操作，是一种“后进先出”的线性表；而队列只允许在表的一端进行插入操作，在另一端进行删除操作，是一种“先进先出”的线性表。12.在计算机中，算法是指 _。（分数：2.00）A.查询方法B.加工方法C.解题方案的准确而完整的描述 D.排序方法解析：评析 计算机算法是指解题方案的准确而完整的描述，它有以下几个基本特征：可行性、确定性、有穷性和拥有足够的情报。13.已知二叉树 BT 的后序遍历序列是 dabec，中序遍历序列是 debac，它的前序遍历序列是 _。（分数：2.00）A.cedba B.acbedC.decabD.deabc解析：评析 二叉树 BT 的后序遍历序列为 dab
13、ec，故 BT 的根结点为 c(后序遍历序列的最后一个结点为数的根结点)；而 BT 的中序遍历序列是 debac，即遍历序列中最后一个结点为跟结点，说明 BT 的右子树为空。由 BT 的后序遍历序列和中序遍历序列可知 BT 的左子树(LST)的后序遍历序列和中序遍历序列分别为 dabe 和 deba(树是递归定义的)：故 LST 的根结点是 e，在由 LST 的中序遍历序列可知其左子树为 do因此 BT 的前序遍历序列为 cedba。14.在数据流图(DFD) 中，带有名字的箭头表示 _。（分数：2.00）A.控制程序的执行顺序B.模块之间的调用关系C.数据的流向 D.程序的组成成分解析：评析
14、 数据流相当于一条管道，并有一级数据(信息)流经它。在数据流图中，用标有名字的箭头表示数据流。数据流可以从加工流向加工，也可以从加工流向文件或从文件流向加工，并且可以从外部实体流向系统或从系统流向外部实体。15.下列程序段的执行结果为 _。A=0=B=0For I=-1 To-2 Step-1For J=1 To 2B=B+1Next JA=A+1Next IPrint A；B（分数：2.00）A.2 4 B.-2 2C.4 2D.2 3解析：评析 ForNext 循环跟踪程序：内循环的循环体执行了四次，外循环的循环体执行了两次，故 A=2，B=4。16.下面叙述中正确的是 _。（分数：2.0
15、0）A.随机文件中记录的长度不是固定不变的B.随机文件由若干条记录组成，并可以按记录号访问各个记录 C.不能按任意顺序访问随机文件中的数据D.可以同时对打开的随机文件进行读写操作解析：评析 随机文件又称直接文件，由若干个记录来组成，每个记录的长度都是固定的，并且每个记录都有一个记录号，因此可以根据记录号访问随机文件的任意记录。注意：当用 Open 语句打开一个随机文件的时候，如果指定存取类型为读写类型，则可以任意读写该文件；如果指定存取类型为只读类型，则只能进行读操作；如果指定存取类型为只写类型，则只能进行写操作。17.下列程序段的执行结果为 _。Dim m(3，3)As IntegerDim
16、 i As IntegerDim j As IntegerDim K As IntegerFor i=1 To 3m(i,i)=iNextFor i=0 To 3For j=0 To 3x=x+m(i，j)NextNextPrint x（分数：2.00）A.3B.4C.5D.6 解析：评析 通过第一个以 i 为循环变量的循环，令 a(1，1)=1，a(2,2)=2，a(3,3)=3。然后通过双重循环，求数组 a 中所有元素的和并将结果赋值给 x，由于在数组 a 中除了 a(1,1)、a(2,2)和 a(3,3)外其他元素都为 0，所以 x=1+2+3=6。18.使用驱动器列表框的 _ 属性可以
17、返回或设置驱动器列表中当前选中的磁盘驱动器的索引值。（分数：2.00）A.ChDriveB.DriveC.ListD.ListIndex 解析：评析 Drive 属性用来设置或返回程序运行时所选择的驱动器名。List 属性是包含了当前系统中有效驱动器的连接列表。ListIndex 属性用来设置或返回驱动器连接列表中当前所选中的项目的索引。19.下面叙述中不正确的是 _。（分数：2.00）A.自定义数据类型必须在窗体模块或标准模块的通用声明段进行声明B.自定义数据类型只能在窗体模块的通用声明段进行声明 C.在窗体模块中定义自定义数据类型时必须使用 Private 关键字D.自定义数据类型中的元素
18、的数据类型可以是系统提供的基本数据类型或已声明的自定义数据类型解析：评析 自定义数据类型是用 Type 语句定义的数据类型，可以包含一个或多个任意数据类型的元素。自定义数据类型必须在窗体模块、标准模块或类模块的通用声明段进行定义。在窗体模块和类模块中，只能用 Private 关键字来声明白定义数据类型；在标准模块中，可以使用Private 或Public 关键字来声明白定义数据类型。自定义数据类型中的元素的数据类型可以是系统提供的基本数据类型或已声明的自定义数据类型。20.滚动条控件中，用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是 _。（分数：2.00）A.MaxB.ValueC.Lar
19、geChangeD.SmallChange 解析：评析 滚动条控件(HScroll 或者 VScroll)的属性和事件：属性Value 属性Value 属性对应于滚动框在滚动条中的位置，其值介于 Min 和 Max 属性值之间。当 Value 属性值等于 Min属性值时，滚动框位于滚动条的最左端(水平滚动条)或最顶端(垂直滚动条)：当 Value 属性值等于 Max属性值时，滚动框位于滚动条的最右端(水平滚动条)或最底端(垂直滚动条)。Min 和 Max 属性Min 属性设置滚动框位于滚动条最左端或者最顶端时 Value 属性的值。Max 属性设置滚动框位于滚动条最右端或者最底端时 Value
20、 属性的值。SmallChange 属性设置鼠标单击滚动箭头时滚动框移动的大小。LargeChange 属性设置鼠标单击滚动箭头和滚动框之间的区域时，滚动框的移动大小。事件Scroll 事件拖动滚动框时，Scroll 事件被触发。Change 事件释放滚动框或者单击滚动条或滚动箭头时，Change 事件被触发。21.下列叙述中，不属于软件需求规格说明书的作用的是 _。（分数：2.00）A.便于用户、开发人员进行理解和交流B.反映出用户问题的结构，可以作为软件开发工作的基础和依据C.作为确认测试和验收的依据D.便于开发人员进行需求分析 解析：评析 软件需求规格说明书(SRS，Software R
21、equirement Specification)是需求分析阶段的最后成果，是软件开发中的重要文档之一。它有以下几个方面的作用；便于用户、开发人员进行理解和交流；反映出用户问题的结构，可以作为软件开发工作的基础和依据；作为确认测试和验收的依据。22.SQL 语言又称为 _。（分数：2.00）A.结构化定义语言B.结构化控制语言C.结构化查询语言 D.结构化操纵语言解析：评析 结构化查询语言(Structured Query Language，简称 SQL)是集数据定义、数据操纵和数据控制功能于一体的数据库语言。23.以下程序段运行的结果是 _。Dim a(-1 To 5)As BooleanD
22、im flag As Booleanflag=FalseDim i As IntegerDim j As IntegerDo Until flag=TrueFor i=-1 To 5j=j+1If a(i)=False Thena(i)=TrueExit ForEnd IfIf i=5 Thenflag=TrueEnd IfNextLoopPrint j（分数：2.00）A.20B.7C.35 D.8解析：评析 该程序段的作用是给数组 a 的每个数组元素赋值 True，具体实现的方式为：每次从数组 a 的第一个元素开始判断，该元素是否为 False，如果是，则令此元素为 True，然后跳出循环
23、，重新从数组 a 的第一个元素开始判断；如果当前元素不为 False，则判断下一个元素。因此语句 j=j+1 将执行 1+2+3+4+5+6+7=28 次，即 j=28。然后再遍历一遍数组 a 的所有元素，最后结束程序段。所以 j 最终的值是： j=28+7=35。24.在设计程序时，应采纳的原则之一是 _。（分数：2.00）A.程序结构应有助于读者理解 B.不限制 goto 语句的使用C.减少或取消注解行D.程序越短越好解析：评析 滥用 goto 语句将使程序流程无规律，可读性差；添加的注解行有利于对程序的理解，不应减少或取消；程序的长短要依照实际需要而定，并不是越短越好。25.在窗体上画一
24、个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为 Drive1、Dir1 和File1。当改变目录列表框的内容时，要求文件列表框中显示当前选中的文件夹中的内容，则在Dir1_Change 事件过程中应使用的语句是 _。（分数：2.00）A.Dirvel.Drive=Dir1.PathB.Dir1.Path=Drive1.DriveC.Dir1.Path=File1.PathD.File1.Path=Dir1.Path 解析：评析 由于要在文件列表框中显示当前选中的文件夹中的内容，所以应使用的语句是File1.Path=Dir1.Path。26.在窗体上画一个文本框，其名称为 Tex
25、t1。为了在程序运行后 Text1 中的文本不可编辑，应当使用的语句是 _。（分数：2.00）A.Text1.ClearB.Text1.Locked=True C.Text1.Visible=FalseD.Text1.Enabled=True解析：评析 对于 Textbox 控件，可通过设置其 Visible 属性为 False，使其隐藏，设置 Enabled 属性为 False 使其不可用，设置 Locked 属性为 True，使其不可被编辑。27.以下叙述不正确的是 _。（分数：2.00）A.在 Sub 过程中可以调用 Function 过程B.在用 Call 调用 Sub 过程时必须把参
26、数放在括号里C.在 Sub 过程中可以嵌套定义 Function D.用 Static 声明的过程中的局部变量都是 Static 类型解析：评析 Visual Basic 中，可以直接使用过程名调用过程，也可以结合 Call 关键字调用。使用Call 调用过程时，参数列表必须用括号包含起来。Visual Basic 语言不支持函数与过程的嵌套定义。Static 关键字可以指定局部变量为静态类型变量。28.为了使图片框的大小可以自动适应图片的尺寸，则应 _。（分数：2.00）A.将其 Autosize 属性值设置为 True B.将其 Autosize 属性值设置为 FalseC.将其 Stre
27、tch 属性值设置为 TrueD.将其 Stretch 属性值设置为 False解析：评析 图片框的 Autosize 属性返回或设置一个值，以决定控件是否自动改变大小以显示其全部内容。该属性的值如果是 True，则控件根据图片的尺寸自动改变大小；该属性的值如果为 False，则控件不改变自身的大小，如果载入的图片尺寸大于控件的尺寸，则将超过控件尺寸的那部分图片剪裁掉。29.下列不属于软件调试技术的是 _。（分数：2.00）A.强行排错法B.集成测试法 C.回溯法D.原因排除法解析：评析 调试的关键在于推断程序内部的错误位置及原因。主要的调试方法有强行排错法、回溯法和原因排除法。30.系统符号
28、常量的定义可以通过 _ 获得。（分数：2.00）A.对象浏览器 B.代码窗口C.属性窗口D.工具箱解析：评析 对象浏览器；可以显示出对象库和当前工程里过程中的可用类、属性、方法、事件及常量和变量。代码窗口：Visual Basic“代码编辑器”是一个窗口，大多数代码都在此窗口上编写。它象一个高度专门化的字处理软件，有许多便于编写 Visual Basic 代码的功能。属性窗口：主要是针对窗体和控件设置的，用来显示和设置窗体及控件的属性信息。工具箱窗口：由工具图标组成，这些图标是 Visual Basic 应用程序的构件，称为图形对象或控件，每个控件由工具箱中的一个工具图标来表示。31.若在 S
29、hape 控件内以 FillStyle 属性所指定的图案填充区域，而填充图案的线条的颜色由 FillColor属性指定，非线条的区域由 BackStyle 属性填充，则应 _。（分数：2.00）A.将 Shape 控件的 FillStyle 属性设置为 2-7 间的某个值，BackStyle 属性设置为 1 B.将 Shape 控件的 FillStyle 属性设置为 0 或 1，BackStyle 属性设置为 1C.将 Shape 控件的 FillsStyle 属性设置为 2-7 间的某个值，BackStyle 属性设置为 0D.将 Shape 控件的 FillStyle 属性设置为 0 或
30、1，BackStyle 属性设置为 0解析：评析 Shape 控件的相关属性FillStyle 属性，该属性的设置值决定了形状控件内部的填充图案，其值如下：0-Solid：(实心)1-Transparent：(透明)2-Horizontal Lin：(水平线)3-Vertial Line：(垂直线)4-Upward Diagona：(向上对角线)5-Downward Diagonal：(向下对角线)6-Cross：(交叉线)7-Diagonal：(对角交叉线)FiilColor 属性，用来定义形状控件的内部颜色。如果 FiilStyle 属性值设置为 1，则 FillColor 属性将不起作用
31、。BackStyle 属性，设置值为 0 和 1，用来决定形状控件的背景是否被指定的颜色填充。为 0 时，形状控件的背景是透明的，为 1 时，形状控件的背景由 BackColor 属性所指定的颜色来填充。如果 FillStyle 属性设置为 0，则 BackStyle 属性将不起作用。32.下列程序段的执行结果为 _。I=0For G=10 To 19 Step 3I=I+1Next GPrint I（分数：2.00）A.4 B.5C.3D.6解析：评析 ForNext 循环该程序段的功能相当于根据循环变量的初始值，求循环体执行的次数。For 循环的循环次数=Int(终值-初值)/步长+1。故
32、循环体(I=I+1)一共被执行 4 次，而每次执行 I 的值增加 1。因此循环结束后的值增加 4，即 I=0+4。33.使用目录列表框的 _ 属性可以返回或设置当前工作目录的完整路径(包括驱动器盘符)。（分数：2.00）A.DriveB.Path C.DirD.ListIndex解析：评析 目录列表框控件的相关属性Path 属性用来返回或设置当前的工作路径。例如，当前工作路径是“C:/Windows”，则 Path 属性返回的值就是“C:/Windows”。ListIndex 属性用来返回或设置目录列表框的目录列表中当前所选中的项目的索引。34.要获得文件列表框中当前被选中的文件的文件名，则应
33、使用哪个属性 _。（分数：2.00）A.DirB.PathC.DriveD.Filename 解析：评析 文件列表框控件的相关属性FileName 属性用来设置或返回程序运行过程中当前选中的文件名称。Path 属性用来设置或返回程序运行过程中当前选中的文件的路径。35.执行以下语句后显示结果为 _。Dim X As IntegerIf x Then Print X Else Print x-1（分数：2.00）A.1B.0C.-1 D.不确定解析：评析 Dim 定义的变量，If 语句在 Visual Basic 中，Dim 用于在标准模块、窗体模块或过程中定义变量或数组。而当引用 Dim 定义
34、的变量时，变量值会被重新设置(数值变量重新设置为 0，字符串变量被设置为空)。If 语句的格式：If 条件 Then 若干条语句 Else 若干条语句 或者If 条件 Then若干条语句Else若干条语句End IfIf 语句的执行方式：当“条件”为真的时候，执行 Then 后面的语句：“条件”为假，执行 Else 后面的语句。如果“条件”是数值表达式，则数值表达式为非 0 值时，“条件”为真；数值表达式为 0 时，“条件”为假。在此题中，“条件”是整型变量 x，其值为 0，“条件”为假，执行 Else 分支，即打印出-1。二、填空题(总题数：12，分数：30.00)36.实现算法所需的存储单
35、元多少和算法的工作量大小分别称为算法的 【1】 。（分数：2.00）填空项 1:_ （正确答案：空间复杂度和时间复杂度）解析：评析 算法的复杂性是指对一个在有限步骤内终止算法和所需存储空间大小的估计。算法所需存储空间大小是算法的空间复杂性，算法的计算量是算法的时间复杂性。37.数据结构包括数据的逻辑结构、数据的 【2】 以及对数据的操作运算。（分数：2.00）填空项 1:_ （正确答案：存储结构）解析：评析 数据结构包括 3 个方面，即数据的逻辑结构、数据的存储结构及对数据的操作运算。38.一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的 【3】 。（分数：2.00）
36、填空项 1:_ （正确答案：可重用性）解析：评析 继承的优点：相似的对象可以共享程序代码和数据结构，从而大大减少了程序中的冗余，提高软件的可重用性。39.面向对象的模型中，最基本的概念是对象和 【4】 。（分数：2.00）填空项 1:_ （正确答案：类）解析：评析 面向对象模型中，最基本的概念是对象和类。对象是现实世界中实体的模型化；将属性集和方法集相同的所有对象组合在一起，可以构成一个类。40.软件维护活动包括以下几类：改正性维护、适应性维护、 【5】 维护和预防性维护。（分数：2.00）填空项 1:_ （正确答案：完善性）解析：评析 软件维护活动包括以下几类：改正性维护、适应性维护、完善性
37、维护和预防性维护。改正性维护是指在软件交付使用后，为了识别和纠正软件错误、改正软件性能上的缺陷、排除实施中的误使用，应当进行的诊断和改正错误的过程；适应性维护是指为了使软件适应变化，而去修改软件的过程；完善性维护是指为了满足用户对软件提出的新功能与性能要求，需要修改或再开发软件，以扩充软件功能、增强软件性能、改进加工效率、提高软件的可维护性；预防性维护是为了提高软件的可维护性、可靠性等，为以后的进一步改进软件打下良好基础。41.Visual Basic 中的控件分为 3 类，它们是标准控件、 【6】 和可插入对象。（分数：2.00）填空项 1:_ （正确答案：ActiveX 控件）解析：评析
38、Visual Basic 中的控件分为以下 3 类：标准控件(也称内部控件)、ActiveX 控件、可插入对象。42.程序执行结果 s 的值是 【7】 。Private Sub sub1(Byval p As Integer)p=p*2End SubPrivate Sub Command1_click()Dim i As Integeri=3Call sub1(i)if i4 then i=i mod 2Print cstr(i)End Sub（分数：2.00）填空项 1:_ （正确答案：3）解析：评析 ByVal 表示所声明的参数是按值传递的。因此参数值的变化只在被调用的函数或过程中有效，即
39、只是形参的值有变化，而实参不受影响。ByRef 表示所声明的参数是按地址传递的。因此形参值的变化都会反映在实参上。本题程序中，参数 p 是按值传递的，因此调用 sub1 后，实参 i 的值仍为 3。43.在执行 KeyPress 事件过程时，KeyASCII 是所按键的 【8】 值。对于有上档字符和下档字符的键，当执行 KeyDown 事件过程时，KeyCode 是 【9】 字符的 ASCII 值。（分数：4.00）填空项 1:_ （正确答案：8ASCII9下档）解析：评析 此事件当用户按下和松开一个 ANSI 键时发生。语法Private Sub object_KeyPress(index
40、As Integer, keyascii As Integer)应当使用 KeyDown 和 KeyUP 事件过程来处理任何不被 KeyPress 识别的击键，诸如：功能键、编辑键、定位键以及任何这些键和键盘换档键的组合等。与 KeyDown 和 KeyUp 事件不同的是，KeyPress 不显示键盘的物理状态，而只是传递一个字符。KeyPress 将每个字符的大、小写形式作为不同的键代码解释，即作为两种不同的字符。而 KeyDown 和KeyUp 用两种参数解释每个字符的大写形式和小写形式；KeyCode 一一显示物理的键(将 A 和 a 作为同一个键返回)和 Shift 一一指 Shift
41、+Key 键的状态而且返回 A 或 a 其中之一。44.文件的打开和关闭语句分别是 【10】 和 【11】 。（分数：4.00）填空项 1:_ （正确答案：10Open11Close）解析：评析 Open 语句能够对文件输入/输出 (I/O)。其语法结构为：Open pathname For mode Access accesslockAs或filenumberLen=reclength关闭 Open 语句所打开的输入/输出(I/O)文件使用的是 Close 语句。语法格式为Closefilenumberlist其中可选的 filenumberlist 参数为一个或多个文件号。45.假定有如下
42、程序代码，程序运行后，把鼠标光标移到窗体内，每单击一次，变换一种鼠标光标的形状，依次显示鼠标光标的 15 个属性。请在划线处将程序补充完整。Private Sub Form_Click()Static x As IntegerClsPrint “Mousepointer Property is now“；xForm1. 【12】 =xx=x+1If x=15 Then x=0End Sub（分数：2.00）填空项 1:_ （正确答案：MousePointer）解析：评析 MousePointer 属性可以通过代码设置，也可以通过属性窗口设置，在程序代码中设置MousePointer 属性的一般
43、格式为：对象.MousePointer=设置值由于程序中使用 Static 关键字定义变量 x，每次单击窗体时 x 的值增加 1，并且下次单击窗体时，x 能保留上次的值，这样就能保证每次单击窗体时看到鼠标光标都和上一次看到的不一样。46.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_click()Dim a(1 To 10)Dim p(1 To 3)k=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iPrint kEnd Sub程序运行
44、后，单击命令按钮，输出结果是 【13】 。（分数：2.00）填空项 1:_ （正确答案：33）解析：评析 观察程序，通过第一个以 i 为循环变量的循环，给数组 a()进行赋值，数组 a()中的各个元素的值就是其下标值。通过第二个以 i 为循环变量的循环，给数组 p()进行赋值：i=1,p(i)=a(i*i),p(1)=a(1)=1i=2,p(i)=a(i*i)，p(2)=a(4)=4i=3,p(i)=a(i*i)，p(3)=a(9)=9通过第三个以 i 为循环变量的循环，得到变量 k 的值：i=1，k=k+p(i)*2=5/p(1)*2=7i=2,k=-k+p(i)*2=7+p(2)*2=15
45、i=3，k=k+p(i)*2=15+p(3)*2=33最终输出结果是；33。47.假定建立了一个工程，该工程包括两个窗体，其名称(Name 属性)分别为 Form1 和 Form2，启动窗体为Form1。在 Form1 上画一个命令按钮 Command1，程序运行后，要求当单击该命令按钮时，Form1 窗体消失，显示窗体 Form2，请将下面的程序补充完整。Private Sub Command1_click()【14】 Form1Form 2. 【15】 End Sub（分数：4.00）填空项 1:_ （正确答案：14Unload15Show 或 Show 1）解析：评析 Unload 语句、Show 方法Unload 语句用来将指定窗体从内存中清除。格式：Unload 窗体名称Show 方法用来显示一个窗体。格式：窗体名称.Show模式参数“模式”用来确定显示窗体的状态，可以取值 0 或 1。取值为 0(0 值是缺省值)则窗体是“无模式”窗体，当该窗体显示出来时，不但可以对该窗体进行操作，还可以对其他显示出来的窗体进行操作：取值为 1 则窗体是“模式”窗体，当该窗体显示出来时，只能对该窗体进行操作，只有当该窗体关闭后，才能对其他窗体进行操作。
