【计算机类职业资格】二级VISUAL+BASIC-25-2及答案解析.doc

《【计算机类职业资格】二级VISUAL+BASIC-25-2及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】二级VISUAL+BASIC-25-2及答案解析.doc（14页珍藏版）》请在麦多课文档分享上搜索。

1、二级 VISUAL+BASIC-25-2 及答案解析(总分：71.00，做题时间：90 分钟)一、选择题(总题数：24，分数：43.00)1.以下程序运行后，输出结果是 _ 。 For i=1 To 3 Print Tab(3*j);2*(j-1) Next j Print（分数：2.00）A.1325B.19 25C.024D.1352.下列选项，不属于模块间耦合的是（分数：1.00）A.数据耦合B.同构耦合C.异构耦合D.公用耦合3.设用复制、粘贴的方法建立了一个命令按钮数组 Command1，以下对该数组的说法错误的是（分数：2.00）A.命令按钮的所有 Caption 属性都是 Com

2、mand1B.在代码中访问任意一个命令按钮只需使用名称 Command1C.命令按钮的大小都相同D.命令按钮共享相同的事件过程4.下列不属于软件工程三要素的是（分数：1.00）A.工具B.过程C.方法D.环境5.一个工程中含有窗体 Form1、Form2 和标准模块 Model1，如果在 Form1 中有语句 Public X As Integer，在 Model1 中有语句 Public Y As Integer，则以下叙述中正确的是 _ 。（分数：2.00）A.变量 X、Y 的作用域相同B.Y 的作用域是 Model1C.在 Form1 中可以直接使用 XD.在 Form2 中可以直接使用

3、 X 和 Y6.窗体上有一个名称为 Text1 的文本框，一个名称为 Command1 的命令按钮。窗体文件的程序如下： Private Type x a As Integer:b As Integer End Type Private Sub Command1_Click() Dim y As x y.a=InputBox(“) If y.a/2=y.a/2 Then y.b=y.a*y.a Else y.b=Fix(y.a/2) End If Text1.Text=y.b End Sub 对以上程序，下列叙述中错误的是（分数：3.00）A.x 是用户定义的类型B.InputBox 函数弹出

4、的对话框中没有提示信息C.若输入的是偶数，y.b 的值为该偶数的平方D.Fix(y.a/2)把 y.a/2 的小数部分四舍五入，转换为整数返回7.下列程序段正确的是 _ 。（分数：2.00）A.Dim a As Integera=array(1,2,3,4)B.Dim a(),b()a=array(1,2,3,4):b=aC.Dim a As Varianta=array(1,“asd“,true)D.Dim a() As Varianta=array(1,2,3,4)8.Command1_Click()事件代码如下： Private Sub Command1_Click() Dim x As

5、 Integer, Y As Integer x = 6 : Y : 8 Call ABC(X, Y) Print X; Y End Sub Private Sub ABC(ByVal X As Integer，Y As Integer) X = X + 4 Y = Y = 2 End Sub 事件发生后，X 和 Y 的值分别为 _。（分数：3.00）A.6, 8B.10, 10C.10, 8D.6, 109.下列叙述中，不属于软件需求规格说明书的作用的是_。（分数：1.00）A.便于用户、开发人员进行理解和交流B.反映出用户问题的结构，可以作为软件开发工作的基础和依据C.作为确认测试和验收的

6、依据D.便于开发人员进行需求分析10.将 E-R 图转换到关系模式时，实体与联系都可以表示成_。（分数：2.00）A.属性B.关系C键D域11.下列说法不正确的是（分数：1.00）A.对象的操作由对象的属性、事件和方法来描述B.Visual Basic 是面向对象的程序设计，Visual Basic 中只有窗体和控件两种对象C.属性是对象的特征，不同的对象有不同的属性D.对象事件在代码窗口中体现过程12.下列关于栈的描述错误的是_。（分数：2.00）A.栈按“先进后出“组织数据B.栈是特殊的线性表，只能在一端插入或删除数据C.栈具有记忆功能D.栈只能顺序存储13.以下说法错误的是 _。（分数：

