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

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

1、计算机二级(VB)40 及答案解析(总分：100.00，做题时间：120 分钟)一、选择题(每小题 2 分，共 70 分) 下列各(总题数：35，分数：70.00)1.某二叉树中有 n 个度为 2 的结点,则该二叉树中的叶子结点数为【 】（分数：2.00）A.n+lB.n-1C.2nD.n22.任何控件都有的属性是（ ）。（分数：2.00）A.BackColorB.CaptionC.NameD.BorderStyle3.有如下程序： Private Sub Commandl_Click( ) Dim i As Integer For i=1 To 2 DS Next i End Sub Sub

2、 DS( ) Dim x As Integer，m As String Static y，n X=X + 1 y=y + 1 m=m &“*”：n=n&“#“ Print x，y，m，n End Sub 程序运行后，输出的结果是( )。 （分数：2.00）A.1 1 * #B.1 1 * #C.1 1 * # 1 1 * # 1 2 * #D.1 1 * # 1 1 * # 1 2 * #4.如果在程序中要将 c 定义为静态变量，且为整型数，则应使用的语句是（ ）。（分数：2.00）A.视图结构可以使用 MODIFY STRUCTURE 命令来修改B.视图不能同数据库表进行联接操作C.视图不能

3、进行更新操作D.视图是从一个或多个数据库表中导出的虚拟表5.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是（ ）。 （分数：2.00）A.4B.5C.6D.76.在属性窗口中设置何属性，可以把指定的图形放入当前对象中? （分数：2.00）A.5B.14C.8D.输出

4、项不合法，无正常输出7.新建一个列表框，要实现对列表项可以复选，应设置的属性是（ ）。（分数：2.00）A.ScrollBarsB.MultiSelectC.DataFieldD.Stretch8.在窗体上画一个名称为 List1 的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为（ ）。 （分数：2.00）A.For i=0 To List1.ListCount-1 NextB.For i=0 To ListCount-1 NextC.For i=1 To List1.listCount NextD.For i=1 To ListCount Next9.单击一次命令结束后，下

5、列程序的执行结果是( )。 Private Sub Commandl_Click( ) s=Sat(1)+Sat(2)+Sat(3)+Sat(4) Print s End Sub Public Function Sat(N As Integer) Static Sum For i=1 To N Sum=Sum+i Next i Sat=Sum End Function （分数：2.00）A.(5)B.(6)C.(7)D.(11)10.执行以下程序段后,变量 c$的值为【 】 a$=“Visual Basic Programming“ b$=“Quick“ c$=b$&UCase(Mid$(a$

6、,7,6)&Right$(a$,12) （分数：2.00）A.Visual BASIC ProgrammingB.Quick Basic ProgrammingC.QUICK Basic ProgrammingD.Quick BASIC Programming11.Sub 过程与 Function 过程最根本的区别是（ ）。（分数：2.00）A.2，3B.3，2C.2，2D.3，312.设有如下关系表_。 （分数：2.00）A.T=RSB.T=RSC.T=RSD.T=R/S13.用 InputBox 函数设计的对话框，其功能是（ ）。（分数：2.00）A.只能接收用户输入的数据，但不会返回任何

7、信息B.能接收用户输入的数据，并能返回用户输入的信息C.既能用于接收用户输入的信息，又能用于输出信息D.专门用于输出信息14.通常情况下，垂直滚动条的值是（ ）。（分数：2.00）A.由下往上递增B.由上往下递增C.由左到右递增D.由右到左递增15.有如下程序： Private Sub Commandl_Click() Dim a As Integer a=2 For i=1 To 3 Print Gad (a) Next i End Sub Function Gad (a As Integer) b=0 Static c b=b + 1 c= c + 1 Gad= a + b + C End

8、 Function 运行上面的程序后，单击命令按钮，输出结果为( )。 （分数：2.00）A.1 2 3B.2 3 4C.4 5 6D.1 4 616.在窗体上有一个命令按钮，然后编写如下事件过程 Private Sub Command1 _ cickc ( ) a=InputBox(“enter the first integer“) b=InputBox(“enter the second integer“) Print b + a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入“2”和“6”，则输出结果为( )。 （分数：2.00）A.ifstream fin；fi

9、nopen(“C：/testtxt“)；B.ifstream fin(“C：/testtxt“)；C.A)和 B)D.ifstream fin；fin(“C：/testtxt“)；17.数据独立性是数据库技术的重要特点之一。所谓数据独立性是指_。 （分数：2.00）A.数据与程序独立存放B.不同的数据被存放在不同的文件中C.不同的数据只能被对应的应用程序所使用D.以上三种说法都不对18.当组合框的 Style 属性设置为何值时，组合框称为下拉式列表框？（分数：2.00）A.0B.1C.2D.319.变量 L 的值为-8，则-L2 的值为（ ）。（分数：2.00）A.64B.-64C.16D.-

