【计算机类职业资格】计算机二级(VB)49及答案解析.doc

1、计算机二级(VB)49 及答案解析(总分：100.00，做题时间：120 分钟)一、选择题(每小题 2 分，共 70 分) 下列各(总题数：35，分数：70.00)1.表达式(7/2+1)*(8/2+2)的值为（ ）。（分数：2.00）A.在活动窗体中只能通过拖拉右上角和左下角的小方块来同时在高度和宽度上缩放 控件B.若一个控件上有 4 个黑色的小方块，表明该控件是活动的C.窗体中活动控件只能有一个D.非活动控件在窗体是隐藏的2.下面有一段程序代码，如果从键盘上输入“Computer“，则在文本框内显示的内容是( )。 Private Sub Text1_KeyPress(KeyAscii A

2、s Integer) If KeyAscii =65 And KeyAscii=122 Then KeyAscii=42 End If End Sub （分数：2.00）A.ComputerB.什么都没有C.* * * * * * * *D.程序出错3.下面的属性中，用于自动调整图像框中图形内容的大小的是（ ）。（分数：2.00）A.PictureB.CurentYC.CurrentXD.Stretch4.有如下程序： Private Sub Command1 Click() Dim a As Single Dim b As Single a=5：b=4 Call S(a，B) End Sub