7、1.00）A.函数过程没有返回值B.子过程没有返回值C.函数过程可以带参数D.子过程可以带参数14.窗体上有一个名称为 Command1 的命令按钮，其单击事件过程如下： Private Sub Command1_Click() Dim x As Integer, y As Integer Static z As Integer x=3:y=5:z=y Call f(x, y, z) Print x; y; z End Sub Private Sub f(ByVal a As Integer, ByRef b As Integer, c As Integer) a=a+a:b=b+b:c=c+

8、c End Sub 运行程序，单击命令按钮时，3 个标签中显示的内容分别是（分数：2.00）A.3 5 5B.3 5 10C.3 10 5D.3 10 1015.在数据管理技术发展过程中，文件系统与数据库系统的主要区别是数据库系统具有_。（分数：2.00）A.数据无冗余B.数据可共享C.专门的数据管理软件D.特定的数据模型16.两个或两个以上的模块之间关联的紧密程度称为 _ 。（分数：2.00）A.耦合度B.内聚度C.复杂度D.连接度17.Mid(“Hello Everyone“，7，3) 的执行结果是（分数：2.00）A.yonB.everyC.EveD.one18.下列叙述中正确的是 _（

9、分数：2.00）A.为了建立一个关系，首先要构造数据的逻辑关系B.表示关系的二维表中各元组的每一个分量还可以分成若干数据项C.一个关系的属性表称为关系模式D.一个关系可以包括多个二维表19.多窗体操作中，窗体文件的扩展名是_ 。（分数：2.00）AbasBvbpCfrmDcls20.如果要在窗体上使用 2 组单选按钮，每组都可以有一个被选中，则应该做的是（分数：2.00）A.把 l 组单选按钮画在窗体的左边，另 1 组画在右边B.先画 2 组单选按钮，再画 2 个框架控件把 2 组单选按钮分别框起来C.先画 2 个框架控件，再把 2 组单选按钮分别画在不同的框架中D.因为 1 个窗体中只有 1

10、 个单选按钮可以被选中，所以需要使用 2 个窗体21.当组合框的 Style 属性设置为何值时，组合框称为简单组合框?（分数：1.00）A.0B.1C.2D.322.对用 MsgBox 显示的消息框，下面 _ 是错的。（分数：1.00）A.可以有一个按钮B.可以有两个按钮C.可以有三个按钮D.可以有四个按钮23.以下叙述中错误的是 _ 。（分数：2.00）A.在程序运行时，通用对话框控件是不可见的B.在同一个程序中，用不同的方法(如 ShowOpen 或 Showsave 等)打开的通用对话框具有不同的作用C.调用通用对话框控件的 ShowOpen 方法，可以直接打开在该通用对话框中指定的文件

11、D.调用通用对话框控件的 ShowColor 方法，可以打开颜色对话框24.Mid(“HelloEveryone“，7,3)的执行结果是 _ 。（分数：2.00）A.ongB.everyC.EveD.one二、填空题(总题数：14，分数：28.00)25.Visual Basic 中的控件分为 3 类，它们是 _ 1_ 、ActiveX 控件和可插入对象。 （分数：1.00）26.在菜单编辑器中建立一个菜单，其主菜单项的名称为 nmuEdit，Visible 属性为 False。程序运行后，如果用鼠标右键单击窗体，则弹出与 mnvEdit 对应的菜单。以下是实现上述功能的程序，请填空。 Pri