10、1620.设在窗体上有个文本框，然后编写如下的事件过程： Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1Text=“BBBBB“ End If End Sub 上述程序运行后，如果按【Shift+F2】，则在文本框中显示的是（ ）。 （分数：2.00）A.Alt+F2B.BBBBBC.随机

11、出几个数D.文本框平均内容无变化21.下列语句中，获得列表框 List1 中项目个数的语句是（ ）。（分数：2.00）A.x8B.x8C.s(0)D.v822.对窗体编写如下事件过程： Option Base 1 Private Sub Form_KeyPress (KeyAScii AS Integer) arr=Array(12，15，18，20，24) m1=arr(1) m2=1 If fKeyAscii=12 Then For i=2 To 5 If arr(i)m1 Then m1=arr(i) m2=i End If Next i End If Print m1 Print m2

12、 End Sub 程序运行之后按回车键，输出结果为( )。 （分数：2.00）A.12 1B.20 2C.18 5D.24 1223.以下叙述中错误的是【 】（分数：2.00）A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用 Public 定义的通用过程不能被其他窗体调用C.窗体和标准模块需要分别保存为不同类型的磁盘文件D.用 Dim 定义的窗体层变量只能在该窗本中使用24.单击一次命令按钮后，下列程序的执行结果为（ ）。 Private Sub Command1_Click() Dim m As Integer，I As Integer，x(10) As Integer For I=

13、0 To 4：x(I)=I+1：Next I For I=1 TO 2：Call Prioc(x)：Next I For I=0 TO 3：Print x(I)；：Next I End Sub Private Sub Prioc(a()As Integer) Static I As Integer Do a(I)=a(I)+a(I+1) I=I+1 Loop While I2 End Sub （分数：2.00）A.3 4 7 5B.3 5 7 4C.1 2 3 4D.1 2 3 525.下列程序段的执行结果为( )。 I=4 x=5 Do I=I + 1 X=K2 Loop Until I=7

14、 Print“I=“；I Print“x=“；x （分数：2.00）A.I=4 x=258694B.I=7 x=256987C.I=6 x=365840D.I=7 x=39062526.下列说法不正确的是（ ）。（分数：2.00）A.System 类B.Class 类C.Thread 类D.Object 类27.窗体文件的扩展名是（ ）。（分数：2.00）A.Rem 注释内容B.注释内容C.a=3：b=2，对 a、b 赋值D.Private Sub Command1_MouseDown(button As Integer，shift As Integer，_Rem 鼠标按下事件的命令调用过程

15、X As Single，Y As Single)28.假定有如下的窗体事件过程： Private Sub Form_Click() a$ = “Microsoft Visual Basic“ b$ = Right(a$, 5) c$ = Mid(a$, 1, 9) MsgBox a$, 34, b$, c$, 5 End Sub 程序运行后，单击窗体，则在弹出的信息框的标题栏中显示的信息是_。 （分数：2.00）A.Microsoft VisualB.MicrosoftC.BasicD.529.在窗体上画一个名称为 CommonDialog1 的通用对话框，一个名称为 Command1 的命令