3、 Sub S(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub 在调用运行上述程序后，a 和 b 的值分别为（ ）。 （分数：2.00）A.java.exeB.javadoc.exeC.jdb.exeD.javaprof.exe5.下列程序段的执行结果为（ ）。 a=5 Fork=1 To 0 a=a + k Next k Print k；a （分数：2.00）A.OpenFormB.OpenqueryC.OpenReportD.RunSQL6.设 a=2,b=3,c=4,d=5，下列表达式的值是_。Not aa+c （分数：2.00）A

4、.-1B.1C.TrueD.False7. 以下语句的输出结果是( )。 a = Sqr(26) Print Formats (a，“#“) （分数：2.00）A.在成员函数声明的前面加上 virtual 修饰，就可把该函数声明为虚函数B.基类中说明了虚函数后，派生类中对应的函数也必须说明为虚函数C.虚函数可以是另一个类的友元函数，但不能是静态成员函数D.基类中说明的纯虚函数在其任何派生类中都必须实现8.新建一个窗体，其 Borderstyle 属性设置为 Fixed Single，但运行时却没有最大化和最小化按钮，可能的原因是 （ ）。（分数：2.00）A.BorderStyle 的值设为

5、FixedSingle，此项设置值的作用即禁止最大化和最小化按钮B.窗体的 MaxButton 和 MinButton 值设为 FalseC.正常情况下新建的窗体都没有最大化和最小化按钮D.该窗体可用鼠标拖动边框的方法改变窗体的大小9.以下叙述中错误的是（ ）。 （分数：2.00）A.下拉式菜单和弹出式菜单都用菜单编辑器建立B.在多窗体程序中，每个窗体都可以建立自己的菜单系统C.除分隔线外，所有菜单项都能接收 Click 事件D.如果把一个菜单项的 Enabled 属性设置为 False，则该菜单项不可见10.与 List1Text 属性值相同的是（ ）。（分数：2.00）A.任何时候都可以使

6、用标准工具栏的“菜单编辑器”按钮打开菜单编辑器B.只有当代码窗口为当前活动窗口时，才能打开菜单编辑器C.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令，打开菜单编辑器D.只有当某个窗体为当前活动窗体时，才能打开菜单编辑器11.Visual Basic 程序设计采用的编程机制是（ ）。（分数：2.00）A.可视化B.面向对象C.事件驱动D.过程结构化12.用来设置文本框有无滚动条的属性是（ ）。（分数：2.00）A.在 File1 中的 Change 事件中，输入 File1Path=Dir1PathB.在 Dirl 中的 Change 事件中，输入 File1Path=Dir1PathC

7、.在 File1 中的 Change 事件中，输入 Dir1Path=File1PathD.在 Dir1 中的 Change 事件中，输入 Dir1Path=File1Path13.从工程管理角度,软件设计一般分为两步完成,它们是【 】（分数：2.00）A.概要设计与详细设计B.数据设计与接口设计C.软件结构设计与数据设计D.过程设计与数据设计14.下列对于线性链表的描述中正确的是_。 （分数：2.00）A.存储空间不一定是连续，且各元素的存储顺序是任意的B.存储空间不一定是连续，且前件元素一定存储在后件元素的前面C.存储空间必须连续，且前件元素一定存储在后件元素的前面D.存储空间必须连续，且

8、各元素的存储顺序是任意的15.Visual Basic 60 分为 3 种版本，不属于这 3 种版本的是（ ）。（分数：2.00）A.学习版B.专业版C.企业版D.业余版16.用 InputBox 函数设计的对话框，其功能是（ ）。（分数：2.00）A.只能接收用户输入的数据，但不会返回任何信息B.能接收用户输入的数据，并能返回用户输入的信息C.既能用于接收用户输入的信息，又能用于输出信息D.专门用于输出信息17.假定在图片框 Picture1 中装入了一个图形，为了清除该图形（不删除图片框），应采 用的正确方法是_。 （分数：2.00）A.选择图片框，然后按 Del 键B.执行语句 Pict

9、ure1.Picture = LoadPicture (“)C.执行语句 Picture1.Picture =“D.选择图片框，在属性窗口中选择 Picture 属性条，然后按回车键18.在窗体上画一个命令按钮和两个标签,其名称分别为 Command1、Label1 和 Label2,然后编写如下事件过程： Private Sub Command1_Click() a=0 For i=1 To 10 a=a+1 b=0 For j=1 To 10 a=a+1 b=b+2 Next j Next i Label1.Caption=str(a) Label1.Caption=str(b) End

10、Sub 程序运行后,单击命令按钮,在标签 Label1 和 Label2 中显示的内容分别是【 】 （分数：2.00）A.10 和 20B.20 和 10C.200 和 110D.110 和 2019.单击命令按钮，下列程序的执行结果是( )。 Private Sub Blck (x As Integer) x = x * 2 + l If x 6 Then Call Blck(x) End If x = x * 2 + 1 Print x； End Sub Private Sub Commandl_Click() Blck 2 End Sub （分数：2.00）A.aa=falseB.aa=

11、FalseC.aa=“true“D.aa=020.在 PasswordChar 属性中设置#，但运行时仍显示文本内容，原因是（ ）。（分数：2.00）A.文本框的 Locked 属性设置为 FalseB.文本框的 Locked 属性设置为 TreeC.文本框的 Multiline 的属性设置为 FasleD.文本框的 Multiline 的属性设置为 True21.只有将组合框的 Style 属性设置为何值时，才能触发 DblClick 事件?（分数：2.00）A.0B.1C.2D.322.下面程序段执行结果为（ ）。 x=Iht(Rnd()+4) Select Case x Case 5 P

12、rint“excellent“ Case 4 Print“good“ Case 3 Print“paSS“ Case Else Print “fail“ End Select （分数：2.00）A.0 0B.1 1C.2 2D.1 223.下列过程定义语句中，形参个数为不确定数量的过程是（ ）。（分数：2.00）A.Private Sub Pro3(x As Double，y As Single)B.Private Sub Pro3(Arr(3)，Option x，Option y)C.Private Sub Pro3(ByRef x，ByVal y，Arr()D.Private Sub Pr

13、o3(ParamArray Arr()24.数据库设计的四个阶段是：需求分析、概念设计、逻辑设计和【 】（分数：2.00）A.编码设计B.测试阶段C.运行阶段D.物理设计25.在窗体上有 1 个名称为 CommonDialog1 的通用对话框和 1 个名称为 Command1 的命令按钮,以及其他一些控件。要求在程序运行时,单击 Command1 按钮,则显示打开文件对话框,并在选择或输入个文件名后,就可以打开该文件。以下是 Command1_Click 事件过程的两种算法 算法 1： Private Sub Command1_Click() CommonDialog1.Show Open O

14、pen CommonDialog1.File Name For Input As#1 End Sub 算法 2： Private Sub Command1_Click() CommonDialog1.Show Open If CommonDialog1.File Namen Do While m n：m=m - n：Loop Do While m n：n=n - m：Loop Loop MyFunc=m End FunCtion （分数：2.00）A.Dim gg1，5As StringB.Dim gg1 To 5，1 To 5As StringC.Dim gg(1 To 5)As Strin

15、gD.Dim gg1：5，1：5As String29.有如下事件过程： Private Sub Command1_Click( ) Dim m AS Integer，n AS Integer m=2：n=1 Print “m=“；m；“n=“；n Call TOD(m，n) Print “m=“；m；“n=“；n End Sub Sub TOD(x，y) x=x2 y=y3 End Sub 程序运行后，输出的结果为( )。 （分数：2.00）A.Swing 胜过 AWT 的主要优势在于 MVC 体系结构的普遍使用B.MVC 用户界面存在 3 个通讯对象：模型、视图和控件C.MVC 其思想是把

16、数据的内容本身和显示方式分离开来D.以上说法都正确30.资源文件的扩展名是（ ）。（分数：2.00）A.将在文本框 Text1 输入的数字变为数值B.将在文本框 Text1 输入的数字作为半径，求圆的周长并转换为字符串C.只要 Text1 中的内容一改变，Text2 中显示的圆周长也随之改变D.事件过程中的 Val 函数和 Str 函数使用错误，事件过程不能执行31.以下关于 MsgBox 的叙述中，错误的是（ ）。（分数：2.00）A.MsgBox 函数返回一个整数B.通过 MsSBox 函数可以设置信息框中图标和按钮的类型C.MsgBox 语句没有返回值D.MsgBox 函数的第二个参数是

17、一个整数，该参数只能确定对话框中显示的按钮数量32.与 List1Text 属性值相同的是（ ）。（分数：2.00）A.List1ListCountB.List1List(ListCount-1)C.List1ListIndexD.List1List(ListListIndex)33.假定通用对话框的名称为 CommonDialog1，命令按钮的名称为 Command1，则单击命 令按钮后，能使打开的对话框的标题为“New Title”的事件过程是_。（分数：2.00）A.Private Sub Command1_Click() CommonDialog1.DialogTitle = “New

18、 Title“ CommonDialog1.ShowPrinter End SubB.Private Sub Command1_Click() CommonDialog1.DialogTitle = “New Title“ CommonDialog1.ShowFont End SubC.Private Sub Command1_Click() CommonDialog1.DialogTitle = “New Title“ CommonDialog1.ShowOpen End SubD.Private Sub Command1_Click() CommonDialog1.DialogTitle

19、= “New Title“ CommonDialog1.ShowColor End Sub34.使“Microsoft“在当前窗体上输出的语句是（ ）。（分数：2.00）A.k=7 b=14B.k=6 b=6C.k=4 b=8D.k=6 b=1235.在 VisualBasic 中按文件的编码方式不同，可将文件分为（ ）。（分数：2.00）A.顺序文件和随机文件B.文本文件和数据文件C.ASCH 文件和二进制文件D.数据文件和可执行文件二、填空题（每空 2 分，共 30 分）(总题数：15，分数：30.00)36.在面向对象方法中，类的实例称为 1。（分数：2.00）填空项 1:_37.下列程

20、序的输出结果为 1。 num=2 While num0) 3 (x Mod 400=0)Then Print“是闰年“ Else Print“不是闰年，是普通年份“ End If End Sub （分数：2.00）填空项 1:_43.如果要将形状控件的内部设置为水平线，应将 Fillstyle 属性设置为 1。（分数：2.00）填空项 1:_44.数据结构分为线性结构和非线性结构,带链的队列属于 1。（分数：2.00）填空项 1:_45.如图所示，在列表框 List1 中已经有若干人的简单信息，运行时在 Text1 文本框（即“查 找对象”右边的文本框）输入一个姓或姓名，单击“查找”按钮，则在

21、列表框中进行查 找，若找到，则把该人的信息显示在 Text2 文本框中。若有多个匹配的列表项，则只显 示第 1 个匹配项；若未找到，则在 Text2 中显示“查无此人”。请填空。 （分数：2.00）填空项 1:_46.以下程序段的输出结果是 1。 num=0 While num=2 num=num+1 Wend Print num （分数：2.00）填空项 1:_47.下面的程序用于根据文本框 Test 中输入的内容进行以下处理： 若 Text 为 1，则打印“您的成绩为优秀！”；若 Text 为 2，则打印“您的成绩为良好!”；若 Text 为 3，则打印“您的成绩为一般”；否则打印“您的成

22、绩一般以下!”，请填空。 Private Sub Command1_Click1 Selct Case Val(Text1.Text) Case 2 Print “您的成绩为优秀！“ Case 3 Print “您的成绩为良好！“ Case 4 Print “您的成绩为一般！“ Case Else Print “您的成绩为一般以下！“ End Select End Sub （分数：2.00）填空项 1:_48.在进行模块测试时，要为每个被测试的模块另外设计两类模块：驱动模块和承接模块（桩模块）。其中 1 的作用是将测试数据传送给被测试的模块，并显示被测试 模块所产生的结果。（分数：2.00）填

23、空项 1:_49.下列语句的输出结果是 1。 Print Format$(6658.6，“000,000.00“) （分数：2.00）填空项 1:_50.为了使计时器控件 Timer1 每隔 0.5 秒触发一次 Timer 事件，应将 Timer1 控件的 1 属性设置为 2。（分数：2.00）填空项 1:_计算机二级(VB)49 答案解析(总分：100.00，做题时间：120 分钟)一、选择题(每小题 2 分，共 70 分) 下列各(总题数：35，分数：70.00)1.表达式(7/2+1)*(8/2+2)的值为（ ）。（分数：2.00）A.在活动窗体中只能通过拖拉右上角和左下角的小方块来同时

24、在高度和宽度上缩放 控件B.若一个控件上有 4 个黑色的小方块，表明该控件是活动的C.窗体中活动控件只能有一个 D.非活动控件在窗体是隐藏的解析：属性是一个对象的特性，不同的对象有不同属性，故选项 C)是不正确 的；引用属性的一般格式为：对象名属性名称，故选项 A)不正确；对象的属性值可以在 属性窗口中设置，也可以在程序语句中设置，故迭项 D)是不正确的；对象是有特殊属性 和行为方法的实体，不同的对象有不同的属性，选项 B)是正确的。2.下面有一段程序代码，如果从键盘上输入“Computer“，则在文本框内显示的内容是( )。 Private Sub Text1_KeyPress(KeyAsc

25、ii As Integer) If KeyAscii =65 And KeyAscii=122 Then KeyAscii=42 End If End Sub （分数：2.00）A.ComputerB.什么都没有C.* * * * * * * * D.程序出错解析：此事件过程是 KeyPress 事件过程，所以参数 KeyAscii 得值是键盘输入的 字符得 ASCII 码值，上述过程对输入得字符进行判断，如果其 ASCII 码大于 65(大写字母 “A”)并小于 122(小写字母“a”)，则用星号(ASCII 码为 42)代替，而运行过程中，题意 是要从键盘上输入“ Computer “，则