12、vate Sub Form _ 1_ (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then _ 2_ mnuEdit End If End Sub 27.菜单编辑器可分为 3 个部分，即数据区、 _ 1_ 和菜单项显示区。 （分数：1.00）28.在单链表中，要删除一个指定的结点，必须要找到该结点的 1。 （分数：2.00）29.编写一个程序把一维数组的各元素反序存放。在主过程中调用 subl 过程把从键盘上输入的 10 个元素反序存放后再输出。根据题意，请完善下列程序。 Priva

13、te Sub subl(b()As Integer, ByVal n As Integer) Dim i As Integer, j As Integer, t As Integer _ 1_ j=n Do While ij t=b(i):b(i)=b(j):b(j)=t i=i+1:j=j-1 Loop End Sub Private Sub Command1_Click() Dim a(1 To 10)As Integer, i As Integer Randomize For i=1 To 10 a(i)=Int(100*RnD) +1 Next i For i= _ 2_ Print

14、a(i); Next i Print Call _ 3_ For i=i To 10 Print a(i); Next i Print n End Sub （分数：2.00）30.软件设计模块化的目的是 1。 （分数：2.00）31.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer For i=1 To 10 a(i)=i Next Call swap( 1) For i=1 To 10 Print a(i)； Next End Sub Sub s

15、wap(b()As Integer) n=Ubound(b) For i=1 To n/2 t=b(i) b(i)=b(n) b(n)=t 2 Next End Sub 上述程序的功能是，通过调用过程 swap，调换数组中数值的存放位置，即 a(1)与 a(10)的值互换，a(2)与 a(9)的值互换。请填空。 （分数：4.00）32.顺序存储方法是把逻辑上相邻的结点存储在物理位置 _ 1_ 的存储单元中。 （分数：1.00）33.高度为 h(hO)的二叉树最少有 _ 1_ 个结点。 （分数：2.00）34.在面向对象方法中，类的实例称为 1。 （分数：2.00）35.在鼠标事件过程 Mous

16、eDown 和 MouseUp 中，参数 Button 的值为 1、2、4 时，分别代表按下鼠标的 1、 2 和 3 按钮。 （分数：6.00）36.下列程序执行时，要求输入一个密码，如果密码不正确，则显示出非法用户的对话框。请填空。 Const PassWord=“12345678“ Dim inpass As String inpass= 1(“请输入你的密码“，“输入密码“) If inpass=PassWord Then Exit Sub Else 2“对不起!你是非法用户。“，vbOKOnlyvbCritical，“拒绝“ Unload Me End If （分数：1.00）37.成

17、本效益分析的目的是从 _ 1_ 角度评价开发一个项目是否可行。 （分数：2.00）38.为了使复选框禁用(即呈现灰色)，应把它的 Value 属性设置为 1。 （分数：2.00）二级 VISUAL+BASIC-25-2 答案解析(总分：71.00，做题时间：90 分钟)一、选择题(总题数：24，分数：43.00)1.以下程序运行后，输出结果是 _ 。 For i=1 To 3 Print Tab(3*j);2*(j-1) Next j Print（分数：2.00）A.1325B.19 25C.024 D.135解析：解析 Tab()函数为输出若干个制表符，既然 j 是递增的，所以制表符的数量也

18、是递增的，由此即可得到 C 为正确答案。2.下列选项，不属于模块间耦合的是（分数：1.00）A.数据耦合B.同构耦合C.异构耦合 D.公用耦合解析：解析 本题主要考查了模块间耦合的类型。 模块之间的耦合程度反映了模块的独立性，也反映了系统分解后的复杂程度。按照耦合程度从弱到强，可以将其分成 5 级，分别是：数据耦合、同构耦合、控制耦合、公用耦合和内容耦合。选项 C)，没有这种耦合方式。 评价模块独女性的主要标准，以及对它们的定义和分类。3.设用复制、粘贴的方法建立了一个命令按钮数组 Command1，以下对该数组的说法错误的是（分数：2.00）A.命令按钮的所有 Caption 属性都是 Co

19、mmand1B.在代码中访问任意一个命令按钮只需使用名称 Command1 C.命令按钮的大小都相同D.命令按钮共享相同的事件过程解析：解析 访问控件数组中的一个控件应使用名称加索引，如：控件名称(索引值)4.下列不属于软件工程三要素的是（分数：1.00）A.工具B.过程C.方法D.环境 解析：解析 软件工程三要素是方法、工具和过程。5.一个工程中含有窗体 Form1、Form2 和标准模块 Model1，如果在 Form1 中有语句 Public X As Integer，在 Model1 中有语句 Public Y As Integer，则以下叙述中正确的是 _ 。（分数：2.00）A.变