16、按钮。然后编写如下事件过程： Private Sub Command1_Click( ) CommonDialoglFileName=“” CommonDialogl，Filter“All File*(*Doc)*Doc(*Txt)*Txt” CommonDialoglFilterlndex2 CommonDialoglDialogTitle“VBTest” CommonDialoglAction1 End Sub 对于这个程序，以下叙述中错误的是（ ）。 （分数：2.00）A.该对话框被设置为“打开”对话框B.该对话框的标题为 VBTestC.在该对话框中指定的默认文件名为空D.在该对话框中

17、指定的默认文件类型为文本文件(*Txt)30.下列程序段的执行结果为（ ）。 a=1 b=0 Select Case a Case 1 Select Case b Case 0 Print“*0*“ Case 1 Print“*1*“ End Select Case 2 Print“*2*“ End Select （分数：2.00）A.* * 0 * *B.* * 1 * *C.* * 2 * *D.031.如果在窗体上添加一个通用对话框控件 DBT，那么语句“DBTAction=4”的作用是（ ）。（分数：2.00）A.编译器是检查程序错误的第一道防线B.源程序编译过程中没有出现任何错误，执

18、行时就不会发生错误C.Java 的异常处理机制是检查程序错误的第二道防线D.选项 A) 和 C) 正确32.如果在程序中要将 c 定义为静态变量，且为整型数，则应使用的语句是（ ）。（分数：2.00）A.Redim a As IntegerB.Static a As IntegerC.Public a As IntegerD.Dim a As Integer33.以下说法不正确的是（ ）。（分数：2.00）A.使用 ReDim 语句可以改变数组的维数B.使用 ReDim 语句可以改变数组的类型C.使用 ReDim 语句可以改变数组的每一维的大小D.使用 ReDim 语句可以改变对数组中的所有元

19、素进行初始化34.语句 Print 5/4*6/5 Mod 2 的输出结果是（ ）。 （分数：2.00）A.0B.1C.2D.335.设 a=5,b=6,c=7,d=8,执行下列语句后,X 的值为【 】 X=IIF(ab)And(Cd),10,20) （分数：2.00）A.10B.20C.TrueD.False二、填空题（每空 2 分，共 30 分）(总题数：15，分数：30.00)36.如果要将形状控件的内部设置为水平线，应将 Fillstyle 属性设置为 1。（分数：2.00）填空项 1:_37.在窗体上有几个对象，运行程序时，当对象得到焦点时，会触发 1 事件，当对象失 去焦点时将触发

20、 2 事件。 （分数：2.00）填空项 1:_38.按“先进后出“原则组织数据的数据结构是 1。（分数：2.00）填空项 1:_39.在数据库系统中,实现各种数据管理功能的核心软件称为 1。 （分数：2.00）填空项 1:_40.将 C 盘根目录下的图形文件 moon.jpg 装入图片框 Picture1 的语句是 1。（分数：2.00）填空项 1:_41.本程序的功能是利用随机数函数模拟投币，方法是；每次随机产生一个 0 或 1 的整数，相当于一次投币，1 代表正面，0 代表反面。在窗体上有三个文本框，名称分别是 Text1、Text2、 Text3，分别用于显示用户输入投币总次数、出现正面

21、的次数和出现反面的次数，如图所示。 程序运行后，在文本框 Text1中输入总次数，然后单击“开始”按钮，按照输入的次数模拟投币，分别统计出现正面、反面的次数，并显示结果。以下是实现上述功能的程序，请填空。 （分数：2.00）填空项 1:_42.下列程序计算 Sn 的值。Sn=a+aa+aaa+aaaa，其中最后一项为 n 个。 例如：a=5，n=4 时，则Sn=5+55+555+5555。请在空白处填入适当的内容，将程序补充完整。 Private Sub Command1_Click1 Dim a As Integer，n As Integer，Cout As Integer Dim Sn A