26、应在文本框中显示“* * * * * * * *”。3.下面的属性中，用于自动调整图像框中图形内容的大小的是（ ）。（分数：2.00）A.PictureB.CurentYC.CurrentXD.Stretch 解析：本题的目的在于考查学生对图形控件的属性设置。Picture 属性用于窗体、图片框和图像框，它可以通过属性窗口设置，用来把图形放到这些对象中，因此选项 A)是不正确的；CurrentX 和 CurrentY 用来设置下一个输出的水平坐标和垂直坐标，因此选项 B)和 C)都不正确；Stretch 属性用于图像框，用于自动调整图像框中图形内容的大小，既可通过属性窗口设置，也可以通过程序代

27、码设置，该属性的取值为True 或 False，当其值为 False 时，将自动放大或缩小图像框中的图形以与图像框的大小相适应，因此选项 D)是正确的。4.有如下程序： Private Sub Command1 Click() Dim a As Single Dim b As Single a=5：b=4 Call S(a，B) End Sub Sub S(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub 在调用运行上述程序后，a 和 b 的值分别为（ ）。 （分数：2.00）A.java.exeB.javadoc.exeC.jdb.ex

28、e D.javaprof.exe解析：javaxswingJApplet 是 Applet 的直接子类，继承了 Applet 的方法与 执行机制。javaawtpanel 是 java.aPpletApplet 的直接父类，java.awt.Window 是 java. awl.frame 的直接父类。5.下列程序段的执行结果为（ ）。 a=5 Fork=1 To 0 a=a + k Next k Print k；a （分数：2.00）A.OpenFormB.OpenqueryC.OpenReport D.RunSQL解析：A)选项用于打开窗体，B)选项用于打开查询，D)选项用于关闭数据库对象