20、量 X、Y 的作用域相同B.Y 的作用域是 Model1C.在 Form1 中可以直接使用 X D.在 Form2 中可以直接使用 X 和 Y解析：6.窗体上有一个名称为 Text1 的文本框，一个名称为 Command1 的命令按钮。窗体文件的程序如下： Private Type x a As Integer:b As Integer End Type Private Sub Command1_Click() Dim y As x y.a=InputBox(“) If y.a/2=y.a/2 Then y.b=y.a*y.a Else y.b=Fix(y.a/2) End If Text1.

21、Text=y.b End Sub 对以上程序，下列叙述中错误的是（分数：3.00）A.x 是用户定义的类型B.InputBox 函数弹出的对话框中没有提示信息C.若输入的是偶数，y.b 的值为该偶数的平方D.Fix(y.a/2)把 y.a/2 的小数部分四舍五入，转换为整数返回 解析：解析 本题考查的考点是有关自定义类型和 Fix 函数的。用户可以通过 Type 语句自定义类型，并可用自定义的类型声明变量。注意 Fix 函数是向下取整，Round 函数是四舍五入。7.下列程序段正确的是 _ 。（分数：2.00）A.Dim a As Integera=array(1,2,3,4)B.Dim a(

22、),b()a=array(1,2,3,4):b=aC.Dim a As Varianta=array(1,“asd“,true)D.Dim a() As Varianta=array(1,2,3,4) 解析：解析 本题考查 Array 函数。利用 Array 对数组各元素赋值，声明的数组必须是可变数组，并且其类型只能是 Variant。也可以对数组进行赋值，但是赋值号左边的数组只能声明为 Variant 的可变数组或简单变量，同时数组必须有存储空间。8.Command1_Click()事件代码如下： Private Sub Command1_Click() Dim x As Integer,

23、Y As Integer x = 6 : Y : 8 Call ABC(X, Y) Print X; Y End Sub Private Sub ABC(ByVal X As Integer，Y As Integer) X = X + 4 Y = Y = 2 End Sub 事件发生后，X 和 Y 的值分别为 _。（分数：3.00）A.6, 8B.10, 10C.10, 8D.6, 10 解析：解析 事件发生时，首先定义两个变量 X，Y 并给他们赋值 6 和 8。然后调用过程 ABC，在过程ABC 中有两个形参 X，Y。X 是按值传递，Y 是按地址传递，所以在 ABC 过程中，对形参 x 的修

24、改并不影响对应的实参 x，但对形参 Y 的修改将影响到相应的实参 Y。所以过程调用后，输出的 X、Y 值分别为6、100。9.下列叙述中，不属于软件需求规格说明书的作用的是_。（分数：1.00）A.便于用户、开发人员进行理解和交流B.反映出用户问题的结构，可以作为软件开发工作的基础和依据C.作为确认测试和验收的依据D.便于开发人员进行需求分析 解析：解析 软件需求规格说明书(SRS，SoftwareRequirementSpecification)是需求分析阶段的最后成果，是软件开发中的重要文档之一。它有以下几个方面的作用：便于用户、开发人员进行理解和交流；反映出用户问题的结构，可以作为软件开

25、发工作的基础和依据；作为确认测试和验收的依据。 10.将 E-R 图转换到关系模式时，实体与联系都可以表示成_。（分数：2.00）A.属性B.关系 C键D域解析：11.下列说法不正确的是（分数：1.00）A.对象的操作由对象的属性、事件和方法来描述B.Visual Basic 是面向对象的程序设计，Visual Basic 中只有窗体和控件两种对象 C.属性是对象的特征，不同的对象有不同的属性D.对象事件在代码窗口中体现过程解析：解析：对象的操作可由对象的属性、事件和方法来描述，所以选项 A 正确；在 Visual Basic 中的对象除了窗体和控件外还有其他的一些对象，如打印机、调试、剪贴板

