1、二级 VISUAL+BASIC 笔试-372 及答案解析(总分：95.50，做题时间：90 分钟)一、选择题(总题数：35，分数：61.50)1.执行语句 Print“Sgn(-34)=“;Sgn(-34)后，其输出结果为( )。A) Sgn(-34)=34 B) Sgn(-34)=-34C) Sgn(-34)=+1 D) Sgn(-34)=-1（分数：2.00）A.B.C.D.2.文件列表框的 Pattern 属性的作用是 ( )A) 显示当前驱动器或指定驱动器上的目录结构B) 显示当前驱动器或指定驱动器上的某目录下的文件名C) 显示某一类型的文件D) 显示该路径下的文件（分数：2.00）A
2、.B.C.D.3.下列叙述中，正确的是_ 。A) 实体集之间一对一的联系实际上就是一一对应的关系B) 关系模型只能处理实体集之间一对一的联系C) 关系模型属于格式化模型D) 以上 3 种说法都不对（分数：1.00）A.B.C.D.4.函数过程 n 的功能是：如果参数 b 为奇数，则返回值为 1，否则返回值为 0。以下能正确实现上述功能的代码的是_。A)Function F1(b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd FunctionB)Function F1(b As Integer)If b Mod 2=0 The
3、nF1=0ElseF1=1End IfEnd FunctionC)Function F1(b As Integer)If b Mod 2=0 ThenF1=1ElseF1=0End IfEnd FunctionD)Functionn(b As Integer)If b Mod 2 0ThenReturn 0ElseReturn 1End IfEnd Function（分数：2.00）A.B.C.D.5.以下说法不正确的是_。AMsgBox 语句的返回值是字符型B在 Print 输出中，用 Spc 函数可以跳过 n 个空格CPrint 方法同时具有计算和双重输出功能，但是没有赋值功能D使用 Pr
4、int 方法时，如果各输出项之间用分号或空格作为分隔符，则按照紧凑输出格式输出数据（分数：2.00）A.B.C.D.6.在 E 盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用 InputBox 函数输入 5 个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。Private Type studentStuName As String*10StuGrade As string*10StuAgc As IntegerEnd TypePrivate Sub Form_Cli
5、ck()Dim s As studentOpen “c:/student.txt“ For Random As #1 Len=Len(s)For i=1 To 1s.StuName=InputBox(“请输入姓名“)s.StuGrade=Input. Box(“请输入年级号“)s.StuAge=Val(InputBox(“请输入年龄“)Next iClose #1End SubA) Print #1,s B) Print#1,iC) Put#1,s D) Put#1,i（分数：2.00）A.B.C.D.7.假定窗体的名称(Narne 属性)为 Forml，则把窗体的标题设置为“VBTest“的
6、语句为( )。AForm1=“VBTest“ BCaption=“VBTest“CForm1.Text=“VBTest“ DForm1.Narne=“VBTest/（分数：2.00）A.B.C.D.8.在窗体上画一个文本框，其名称为 Text1。为了在程序运行后 Text1 中的文本不可编辑，应当使用的语句：_。A) Text1.Clear B) Text1.Locked=TrueC) Text1.Visible=False D) Text1.Enabled=True（分数：1.00）A.B.C.D.9.可以产生 30-50(含 30 和 50)之间的随机整数的表达式是( )AInt(Rnd*
7、21+30) BInt(Rnd*20+30)CInt(Rnd*50-Rnd*30) DInt(RND*30+50)（分数：2.00）A.B.C.D.10.当对象失去焦点时，将会发生_事件。A) GetFocus B) LostFocusC) Focus D) SetFocus（分数：1.00）A.B.C.D.11.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10，10)As IntegerDim i As Integer, j As IntegerFor
8、 i=1 To 3For j=2 To 4array1(i,j)=i+jNext jNext iText1.Text=array1(2，3)+arrayl(3，4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是_。A)12 B)13 C)14 D)15（分数：2.00）A.B.C.D.12.以下关系表达式中，其值为 False 的是_。(A) “Base “ “Basic“(B) “List1“ “Command1“(C) “CASE“ = UCase(“case“)(D) “Integer“ “Int/（分数：2.00）A.B.C.D.13.在下列关系运算中，不改变关系表中的属
9、性个数但能减少元组个数的是_。A) 并 B) 交 C) 投影 D) 笛卡尔乘积（分数：1.00）A.B.C.D.14.运行下列程序段后，显示的结果为J1=23J2=32If J1J2 Then Print J2 Else Print J1A)23B)32C)55D)2332（分数：1.00）A.B.C.D.15.假定有下面的过程：Function Func(a As Integer,b As Integer)As IntegerStatic m As Integer,i As Integerm=0i=2i=i+m+1m=i+a+bFunc=mEnd Function在窗体上画一个命令按钮，然后
10、编写如下事件过程：Private Sub Command 1_Click()Dim k As Integer，m As IntegerDim p As Integerk=4m=1p=Func(k，m)Print p；p=Func(k，m)Print pEnd Sub程序运行后，单击命令按钮，输出结果为( )。A8 17 B8 16 C8 20 D8 8（分数：2.00）A.B.C.D.16.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下程序：Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1，
11、2，3，4)j=1For i=4 To 1 Step-1s=s+a(i)*jj=j*10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是_。A) 4321 B) 12 C) 34 D) 1234（分数：2.00）A.B.C.D.17.下列叙述中正确的是( )。A) 在模块化程序设计中，一个模块应该尽量多的包括与其他模块联系的信息B) 在自顶向下、逐步细化的设计过程中，首先应设计解决问题的第一个细节C) 在模块化程序设计中，一个模块内部的控制结构也要符合结构化原则D) 在程序设计过程中，不能同时采用结构化程序设计方法与模块化程序设计方法（分数：2.00）A.B.
12、C.D.18.能够获得一个文本框中被选取文本的内容的属性是A) Text B) LengthC) Seltext D) SelStart（分数：2.00）A.B.C.D.19.运行下列程序：Private Sub Command1_Click( )x = 0Do While x 10x = x * x + 1y = y + xLoopMsgBox yEnd Sub单击 Command1 命令按钮后，则弹出的消息对话框中显示_。(A) 5(B) 8(C) 26(D) 34（分数：2.00）A.B.C.D.20.为了对多个控件执行操作，必须选择这些控件。下列不能选择多个控件的操作是A) 按住 Al
13、t 键，不要松开，然后单击每个要选择的控件B) 按住 Shift 键，不要松开，然后单击每个要选择的控件C) 按住 Ctrl 键，不要松开，然后单击每个要选择的控件D) 拖动鼠标画出一个虚线矩形，使所选择的控件位于这个矩形内（分数：1.00）A.B.C.D.21.编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer， Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End S
14、ub在一般情况下(即不按住 Shift 键和锁定大写)，运行程序，如果按“A“键，则程序的输出是_。(A) AA(B) aA(C) Aa(D) aa（分数：2.00）A.B.C.D.22.编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住 Shift 键和锁定大写键)，运行程序，如果按“A
15、”键，则程序的输出是A) AAB) aAC) AaD) aa（分数：1.00）A.B.C.D.23.在窗体上添加一个命令按钮，名为 Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。For i= 1 To4For j = 1 To 3x=3Fork= 1 To 2x=x+3Next kNext jNext iText1.Text=Str(x)A) 3 B) 6C) 9 D) 12（分数：2.00）A.B.C.D.24.树是结点的集合，它的根结点数目是A) 有且只有 1 B) 1 或多于 1 C) 0 或 1 D) 至少 2（分数：2.00）A.B.C.D.25.
16、以下各项中，Visual Basic 不支持的图形文件是A) .ico 文件 B) .jpg 文件C) .psd 文件 D) .bmp 文件（分数：2.00）A.B.C.D.26.不能作为容器使用的对象是 _。A窗体 B框架 C图像框 D图片框（分数：2.50）A.B.C.D.27.与键盘操作有关的事件有 KeyPress、KeyUp 和 KeyDown 事件，当用户按下并且释放一个键后，这三个事件发生的顺序是( )。A) KeyDown、KeyPress、KeyUp B) KeyDown、KeyUp、KeyPressC) KeyPress、KeyDown、-KeyUp D) 没有规律（分数：
17、2.00）A.B.C.D.28.软件需求分析阶段的工作，可以分为 4 个方面：需求获取、需求分析、编写需求规格说明书以及( )。A) 阶段性报告 B) 需求评审C) 总结 D) 都不正确（分数：2.00）A.B.C.D.29.树是节点的集合，它的根节点数目是A) 有且只有 1 B) 1 或多于 1C) 0 或 1 D) 至少 2（分数：2.00）A.B.C.D.30.用黑盒技术测试用例的方法之一为A因果图 B逻辑覆盖 C循环覆盖 D基本路径测试（分数：1.00）A.B.C.D.31.希尔排序法属于哪一种类型的排序法 _。A) 交换类排序法 B) 插入类排序法C) 选择类排序法 D) 建堆排序法
18、（分数：2.00）A.B.C.D.32.下列关于菜单的说法错误的是( )。A) 每个菜单项都是一个控件，与其他控件一样也有其属性和事件B) 除了 Click 事件之外，菜单项不可以响应其他事件C) 菜单项的索引号可以不连续D) 菜单项的索引号必须从 1 开始（分数：2.00）A.B.C.D.33.有如下函数过程：Function Fun(ByVal x As Integer,ByVal y As Integer)As IntegerDo While y0reminder=x Mod yx=yy=reminderLoopFun=xEnd Function以下调用函数的事件过程，该程序的运行结果是
19、( )。Private Sub Command7_Click()Dim a As Integer,b As Integera=100:b=25x=Fun(a,B)Print XEnd SubA) 0 B) 25 C) 50 D) 100（分数：2.00）A.B.C.D.34.以下不是面向对象思想中的主要特征的是A) 多态 B) 继承 C) 封装 D) 垃圾回收（分数：2.00）A.B.C.D.35.下列程序段，在运行时最后输出的内容是a=2c=1AAA:c=c + aIf c10 ThenPrint cGoTo AAAElsePrint “10 以内的奇数显示完毕“End IfA) 3B) 7
20、C) 9D) 10 以内的奇数显示完毕（分数：1.00）A.B.C.D.二、填空题(总题数：14，分数：34.00)以下程序用来产生 20 个(0，99)之间的随机整数，并将其中的偶数打印出来。请填空。Private Sub Command1_Clcik()RandomizeFor I=1 To 20X=Int(Rnd*_)If X/2=_Then Print xNext IEnd Sub（分数：4.00）填空项 1:_填空项 1:_36.以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输入负数时结束输入。请填空。Private Sub Command1_Click
21、()Dim x,amax,amin As Singlex=InputBox(“Enter a score“)amax=xamin=xDo While_If xamax Thenamax=xEnd IfIf_Thenamin=xEnd Ifx=InputBox(“enter a score“)LoopPrint “max=“;amax,“min=“;aminEnd Sub（分数：4.00）填空项 1:_37.与数学表达式 cos (a+B) /3x+5 对应的 Visual Basic 表达式是 1。（分数：1.00）填空项 1:_38.在关系代数中专门的关系运算包括选择，投影、 1、除等运算。
22、（分数：2.00）填空项 1:_39.要求打开随机文件“c:/Example.txt”文件，文件号为 1，实现的语句是_。（分数：1.00）填空项 1:_40.设有一个有 10 个元素的数组，下列程序将该数组的第 1 个元素与第 10 个元素交换，第 2 个元素与第9 个元素交换，第 5 个元素与第 6 个元素交换，请填空。Private Sub Command1_Click()Dim a(1 To 10)As IntegerDim i As IntegerDim p As IntegerDim t As IntegerDim j As IntegerFor i=1 To 10a(i)=iNe
23、xt iFor j=1 To 5t=a(j)_Next jFor i=1 To 10Print a(i)Next iEnd Sub（分数：4.00）填空项 1:_41.一个栈的初始状态为空。首先将元素 5，4，3，2，1 依次入栈，然后退栈一次，再将元素 A，B，C，D依次入栈，之后将所有元素全部退栈，则所有元素退栈(包括中间退栈的元素)的顺序为 1。（分数：2.00）填空项 1:_42.下列函数调用时弹出的对话框中按钮的个数为_。MsgBox(“程序非法!“，vbAbortRetryIgnore，“消息提示：“)（分数：1.00）填空项 1:_43.有 64 个结点的完全二叉树的深度 1(根
24、的层次为 1)。（分数：2.00）填空项 1:_44.数据结构包括数据的逻辑结构、数据的 1 以及对数据的操作运算。（分数：1.00）填空项 1:_45.设有整型变量 s，取值范围为 0100，表示学生的成绩，有如下程序段：If s=90 ThenLevel=“A“Else If s=75 ThenLevel=“B“Else If s=60 ThenLevel=“C“ElseLevel=“D“End If下面用 Select Case 结构改写上述程序，使两段程序所实现的功能完全相同，请填空。Select Case sCase _=95Level=“A“Case 75 To 90Level=“
25、B“Case 60 To 74Level=“C“Case _Level=“D“_（分数：6.00）填空项 1:_46.为了使计时器控件 Timer1 每隔 0.5 秒触发一次 Timer 事件，应将 Timer1 控件的_属性设置为_。（分数：2.00）填空项 1:_47.以下程序用来建立一个 55 矩阵，该矩阵两条对角线上的元素为 1，其余元素为 0，请补充完该程序。该程序运行结果如下图所示。（分数：2.00）填空项 1:_48.用窗体的 Caption 属性可以设置窗体的 1。（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试-372 答案解析(总分：95.50，做题时间
26、：90 分钟)一、选择题(总题数：35，分数：61.50)1.执行语句 Print“Sgn(-34)=“;Sgn(-34)后，其输出结果为( )。A) Sgn(-34)=34 B) Sgn(-34)=-34C) Sgn(-34)=+1 D) Sgn(-34)=-1（分数：2.00）A.B.C.D. 解析：解析 本题使用 Sgn 函数来判断某数的正负号。当参数大于 0 时，返回 1；当参数等于 0 时，返回 0；当参数小于 0 时，返回-1。2.文件列表框的 Pattern 属性的作用是 ( )A) 显示当前驱动器或指定驱动器上的目录结构B) 显示当前驱动器或指定驱动器上的某目录下的文件名C)
27、显示某一类型的文件D) 显示该路径下的文件（分数：2.00）A.B.C. D.解析：解析 文件列表框的 Pattern 属性的作用是显示某一类型的文件。选项 C 正确。3.下列叙述中，正确的是_ 。A) 实体集之间一对一的联系实际上就是一一对应的关系B) 关系模型只能处理实体集之间一对一的联系C) 关系模型属于格式化模型D) 以上 3 种说法都不对（分数：1.00）A.B.C.D. 解析：解析 实体集之间一对一的联系不一定是一一对应的关系，选项 A 错误；关系模型中可以直接描述多对多的实体联系，选项 B 错误，关系模型是与格式化模型完全不同的数据模型，它用表格数据来表示实体本身及其相互之间的联
28、系，建立在数学理论基础上，选项 C 错误。4.函数过程 n 的功能是：如果参数 b 为奇数，则返回值为 1，否则返回值为 0。以下能正确实现上述功能的代码的是_。A)Function F1(b As Integer)If b Mod 2=0 ThenReturn 0ElseReturn 1End IfEnd FunctionB)Function F1(b As Integer)If b Mod 2=0 ThenF1=0ElseF1=1End IfEnd FunctionC)Function F1(b As Integer)If b Mod 2=0 ThenF1=1ElseF1=0End IfE
29、nd FunctionD)Functionn(b As Integer)If b Mod 2 0ThenReturn 0ElseReturn 1End IfEnd Function（分数：2.00）A.B. C.D.解析：解析 Visual Basic 程序中不能使用 Return 语句来返回一个函数的值。要返回一个函数的值，需要把这个值赋值给函数名。所以本题中 A、D 选项错误，而题目中，当 b 为奇数时返回 0，所以本题答案是 B。5.以下说法不正确的是_。AMsgBox 语句的返回值是字符型B在 Print 输出中，用 Spc 函数可以跳过 n 个空格CPrint 方法同时具有计算和双重
30、输出功能，但是没有赋值功能D使用 Print 方法时，如果各输出项之间用分号或空格作为分隔符，则按照紧凑输出格式输出数据（分数：2.00）A. B.C.D.解析：6.在 E 盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用 InputBox 函数输入 5 个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。Private Type studentStuName As String*10StuGrade As string*10StuAgc As IntegerEnd T
31、ypePrivate Sub Form_Click()Dim s As studentOpen “c:/student.txt“ For Random As #1 Len=Len(s)For i=1 To 1s.StuName=InputBox(“请输入姓名“)s.StuGrade=Input. Box(“请输入年级号“)s.StuAge=Val(InputBox(“请输入年龄“)Next iClose #1End SubA) Print #1,s B) Print#1,iC) Put#1,s D) Put#1,i（分数：2.00）A.B.C. D.解析：解析 本题考查随机文件的读写，在 Fo
32、r 循环中，向随机文件中写入 5 个学生的信息，所以应该使用写操作语句，在随机文件中，写操作用 Put 语句，其格式为：Put#文件号，记录号，变量。7.假定窗体的名称(Narne 属性)为 Forml，则把窗体的标题设置为“VBTest“的语句为( )。AForm1=“VBTest“ BCaption=“VBTest“CForm1.Text=“VBTest“ DForm1.Narne=“VBTest/（分数：2.00）A.B. C.D.解析：8.在窗体上画一个文本框，其名称为 Text1。为了在程序运行后 Text1 中的文本不可编辑，应当使用的语句：_。A) Text1.Clear B)
33、Text1.Locked=TrueC) Text1.Visible=False D) Text1.Enabled=True（分数：1.00）A.B. C.D.解析：解析 对于 Textbox 控件，可通过设置其 Visible 属性为 False，使其隐藏，设置 Enabled 属性为 False 使其不可用，设置 Locked 属性为 True，使其不可被编辑。9.可以产生 30-50(含 30 和 50)之间的随机整数的表达式是( )AInt(Rnd*21+30) BInt(Rnd*20+30)CInt(Rnd*50-Rnd*30) DInt(RND*30+50)（分数：2.00）A. B
34、.C.D.解析：解析 Rnd 产生 0 到 1 之间的一个单精度随机数。10.当对象失去焦点时，将会发生_事件。A) GetFocus B) LostFocusC) Focus D) SetFocus（分数：1.00）A.B. C.D.解析：11.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10，10)As IntegerDim i As Integer, j As IntegerFor i=1 To 3For j=2 To 4array1(i,j)=i
35、+jNext jNext iText1.Text=array1(2，3)+arrayl(3，4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是_。A)12 B)13 C)14 D)15（分数：2.00）A. B.C.D.解析：解析 本题是通过一个 For 循环来给数组赋值。由 arrayl(i,j)=i+j 可知，arrayl(2，3)；2+3=5，arrayl(3,4)：3+4=7， arrayl(2,3)+armyl(3,4)：5+7=12，即文本框中的值为 12。12.以下关系表达式中，其值为 False 的是_。(A) “Base “ “Basic“(B) “List1“
36、 “Command1“(C) “CASE“ = UCase(“case“)(D) “Integer“ “Int/（分数：2.00）A. B.C.D.解析：13.在下列关系运算中，不改变关系表中的属性个数但能减少元组个数的是_。A) 并 B) 交 C) 投影 D) 笛卡尔乘积（分数：1.00）A.B. C.D.解析：解析 对关系数据库进行查询时，需要找到用户感兴趣的数据，这就需要对关系进行一定的关系运算。关系的基本运算有两类：一类是传统的集合运算(并、交、差)，另一类是专门的关系运算(选择、投影、连接)。集合的并、交、差：设有两个关系 R 和 S，它们具有相同的结构，R 和 S 的并是由属于 R
37、和 S，或者同时属于 R 和 S 的所有元组成的集合，记作 RS：R 和 S 的交是由既属于 R 又属于 S 的所有元组组成的集合，记作 RS；R 和 S 的差是由属于 R 但不属于 S 的所有元组组成的集合，记作 R-S。14.运行下列程序段后，显示的结果为J1=23J2=32If J1J2 Then Print J2 Else Print J1A)23B)32C)55D)2332（分数：1.00）A.B. C.D.解析：解析：题中是条件语句 If J12 Then Print J2 Else Print J1，即 J1 J2 时输出 J2，否则输出 J1，即输出两者的最大者。显然应该是 3
38、2，正确答案是选项 B)。15.假定有下面的过程：Function Func(a As Integer,b As Integer)As IntegerStatic m As Integer,i As Integerm=0i=2i=i+m+1m=i+a+bFunc=mEnd Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command 1_Click()Dim k As Integer，m As IntegerDim p As Integerk=4m=1p=Func(k，m)Print p；p=Func(k，m)Print pEnd Sub程序运行后，单击
39、命令按钮，输出结果为( )。A8 17 B8 16 C8 20 D8 8（分数：2.00）A.B.C.D. 解析：16.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下程序：Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1，2，3，4)j=1For i=4 To 1 Step-1s=s+a(i)*jj=j*10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是_。A) 4321 B) 12 C) 34 D) 1234（分数：2.00）A.B.C.D. 解析：解析
40、 四次执行语句 s=s+a(i)j，执行完第一次 s=4，执行完第二次 s=34，执行完第三次s=234，执行完第四次 s=1234，正确答案应为选项 D。17.下列叙述中正确的是( )。A) 在模块化程序设计中，一个模块应该尽量多的包括与其他模块联系的信息B) 在自顶向下、逐步细化的设计过程中，首先应设计解决问题的第一个细节C) 在模块化程序设计中，一个模块内部的控制结构也要符合结构化原则D) 在程序设计过程中，不能同时采用结构化程序设计方法与模块化程序设计方法（分数：2.00）A.B.C. D.解析：解析 在模块化程序设计中，模块之间的联系可以通过程序的控制结构来实现，在自顶向下、逐步细化
41、的设计过程中，首先要考虑全局目标，而不是细节。在程序设计中模块化和结构化可以同时使用，一个模块的内部结构也要符合结构化设计原则。18.能够获得一个文本框中被选取文本的内容的属性是A) Text B) LengthC) Seltext D) SelStart（分数：2.00）A.B.C. D.解析：解析 获得文本框中的文本需要用到 SelStart 属性(文本选取开始位置)、SelLength 属性(文本选取长度)和 SelTFext 属性(选取的文本内容)。19.运行下列程序：Private Sub Command1_Click( )x = 0Do While x 10x = x * x +
42、1y = y + xLoopMsgBox yEnd Sub单击 Command1 命令按钮后，则弹出的消息对话框中显示_。(A) 5(B) 8(C) 26(D) 34（分数：2.00）A.B.C.D. 解析：20.为了对多个控件执行操作，必须选择这些控件。下列不能选择多个控件的操作是A) 按住 Alt 键，不要松开，然后单击每个要选择的控件B) 按住 Shift 键，不要松开，然后单击每个要选择的控件C) 按住 Ctrl 键，不要松开，然后单击每个要选择的控件D) 拖动鼠标画出一个虚线矩形，使所选择的控件位于这个矩形内（分数：1.00）A. B.C.D.解析：解析 有两种选择控件的方法：其一，
43、按住 Shift 键单击每个要选择的控件：其二，拖动鼠标画虚线矩形。除这两种方法外，按住 Ctrl 键单击每个要选择的控件也可实现选择控件的操作，但按住 Alt键单击每个要选择的控件不能达到目的。21.编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer， Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住 Shift 键和锁定大写)，运行程
44、序，如果按“A“键，则程序的输出是_。(A) AA(B) aA(C) Aa(D) aa（分数：2.00）A.B.C. D.解析：22.编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住 Shift 键和锁定大写键)，运行程序，如果按“A”键，则程序的输出是A) AAB) aAC) AaD)
45、 aa（分数：1.00）A.B.C. D.解析：解析 在按键盘时，先触发的是 KeyDown 事件，再触发 KeyPress 事件。其中，当按字母键“A”时，KeyDown 所得到的 KeyCode 码 (KeyDown 事件的参数)65 与按字母键“a”是相同的，而对 KeyPress来说，字母键“A”的 KeyAscii 为 65，字母键“a”的 KeyAscii 为 97。23.在窗体上添加一个命令按钮，名为 Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出( )。For i= 1 To4For j = 1 To 3x=3Fork= 1 To 2x=x+3Nex
46、t kNext jNext iText1.Text=Str(x)A) 3 B) 6C) 9 D) 12（分数：2.00）A.B.C. D.解析：解析 这也是一个 3 重循环，我们依次分析循环过程，程序执行如下：x=3：先执行第 3 层 k 控制的循环，k 从 1 到 2 循环 2 次，x=x+3x=9；然后执行 j 控制的第 2 层 j控制的循环，共 3 次，x=3；第 3 层循环使得 x=9；最后是 i 控制的第 1 层 i 控制的循环，共 4 次，x=9。24.树是结点的集合，它的根结点数目是A) 有且只有 1 B) 1 或多于 1 C) 0 或 1 D) 至少 2（分数：2.00）A.B
47、.C. D.解析：解析 树是 N(N0)个结点的有限集合，当 N=0 时称为空树，空树没有根结点，即根结点的个数为 0，非空树有且只有一个根结点，所以树的根结点数目为 0 或 1。25.以下各项中，Visual Basic 不支持的图形文件是A) .ico 文件 B) .jpg 文件C) .psd 文件 D) .bmp 文件（分数：2.00）A.B.C. D.解析：解析 在 Visual Basic 中，可以接受不同的图形文件，见下表。从上表可知，.psd 文件不是Visual Basic 所支持的图形文件。Visual Basic 支持的图形文件文件类型 文件扩展名位图文件 .bmp；.dib图标文件 .ico；.curWindows 图源文件 .wmg；.emfGIF 格式图形压缩文件 .gifJPEG 格式图形压缩文件 .jpg26.不能作为容器使用的对象是 _。A窗体 B框架 C图像框 D图片框（分数：2.50）A.B.C. D.解析：解析 窗体、框架和图片框都可以作为容器使用，在这些对象中可以放置其他控件。图像框不能放置其他控件，不能作为容器使用。27.与键盘操作有关的事件有 KeyPress、KeyUp 和 KeyDown 事件，当用户按下并且释放一个键后，这三个事件发生的顺序是( )。A) KeyDown、KeyPress、