29、。6.设 a=2,b=3,c=4,d=5，下列表达式的值是_。Not aa+c （分数：2.00）A.-1B.1C.TrueD.False 解析：本题考的是运算符的优先顺序。在表达式中，当运算符不只一种时，要先处理算术运算符，接着处 理比较运算符，然后再处理逻辑运算符。本题中 aa+c 返回真。Not 真就 是假，假 And 真也返回假，最后假 Or 假，也返回假，所以最后值为 False。7. 以下语句的输出结果是( )。 a = Sqr(26) Print Formats (a，“#“) （分数：2.00）A.在成员函数声明的前面加上 virtual 修饰，就可把该函数声明为虚函数B.基类

30、中说明了虚函数后，派生类中对应的函数也必须说明为虚函数 C.虚函数可以是另一个类的友元函数，但不能是静态成员函数D.基类中说明的纯虚函数在其任何派生类中都必须实现解析：本题考查的是数组的基本使用，数组还可以通过对应的指针调用 传递参数，其余选项的说法都是正确的。8.新建一个窗体，其 Borderstyle 属性设置为 Fixed Single，但运行时却没有最大化和最小化按钮，可能的原因是 （ ）。（分数：2.00）A.BorderStyle 的值设为 FixedSingle，此项设置值的作用即禁止最大化和最小化按钮B.窗体的 MaxButton 和 MinButton 值设为 False C

31、.正常情况下新建的窗体都没有最大化和最小化按钮D.该窗体可用鼠标拖动边框的方法改变窗体的大小解析：如果窗体的 BorderStyle 属性设置为 Fixed Single，则窗体为固定单边框，可以包含控制菜单框、标题栏、最大化和最小化按钮，但要注意的是，如果窗口的 MaxButton 和 MinButton 属性设置为 True，则可以使用，运行时显示最大化和最小化按钮；如果设置为 False，则运行时不显示。9.以下叙述中错误的是（ ）。 （分数：2.00）A.下拉式菜单和弹出式菜单都用菜单编辑器建立B.在多窗体程序中，每个窗体都可以建立自己的菜单系统C.除分隔线外，所有菜单项都能接收 Cl

32、ick 事件D.如果把一个菜单项的 Enabled 属性设置为 False，则该菜单项不可见 解析：10.与 List1Text 属性值相同的是（ ）。（分数：2.00）A.任何时候都可以使用标准工具栏的“菜单编辑器”按钮打开菜单编辑器B.只有当代码窗口为当前活动窗口时，才能打开菜单编辑器C.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令，打开菜单编辑器D.只有当某个窗体为当前活动窗体时，才能打开菜单编辑器 解析：在 Visual Basic 中，对话框分为 3 种类型：即预定义对话框、自定义对话 框和通用对话框，所以选项 A)不正确；预定义对话框也称预制对话框，是由系统提供的， Vus