26、等，所以选项 B 说“只有窗体和控件两种对象”是不正确的；属性是对象的特征，不同的对象有不同的属性，所以选项 C 的表述是正确的；事件是通过代码来实现的，所以 选项 D 对象事件在代码窗口中体现过程是正确的。12.下列关于栈的描述错误的是_。（分数：2.00）A.栈按“先进后出“组织数据B.栈是特殊的线性表，只能在一端插入或删除数据 C.栈具有记忆功能D.栈只能顺序存储解析：解析 栈是限定在一端进行插入与删除的线性表，允许插入和删除元素的一端称为栈顶，另一端称为栈底。栈顶元素是最后被插入的元素，也是最先被删除的元素，即栈是按照“先进后出“的原则组织数据的。栈具有记忆功能，带链的栈的结点存储顺序

27、与其逻辑顺序可以不一致。13.以下说法错误的是 _。（分数：1.00）A.函数过程没有返回值 B.子过程没有返回值C.函数过程可以带参数D.子过程可以带参数解析：解析 函数和过程都可以带参数，但函数可以返回值而过程不能。14.窗体上有一个名称为 Command1 的命令按钮，其单击事件过程如下： Private Sub Command1_Click() Dim x As Integer, y As Integer Static z As Integer x=3:y=5:z=y Call f(x, y, z) Print x; y; z End Sub Private Sub f(ByVal a

28、 As Integer, ByRef b As Integer, c As Integer) a=a+a:b=b+b:c=c+c End Sub 运行程序，单击命令按钮时，3 个标签中显示的内容分别是（分数：2.00）A.3 5 5B.3 5 10C.3 10 5D.3 10 10 解析：解析 在 Visual Basic 中调用过程时，参数有两种传递形式：按值传递(Byval)和按址传递(Byref)，默认为按址传递。其中，当参数按址传递时，如果在引用该参数的过程中改变了形参的值，同时也就改变了传递参数时实参变量的值。本题中 f 的参数 a 是按值传递的，b 和 c 是按地址传递的，因此在

29、f 中对 a 的改变不会影响实参 x，对 b 和 c 的操作会影响实参 x 和 y。15.在数据管理技术发展过程中，文件系统与数据库系统的主要区别是数据库系统具有_。（分数：2.00）A.数据无冗余B.数据可共享C.专门的数据管理软件D.特定的数据模型 解析：解析 在文件系统中，相互独立的记录其内部结构的最简单形式是等长同格式记录的集合，易造成存储空间大量浪费，不方便使用。而在数据库系统中，数据是结构化的，这种结构化要求在描述数据时不仅描述数据本身，还要描述数据间的关系，这正是通过采用特定的数据模型来实现的。16.两个或两个以上的模块之间关联的紧密程度称为 _ 。（分数：2.00）A.耦合度

30、B.内聚度C.复杂度D.连接度解析：解析 耦合度是模块间互相连接的紧密程度的度量：内聚度是一模块内部各个元素间彼此结合的紧密程度的度量。17.Mid(“Hello Everyone“，7，3) 的执行结果是（分数：2.00）A.yonB.everyC.Eve D.one解析：解析 Mid 函数的格式是 Mid$(字符串，p，n) 从第 P 个字符开始，向后截取 n 个字符。18.下列叙述中正确的是 _（分数：2.00）A.为了建立一个关系，首先要构造数据的逻辑关系 B.表示关系的二维表中各元组的每一个分量还可以分成若干数据项C.一个关系的属性表称为关系模式D.一个关系可以包括多个二维表解析：解

31、析 元组分量的原子性要求二维表中元组的分量是不可分割的基本数据项。关系的框架称为关系模式。一个称为关系的二维表必须同时满足关系的 7 个性质。19.多窗体操作中，窗体文件的扩展名是_ 。（分数：2.00）AbasBvbpCfrm Dcls解析：20.如果要在窗体上使用 2 组单选按钮，每组都可以有一个被选中，则应该做的是（分数：2.00）A.把 l 组单选按钮画在窗体的左边，另 1 组画在右边B.先画 2 组单选按钮，再画 2 个框架控件把 2 组单选按钮分别框起来C.先画 2 个框架控件，再把 2 组单选按钮分别画在不同的框架中 D.因为 1 个窗体中只有 1 个单选按钮可以被选中，所以需要