22、s Long，Tn As Long Cout=1 Sn=0 Tn=0 a=InputBox(“请输入 a 的值：“) 2 Do Tn=Tn * 10 + a Sn 二 Sn + Tn Cout=Cout+1 3 DebugPrint a，n，Sn End Sub （分数：2.00）填空项 1:_43.新建一个工程，内有两个窗体，窗体 Form1 上有一个命令按钮 Command1，单击该按钮， Form1 窗体消失，显示 Form2 窗体，程序如下： Private Sub Command1_Click1 2 Form2 3 End Sub 试补充完整。 （分数：2.00）填空项 1:_填空项

23、 1:_44.在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click1 Text1.Text = “VB 程序设计“ End Sub Private Sub Text1_Change2 Picture1.Print “VB Programming“ End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 3，而在图片框中显示 的内容是 4。 （分数：2.00）填空项 1:_45.软件生命周期可分为多个阶段,一般分为定义阶段、开发阶段和维护阶段。编码和测试属于 1 阶段。 （分数：2.00）填空项 1:_46.执行语句 Open “TC

24、dat“ For Random As #1 Len=50 后，对文件 TCdat 中的数据能执行的操作是 1。 （分数：2.00）填空项 1:_47.Visual Basic 应用程序中标准模块文件的扩展名是 1。（分数：2.00）填空项 1:_48.下面的程序用于根据文本框 Test 中输入的内容进行以下处理： 若 Text 为 1，则打印“您的成绩为优秀！”；若 Text 为 2，则打印“您的成绩为良好!”；若 Text 为 3，则打印“您的成绩为一般”；否则打印“您的成绩一般以下!”，请填空。 Private Sub Command1_Click1 Selct Case Val(Text

25、1.Text) Case 2 Print “您的成绩为优秀！“ Case 3 Print “您的成绩为良好！“ Case 4 Print “您的成绩为一般！“ Case Else Print “您的成绩为一般以下！“ End Select End Sub （分数：2.00）填空项 1:_49.表达式 32 Mod 36/ 25 的值是 1（分数：2.00）填空项 1:_50.在窗体上有几个对象，运行程序时，当对象得到焦点时，会触发 1 事件，当对象失 去焦点时将触发 2 事件。 （分数：2.00）填空项 1:_计算机二级(VB)40 答案解析(总分：100.00，做题时间：120 分钟)一、选

26、择题(每小题 2 分，共 70 分) 下列各(总题数：35，分数：70.00)1.某二叉树中有 n 个度为 2 的结点,则该二叉树中的叶子结点数为【 】（分数：2.00）A.n+l B.n-1C.2nD.n2解析：对于任何一棵二叉树 T,如果其终端结点(叶子)数为 n1,度为 2 的结点数为 n2,则 n1=n2+1。所以该二叉树的叶子结点数等于 n+1。2.任何控件都有的属性是（ ）。（分数：2.00）A.BackColorB.CaptionC.Name D.BorderStyle解析：本题的四个选项中只有选项 C)Name 属性适用于所有控件，其他 只是适用于部分控件。如：对话框控件就没有

27、 BackColor 和 BorderStyle 属性。3.有如下程序： Private Sub Commandl_Click( ) Dim i As Integer For i=1 To 2 DS Next i End Sub Sub DS( ) Dim x As Integer，m As String Static y，n X=X + 1 y=y + 1 m=m &“*”：n=n&“#“ Print x，y，m，n End Sub 程序运行后，输出的结果是( )。 （分数：2.00）A.1 1 * #B.1 1 * #C.1 1 * # 1 1 * # 1 2 * #D.1 1 * # 1

28、 1 * # 1 2 * # 解析：当 i=1 时，调用函数过程 DS，由于 y，n 为静态变量值保存，执行 x =x+1；y=y + 1 后 x=1，y=1执行 m=m &“*“：n=n&“#“后，m=“*“，n =“#“；当 I=2 时同上，只是 y=2，n=“#“。输出结果如选项 D)所示。4.如果在程序中要将 c 定义为静态变量，且为整型数，则应使用的语句是（ ）。（分数：2.00）A.视图结构可以使用 MODIFY STRUCTURE 命令来修改B.视图不能同数据库表进行联接操作C.视图不能进行更新操作D.视图是从一个或多个数据库表中导出的虚拟表 解析：视图是根据表定义的，要依赖数据