33、ual Basic 系境提供了两种预定义对话框：即输入框和信息框(或消息框)，前者用 In- putBox 函数建立，后者用 MagBox 函数建立，所以选项 C)和选项 D)不正确；自定义对话框 也称定制对话框，这种对话框由用户根据自已的需要进行定义，输入框和信息框尽管很 容易建立，但在应用上有一定的限制，所以选项 B)是正确的；通用对话框是一种控件用 追种控件可以设计较为复杂的对话框 11.Visual Basic 程序设计采用的编程机制是（ ）。（分数：2.00）A.可视化B.面向对象C.事件驱动 D.过程结构化解析：可视化是一种程序设计技术，它把繁锁、复杂的工作交由系统完成，从而减轻程

34、序设计人员编写代码的工作量。面向对象是一种程序设计方法，这种方法将数据和代码封装起来而成为对象；事件驱动是一种编程机制，它由事件而驱动程序调用通用过程来执行指定的操作；过程结构化则是传统的“面向过程”程序设计语言的编程思想。12.用来设置文本框有无滚动条的属性是（ ）。（分数：2.00）A.在 File1 中的 Change 事件中，输入 File1Path=Dir1PathB.在 Dirl 中的 Change 事件中，输入 File1Path=Dir1Path C.在 File1 中的 Change 事件中，输入 Dir1Path=File1PathD.在 Dir1 中的 Change 事件