32、使用 2 个窗体解析：解析 框架(Frame)是一个容器控件，用于将屏幕上的对象分组，单选按钮(OptionButton)组用于提供多个选项间的唯一选择，因此若要使得每组中都有一个按钮被选中，需要将其使用框架分组。21.当组合框的 Style 属性设置为何值时，组合框称为简单组合框?（分数：1.00）A.0B.1 C.2D.3解析：22.对用 MsgBox 显示的消息框，下面 _ 是错的。（分数：1.00）A.可以有一个按钮B.可以有两个按钮C.可以有三个按钮D.可以有四个按钮 解析：解析 MsgBox 函数的按钮组合中最多只能有三个按钮。23.以下叙述中错误的是 _ 。（分数：2.00）A.

33、在程序运行时，通用对话框控件是不可见的B.在同一个程序中，用不同的方法(如 ShowOpen 或 Showsave 等)打开的通用对话框具有不同的作用C.调用通用对话框控件的 ShowOpen 方法，可以直接打开在该通用对话框中指定的文件 D.调用通用对话框控件的 ShowColor 方法，可以打开颜色对话框解析：解析 (ZornmonDialog 控件提供一组标准的操作对话框，进行诸如打开和保存文件，设置打印选项，以及选择颜色和字体等操作。在程序运行时，通用对话框控件是不可见的。在同一个程序中，用不同的方法打开的通用对话框具有不同的作用。ShowOpen 方法打开“打开”对话框；Showsa

34、ve 方法打开“另存为”对话框；ShowColor 打开“颜色”对话框；ShowFont 方法打开“字体”对话框；ShowPrinter 打开“打印”对话框；ShowHelp 调用 Windows 的“帮助”功能。因此，选项 C 错误。24.Mid(“HelloEveryone“，7,3)的执行结果是 _ 。（分数：2.00）A.ongB.everyC.Eve D.one解析：二、填空题(总题数：14，分数：28.00)25.Visual Basic 中的控件分为 3 类，它们是 _ 1_ 、ActiveX 控件和可插入对象。 （分数：1.00）解析：内部控件或标准控件解析 Visual Ba

35、sic 中的控件分为 3 类，它们是内部控件(或标准控件)、 ActiveX 控件和可插入对象。26.在菜单编辑器中建立一个菜单，其主菜单项的名称为 nmuEdit，Visible 属性为 False。程序运行后，如果用鼠标右键单击窗体，则弹出与 mnvEdit 对应的菜单。以下是实现上述功能的程序，请填空。 Private Sub Form _ 1_ (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then _ 2_ mnuEdit End If End Sub 解析：MouseDow

36、n PopupMenu解析 PopupMenu 方法的使用形式如下：对象PopupMenu 菜单名，标志，x，y。其中：x， y：是快捷菜单显示的位置。标志：指定快捷菜单的行为。当标志为 0 时，快捷菜单中的项只能对鼠标左键起反应。当标志为 1 时，快捷菜单中的项对鼠标左键和右键都起反应。标志为 2 时，PopupMenu 方法只能用在 MouseDown 事件过程。27.菜单编辑器可分为 3 个部分，即数据区、 _ 1_ 和菜单项显示区。 （分数：1.00）解析：编辑区 解析 菜单编辑器的界面分为数据区、编辑区和菜单(项)显示区三个部分。数据区用来确定菜单的名称、索引和标题等信息。编辑区用来

37、对当前的菜单项进行插入、删除等操作。显示区用来显示当前对菜单操作的结果，以便用户和自己的创建目标做比照，28.在单链表中，要删除一个指定的结点，必须要找到该结点的 1。 （分数：2.00）解析：前件29.编写一个程序把一维数组的各元素反序存放。在主过程中调用 subl 过程把从键盘上输入的 10 个元素反序存放后再输出。根据题意，请完善下列程序。 Private Sub subl(b()As Integer, ByVal n As Integer) Dim i As Integer, j As Integer, t As Integer _ 1_ j=n Do While ij t=b(i):

38、b(i)=b(j):b(j)=t i=i+1:j=j-1 Loop End Sub Private Sub Command1_Click() Dim a(1 To 10)As Integer, i As Integer Randomize For i=1 To 10 a(i)=Int(100*RnD) +1 Next i For i= _ 2_ Print a(i); Next i Print Call _ 3_ For i=i To 10 Print a(i); Next i Print n End Sub （分数：2.00）解析：i1 1 To 10 Subl(a, 10)解析 首先可用两

39、个变量 i 和 j 来表示要交换 的数组元素下标，一开始显然是 i=1、j=n；然后交换 a(i)和 a(j)的值；交换之后，i 的值应加 1 变成下一个元素的下标，j 的值减 1 变成前一个元素的下标，冉交换它们的值直到 i 的值等于或大于 j 的值为止。30.软件设计模块化的目的是 1。 （分数：2.00）解析：降低复杂性31.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer For i=1 To 10 a(i)=i Next Call swa

40、p( 1) For i=1 To 10 Print a(i)； Next End Sub Sub swap(b()As Integer) n=Ubound(b) For i=1 To n/2 t=b(i) b(i)=b(n) b(n)=t 2 Next End Sub 上述程序的功能是，通过调用过程 swap，调换数组中数值的存放位置，即 a(1)与 a(10)的值互换，a(2)与 a(9)的值互换。请填空。 （分数：4.00）解析：a()或 a n=n-1解析 本题中程序的功能是通过调用过程 Swap，实现数组中数值的存放位置，即数据组中第一个数与最后一个数互换。32.顺序存储方法是把逻辑上

41、相邻的结点存储在物理位置 _ 1_ 的存储单元中。 （分数：1.00）解析：相邻解析 数据结构一般分为逻辑结构和存储结构。顺序存储方法是数据存储结构的一种方法。数据存储结构对数据的处理效率影响很大。33.高度为 h(hO)的二叉树最少有 _ 1_ 个结点。 （分数：2.00）解析：h34.在面向对象方法中，类的实例称为 1。 （分数：2.00）解析：对象解析 类是具有相同特征的对象的抽象，对象是类的实例。35.在鼠标事件过程 MouseDown 和 MouseUp 中，参数 Button 的值为 1、2、4 时，分别代表按下鼠标的 1、 2 和 3 按钮。 （分数：6.00）解析：左 右 中间

42、 解析 MouseDown、MouscUp 和 MouseMove 事件均能区分出鼠标的左、右和中间按钮。Button 参数与按钮的对应关系是：当 Button=1 时，对应于左按钮(位 0)；当 Button=2 时，对应于右按钮 (位 1)；当 Button=4 时，对应于中间按钮(位 2)。 MouseDown、MouseUp 和 MouseMove 事件的 Shift 参数可以区分出在鼠标按下时，是否同时按下Shift、Ctrl和Alt等键盘换档键。Shift 参数与换档键对应的关系是；当 Shift=1 时，表示同时按下的是Shift健,当 ShiR=2 时，表示同时按下的是Ctrl

43、健；当 Shifi=4 时，表示同时按下的是Alt健。36.下列程序执行时，要求输入一个密码，如果密码不正确，则显示出非法用户的对话框。请填空。 Const PassWord=“12345678“ Dim inpass As String inpass= 1(“请输入你的密码“，“输入密码“) If inpass=PassWord Then Exit Sub Else 2“对不起!你是非法用户。“，vbOKOnlyvbCritical，“拒绝“ Unload Me End If （分数：1.00）解析：InputBox MsgBox37.成本效益分析的目的是从 _ 1_ 角度评价开发一个项目是否可行。 （分数：2.00）解析：经济38.为了使复选框禁用(即呈现灰色)，应把它的 Value 属性设置为 1。 （分数：2.00）解析：2解析 复选框的 Value 属性表示其选中状态，它有 3 种状态，“0”表示未选中，“1”表示选中，“2”表示不可用，因此应填“2”。