29、表而存在，但视图可以同数据表进行联接操作，而且可以用来更新数据。由于视图并不是独立 存在的基本表，它是由基本表派生出来的，因此不能利用 MODIFY STRUCTURE 命令修改表结构。5.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是（ ）。 （分数：2.00）A

30、.4B.5 C.6D.7解析：6.在属性窗口中设置何属性，可以把指定的图形放入当前对象中? （分数：2.00）A.5 B.14C.8D.输出项不合法，无正常输出解析：C+语言中打开文件有两种方式ifstream fin(“testdar“，)ifstream fin；finopen(“testdat“，)；。7.新建一个列表框，要实现对列表项可以复选，应设置的属性是（ ）。（分数：2.00）A.ScrollBarsB.MultiSelect C.DataFieldD.Stretch解析：在列表框的属性中，可以通过设置 MultiSelect 属性来实现是否可以进行列表项的多选，属性值为0，不可

31、以多选列表；属性为 1，无需要用 Ctrl 或者 Shift 就可进行多选；属性值为 2 时，要利用 Ctrl或者 Shift 键，所以选项 B) 是正确的。而选项 A) 是设置滚动条的，与此无关；选项 C) DataField 是用来设置数据的，也无关；选项 D) Strech 不是列表框的属性，所以也不正确。8.在窗体上画一个名称为 List1 的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为（ ）。 （分数：2.00）A.For i=0 To List1.ListCount-1 Next B.For i=0 To ListCount-1 NextC.For i=1 To

32、 List1.listCount NextD.For i=1 To ListCount Next解析：9.单击一次命令结束后，下列程序的执行结果是( )。 Private Sub Commandl_Click( ) s=Sat(1)+Sat(2)+Sat(3)+Sat(4) Print s End Sub Public Function Sat(N As Integer) Static Sum For i=1 To N Sum=Sum+i Next i Sat=Sum End Function （分数：2.00）A.(5) B.(6)C.(7)D.(11)解析：此题是根据用户的输入计算变量 a