35、中，输入 Dir1Path=File1Path解析：菜单控件的主要属性有：Caption、Name、Index、Enabled、Visible 等，其中 Enabled 和 Visible属性值为逻辑值，Visible 属性用于表示菜单项是否可见，Enabled 属性用于表示菜单项是否可用。当Enabled 属性值为 False 时，表示菜单项当前不可 用，属性值为 True 时，表示菜单项可用。13.从工程管理角度,软件设计一般分为两步完成,它们是【 】（分数：2.00）A.概要设计与详细设计 B.数据设计与接口设计C.软件结构设计与数据设计D.过程设计与数据设计解析：软件设计是开发阶段最重

36、要的步骤。从工程管理的角度来看可分为两步：概要设计和详细设计。从技术观点来看,软件设计包括软件结构设计、数据设计、接口设计、过程设计 4 个步骤。 14.下列对于线性链表的描述中正确的是_。 （分数：2.00）A.存储空间不一定是连续，且各元素的存储顺序是任意的 B.存储空间不一定是连续，且前件元素一定存储在后件元素的前面C.存储空间必须连续，且前件元素一定存储在后件元素的前面D.存储空间必须连续，且各元素的存储顺序是任意的解析：在链式存储结构中，存储数据结构的存储空间可以不连续，各数据结点的存储顺序与数据元素之间 的逻辑关系可以不一致，而数据元素之间的逻辑关系是由指针域来确定的。15.Vis

37、ual Basic 60 分为 3 种版本，不属于这 3 种版本的是（ ）。（分数：2.00）A.学习版B.专业版C.企业版D.业余版 解析：Visual Basic 包括 3 种版本，分别为学习版、专业版和企业版。学习版是 Visual Basic 最基本、最便宜的版本，包括创建 Windows 应用程序所需要的内部控件及数据网格、数据绑定控件等；专业版包括学习版中的全部内容，又增加了立体控件、动画按钮、通讯控件、进度条、工具栏和 Internet 控件等开发应用程序所需要的全套工具，功能更强大；企业版包括专业版中的全部内容，是 Visual Basic 的最强版本，为软件开发团队开发大型的

38、网络环境应用软件体系提供了强有力的支持。16.用 InputBox 函数设计的对话框，其功能是（ ）。（分数：2.00）A.只能接收用户输入的数据，但不会返回任何信息B.能接收用户输入的数据，并能返回用户输入的信息 C.既能用于接收用户输入的信息，又能用于输出信息D.专门用于输出信息解析：InputBox 函数能接收用户输入的数据，并能返回用户输入的信息，不能用于输出信息。InputBox函数中的 Prompt 参数是在 对话框中显示提示信息，这种提示信息是由用户确定的，不能把它当作输出信息的功能。17.假定在图片框 Picture1 中装入了一个图形，为了清除该图形（不删除图片框），应采 用

39、的正确方法是_。 （分数：2.00）A.选择图片框，然后按 Del 键B.执行语句 Picture1.Picture = LoadPicture (“) C.执行语句 Picture1.Picture =“D.选择图片框，在属性窗口中选择 Picture 属性条，然后按回车键解析：选项 A 的结果是删除图片框；选项 B 是清除图形；选项 C 语句错误，类型不匹配；选项 D 是不起任何作用。18.在窗体上画一个命令按钮和两个标签,其名称分别为 Command1、Label1 和 Label2,然后编写如下事件过程： Private Sub Command1_Click() a=0 For i=1

40、 To 10 a=a+1 b=0 For j=1 To 10 a=a+1 b=b+2 Next j Next i Label1.Caption=str(a) Label1.Caption=str(b) End Sub 程序运行后,单击命令按钮,在标签 Label1 和 Label2 中显示的内容分别是【 】 （分数：2.00）A.10 和 20B.20 和 10C.200 和 110D.110 和 20 解析：在本题中由于每次执行外循环体时,变量 b 都被初始化为 0,故只有最后一次执行外循环体时 b 的值才是最终在标签上显示的内容,根据内循环中的代码知其结果为：10 x 2=20；而在每次执

41、行外循环体时变量 a 的值增加 10+1=11,其最终结果为：10*(10+1)=110。19.单击命令按钮，下列程序的执行结果是( )。 Private Sub Blck (x As Integer) x = x * 2 + l If x 6 Then Call Blck(x) End If x = x * 2 + 1 Print x； End Sub Private Sub Commandl_Click() Blck 2 End Sub （分数：2.00）A.aa=false B.aa=FalseC.aa=“true“D.aa=0解析：在类 A 中有 geta( )函数，在类 B 中也有