33、 的值并显示。当输入字符“-”时，第一个 If 条件不成立，跳过，而第二个 If 语句条件满足，因此执行 a=a-2，使 a=- 2。所以选项 B)是正确答案。10.执行以下程序段后,变量 c$的值为【 】 a$=“Visual Basic Programming“ b$=“Quick“ c$=b$&UCase(Mid$(a$,7,6)&Right$(a$,12) （分数：2.00）A.Visual BASIC ProgrammingB.Quick Basic ProgrammingC.QUICK Basic ProgrammingD.Quick BASIC Programming 解析：Mi

34、d$(字符串,起始位置,个数)函数用于取出已有字符串中从指定位置开始的含指定个数字符的字符串；UCase(字符串)函数用于将字符串中小写字母转化为大写字母,原本大写或非字母字符保持不变；Right(字符串,个数)函数用于取出已有字符串右边含指定个数字符的字符串；是连接运算符,用于连接两个字符串。 题目中表达式 UCase(Mid$(a$,7,6)得到的结果是“口 BASIC“。函数 Rigllt$(字符串,n)表示截取字符串最右边的 n 个字符,题中 Right$(a$,12)的结果应为“口 Programming“。所以 3 部分字符串通过符号“连接,即得结果。11.Sub 过程与 Func

35、tion 过程最根本的区别是（ ）。（分数：2.00）A.2，3B.3，2C.2，2D.3，3 解析：本题考查考生对拷贝构造函数的掌握。因为+运算是右结合的， 所以在使用 a 对 b 赋值时，b 的num 变为 1 而 a 的 num 变为 2(先赋值再自加)。12.设有如下关系表_。 （分数：2.00）A.T=RSB.T=RS C.T=RSD.T=R/S解析：从图中可以看出，关系 T 是关系 R 和关系 S 的简单合并，而合并的符号为，所以答案为 T=RS。13.用 InputBox 函数设计的对话框，其功能是（ ）。（分数：2.00）A.只能接收用户输入的数据，但不会返回任何信息B.能接收

36、用户输入的数据，并能返回用户输入的信息 C.既能用于接收用户输入的信息，又能用于输出信息D.专门用于输出信息解析：InputBox 函数能接收用户输入的数据，并能返回用户输入的信息，不能用于输出信息。InputBox函数中的 Prompt 参数是在 对话框中显示提示信息，这种提示信息是由用户确定的，不能把它当作输出信息的功能。14.通常情况下，垂直滚动条的值是（ ）。（分数：2.00）A.由下往上递增B.由上往下递增 C.由左到右递增D.由右到左递增解析：一般情况下，垂直滚动条的值由上往下递增，最上端代表最小值，最下端代表最大值；水平滚动条的值从左到右递增，最左端代表最小值，最右端代表最大值。

37、因此选项 B)是正确的。15.有如下程序： Private Sub Commandl_Click() Dim a As Integer a=2 For i=1 To 3 Print Gad (a) Next i End Sub Function Gad (a As Integer) b=0 Static c b=b + 1 c= c + 1 Gad= a + b + C End Function 运行上面的程序后，单击命令按钮，输出结果为( )。 （分数：2.00）A.1 2 3B.2 3 4C.4 5 6 D.1 4 6解析：在事件 Gad 中定义了一个静态变量 c，每次调用完成后，c 的值

38、都将保存 到下一次调用 c；Sub 过程中，循环语句 For 的变量 I 的初始值和终值分别是 1，3，因为步 长为 1，所以循环 3 次，循环体为调用 Gad 过程；在第一次调用循环时，将 a 等于 2 传给形 参，因为是第一次调用 Gad，且 c 没有赋值，所以默认 c 为 0，执行 b=b+1，c=c+1，b，c 的值为 1，所以 Gad 的值为 4；第三此循环时，c 的初值为 2，执行 Gad 过程后，返回值为 6。 16.在窗体上有一个命令按钮，然后编写如下事件过程 Private Sub Command1 _ cickc ( ) a=InputBox(“enter the firs

39、t integer“) b=InputBox(“enter the second integer“) Print b + a End Sub 程序运行后，单击命令按钮，先后在两个输入框中分别输入“2”和“6”，则输出结果为( )。 （分数：2.00）A.ifstream fin；finopen(“C：/testtxt“)；B.ifstream fin(“C：/testtxt“)；C.A)和 B)D.ifstream fin；fin(“C：/testtxt“)； 解析：在程序运行后，当用户选择某个菜单标题时会打开下拉菜单，菜单中的 菜单项可以是命令、选项、分隔条或子菜单标题，每个菜单项都是一个控

40、件，与其他控件 一样也有自己的属性和事件，菜单项的各个属性都能设置和查看，如 Name(名称)和 cPtion(标题)属性等，每个菜单项只能响应一个事件，即Click 事件；有关菜单项的索引号 问题，表示菜单数组中的位置序号，如果不定义菜单数组，可以不理会，其实菜单的索引 号可以不连续，并没有限制必须从 1 开始。 17.数据独立性是数据库技术的重要特点之一。所谓数据独立性是指_。 （分数：2.00）A.数据与程序独立存放B.不同的数据被存放在不同的文件中C.不同的数据只能被对应的应用程序所使用D.以上三种说法都不对 解析：数据独立性是数据与程序间的互不依赖性，即数据库中数据独立于应用程序而不

41、依赖于应用程序。 也就是说，数据的逻辑结构、存储结构与存取方式的改变不会影响应用程序。选项 A、B、C 三种说法都是 错误的。18.当组合框的 Style 属性设置为何值时，组合框称为下拉式列表框？（分数：2.00）A.0B.1C.2 D.3解析：Style 属性用来决定控件类型及列表框部分行为，其值取 0，1，2。 0-Dropdown Combo Box：此时组合框称为“下拉式组合框”，看上去像一个下拉列表框，但是可以输入文本或从下拉列表框中选择表项。 1-Simple Combo Box：此时组合框称为“简单组合框”，它由一个文本编辑区和一个标准列表框组成。 2-Dropdown Lis

42、t Box：此时组合框称为“下拉式列表框”，它的外观和下拉式组合框一样，右端也有一个箭头，可供“拉下”或“收起”列表框，可以从下拉列表框选择表项，也可以键入表项的文本作选择，但不接收其他文本输入。 19.变量 L 的值为-8，则-L2 的值为（ ）。（分数：2.00）A.64B.-64 C.16D.-16解析：符号“”为幂运算符，用来计算乘方和方根，在使用时，如果一个指数是一个表达式，则必须加上括号，否则将按优先级计算，先高后低。20.设在窗体上有个文本框，然后编写如下的事件过程： Private Sub Text1_KeyDown(KeyCode As Integer，Shift As In

43、teger) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt)0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then Text1Text=“BBBBB“ End If End Sub 上述程序运行后，如果按【Shift+F2】，则在文本框中显示的是（ ）。 （分数：2.00）A.Alt+F2B.BBBBBC.随机出几个数D.文本框平均内容无变化 解析： 此题是有关 KeyDown 事件的题目，KeyDown 是当一个键被按下时所产生的事件，而 KeyUp 是松开被按的键时产生的事

44、件，如果要判断是否按下了某个转换键，可以用逻辑运算符 And。例如：先定义了下面 3 个符号常量：Const Shift=1，Const Ctrl=2，Const Alt=4；然后用下面的语句判断是否按下Shift、Ctrl、Alt 键； 如果 Shift And Shift 0，则按下了 Shift 键； 如果 Shift And Ctrl 0，则按下了 Ctrl 键； 如果 Shift And Alt 0，则按下了 Alt 键； 这里的 Shift时 KeyDown 的第二个参数；此事件过程中的 If 后的条件语句如果为真， 则是按下了 Alt+F2，而本题目中是按下了 Shift+F2，

45、所以不执行 Then 语句，即文本框的内容无变化。 21.下列语句中，获得列表框 List1 中项目个数的语句是（ ）。（分数：2.00）A.x8B.x8C.s(0) D.v8解析：本题是对数组基本知识的考查，在 Visual Basic 中，数组元素一般形式为 x(整数)，括号中的整数是一个确定值，而且数组名 x 后的圆括号不能省去，也不能由其他的括号代替，所以本题的正确答案是选项 C)。22.对窗体编写如下事件过程： Option Base 1 Private Sub Form_KeyPress (KeyAScii AS Integer) arr=Array(12，15，18，20，24)

46、 m1=arr(1) m2=1 If fKeyAscii=12 Then For i=2 To 5 If arr(i)m1 Then m1=arr(i) m2=i End If Next i End If Print m1 Print m2 End Sub 程序运行之后按回车键，输出结果为( )。 （分数：2.00）A.12 1 B.20 2C.18 5D.24 12解析： 此题考查了窗体的 KeyPress 事件过程；在默认情况下控件的键盘事件优先于窗体的键盘事件，在此题中只有窗体了。窗体的 KeyPress 事件的格式为： Private Sub Form _ KeyPress(KeyAs

47、cii As Integer) End Sub KeyAscii=13 为回车键，所以按下回车键就执行条件语句，输出结果为 12 1(竖排)。 23.以下叙述中错误的是【 】（分数：2.00）A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用 Public 定义的通用过程不能被其他窗体调用 C.窗体和标准模块需要分别保存为不同类型的磁盘文件D.用 Dim 定义的窗体层变量只能在该窗本中使用解析：一个工程文件由若干个窗体和模块组成,每个窗体或模块都对应有一个不同的文件。对于用 Dim 和蹦 vate 声明的窗体层变量,其作用范围都是在所声明的窗体范围内；用 Public 声明的窗体层变量作为窗体公用数据成员,可以在其他窗体或模块中以“窗体名.变量“方式引用,其作用可以大于当前窗体范围。24.单击一次命令按钮后，下列程序的执行结果为（ ）。 Pri