42、geta( )函数，类 C 继承了类 A 和类 B，这样就产生了二义性，所以程序会出错。20.在 PasswordChar 属性中设置#，但运行时仍显示文本内容，原因是（ ）。（分数：2.00）A.文本框的 Locked 属性设置为 FalseB.文本框的 Locked 属性设置为 TreeC.文本框的 Multiline 的属性设置为 FasleD.文本框的 Multiline 的属性设置为 True 解析：选项 A)和 B)中，Locked 属性是决定控件是否失效，不符合本题的本意；而 MultiLine 属性决定文本框是否可以输入多行文本，如果设置为 True，则 Pass- wordC

43、har 失效，所以选项 C)错误，选项 D)正确。21.只有将组合框的 Style 属性设置为何值时，才能触发 DblClick 事件?（分数：2.00）A.0B.1 C.2D.3解析：组合框的事件依赖于其 Style 属性，只有 Style 属性设置为 1 时，才能接收 DblClick 事件，因此只有 B)选项正确。22.下面程序段执行结果为（ ）。 x=Iht(Rnd()+4) Select Case x Case 5 Print“excellent“ Case 4 Print“good“ Case 3 Print“paSS“ Case Else Print “fail“ End Sel

44、ect （分数：2.00）A.0 0B.1 1 C.2 2D.1 2解析：调用一个过程时，必须把实际参数传送给过程，完成形式参数与实际参数的结合，然后用实际参数执行调用的过程；因为在默认的情况下，变量都是通过 “引用”传送给 S 过程，在这种情况下，可以通过改变过程中相应的参数来改变变量的值；过程 S 的形参获得 a，b 的地址，此时 x = 5，y = 4，在过程S 中，将 x，即 5 的值赋给 t，而将 t/y 的值赋给 x。将 t 除以 y 的余数赋给 y，此时 x，y 的值为 l，1。23.下列过程定义语句中，形参个数为不确定数量的过程是（ ）。（分数：2.00）A.Private S

45、ub Pro3(x As Double，y As Single)B.Private Sub Pro3(Arr(3)，Option x，Option y)C.Private Sub Pro3(ByRef x，ByVal y，Arr()D.Private Sub Pro3(ParamArray Arr() 解析：本题考核可选参数、可变参数的定义方法。 在虚参中，As 关键字用于说明变量或数组的类型；Option 关键字用于说明虚参是可选的 ByRef 关键字用于说明传址的数据传送方式；ByVal 关键字用于说明传值的数据传送方式；ParamArray 关键字用于说明参数的个数是不确定的，即过程可以

46、接受任意个数的参数。24.数据库设计的四个阶段是：需求分析、概念设计、逻辑设计和【 】（分数：2.00）A.编码设计B.测试阶段C.运行阶段D.物理设计 解析：数据库设计目前一般采用生命周期法,即将整个数据库应用系统的开发分解成目标独立的若干阶段。它们是：需求分析阶段、概念设计阶段、逻辑设计阶段和物理设计阶段。 25.在窗体上有 1 个名称为 CommonDialog1 的通用对话框和 1 个名称为 Command1 的命令按钮,以及其他一些控件。要求在程序运行时,单击 Command1 按钮,则显示打开文件对话框,并在选择或输入个文件名后,就可以打开该文件。以下是 Command1_Clic

47、k 事件过程的两种算法 算法 1： Private Sub Command1_Click() CommonDialog1.Show Open Open CommonDialog1.File Name For Input As#1 End Sub 算法 2： Private Sub Command1_Click() CommonDialog1.Show Open If CommonDialog1.File Namen Do While m n：m=m - n：Loop Do While m n：n=n - m：Loop Loop MyFunc=m End FunCtion （分数：2.00）A.

48、Dim gg1，5As StringB.Dim gg1 To 5，1 To 5As StringC.Dim gg(1 To 5)As String D.Dim gg1：5，1：5As String解析：new 是动态申请内存空间时使用的关键字，不能作为函数的返回 类型，选项 A)为无返回值，选项B)为返回整型，选项 D)为返回长整型。NULL29.有如下事件过程： Private Sub Command1_Click( ) Dim m AS Integer，n AS Integer m=2：n=1 Print “m=“；m；“n=“；n Call TOD(m，n) Print “m=“；m；“n=“；n End Sub Sub TOD(x，y) x=x2