1、二级 VISUAL+BASIC 笔试-214 及答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.在窗体上画两个名称分别为 Text1、Text2 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1 Click()Dim x As Integer， n As Integerx = 1n = 0Do While x 20x = x * 3n = n + 1LoopText1Text = Str(x)Text2Text = Str(n)End Sub程序运行后，单击命令按钮，在两个文本
2、框中显示的值分别是（分数：2.00）A.15 和 1B.27 和 3C.195 和 3D.600 和 42.为了改变一个活动控件的高度，正确的操作是（分数：2.00）A.拖拉控件 4 个角上的某个小方块B.只能拖拉位于控件右下角的小方块C.只能拖拉位于控件左下角的小方块D.拖拉位于控件上方或下方的小方块3.设 a=3，b=10，c=6，以下表达式的值是a b And (Not bc) Or ca（分数：2.00）A.1B.-1C.TureD.False4.在深度为 5 的满二叉树中，叶子结点的个数为（分数：2.00）A.32B.31C.16D.155.执行下列语句后，显示输入对话框，此时如果单
3、击“确定”按钮，则变量 s1 的内容是 s1=InputBox(“请输入字符串“，“字符串对话框“，“字符串“)（分数：2.00）A.0B.请输入字符串C.字符串对话框D.字符串6.为了同时改变一个活动控件的高度和宽度，正确的操作是（分数：2.00）A.拖拉控件 4 个角上的某个小方块B.只能拖拉位于控件右下角的小方块C.只能拖拉位于控件左下角的小方块D.不能同时改变控件的高度和宽度7.以下关于函数过程的叙述中，正确的是（分数：2.00）A.函数过程中形参的类型与函数返回值的类型没有关系B.在函数过程中，过程的返回值可以有多个C.当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传
4、递D.如果不指明函数过程参数的类型，则该参数没有数据类型8.一个供应商可供应多种零件，而一种零件可由多个供应商供应，则实体供应商与零件之间的联系是（分数：2.00）A.一对一B.一对多C.多对一D.多对多9.假定窗体的名称为 Form1，对该窗体编写如下代码：Private Sub Form_Load()Form1Caption=“计算机“MeCaption=“等级“Caption=“考试“End Sub程序运行后，窗体的标题是（分数：2.00）A.计算机B.等级C.考试D.Form110.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下代码：Option Base 1Priv
5、ate Sub Command1 Click()d = 0 ：c = 10x=Array(10，12，21，32，24)For i = 1 To 5If x(i) c Thend = d + x(i)c = x(i)Elsed = d-cEnd IfNext iPrint dEnd Sub程序运行后，如果单击命令按钮，则在窗体上输出的内容为（分数：2.00）A.89B.99C.23D.7711.函数 Int(Rnd*6+1)的取值范围是（分数：2.00）A.17 共 7 个整数B.07 共 8 个整数C.16 共 6 个整数D.06 共 7 个整数12.使用 Do While 循环从打开的文件
6、中逐条读取记录。以下能够正确读取数据的程序段是（分数：2.00）A.Open “c:/File1txt“ For Input As #1Do While Not EOF()Line Input #1， strLineLoopB.Open “c:/File1txt“ For Input As#1Do While Not EOF(#1)Line Input #1， strLineLoopC.FileNo=FreeFileOpen FileNo For Input As #1Do While Not EOF(FileNo)Line Input #1， strLineLoopD.FileNo=Free
7、FileOpen FileNo For Input As #1DoWhile Not EOF(#FileNo)Line Input #1， strLineLoop13.设栈 S 和队列 Q 的初始状态为空。元素 a、b、c、d、e、f 依次通过栈 S，并且一个元素出栈后即进入队列 Q，若出队的顺序为 b、d、c、f、e、a，则栈 S 的容量至少应该为（分数：2.00）A.3B.4C.5D.614.假定 Picturel 和 Text1 分别为图片框和文本框的名称，下列不正确的语句是（分数：2.00）A.Print 25B.PicturelPrint 25C.Text1Print 25D.Tex
8、t1Text=Print 2515.下列打开“代码窗口”的操作中不正确的是（分数：2.00）A.按 F4 键B.单击“工程资源管理器”窗口中的“查看代码”按钮C.双击已建立好的控件D.执行“视图”菜单中的“代码窗口”命令16.在窗体上画一个名称为 CoilTlilandl 的命令按钮，然后编写如下事件过程：Private Sub command1 Click()Dim m As Integer， i As Integer， x(3)As IntegerFor i=0 To 3：x(i)=i：Next iFor i = 1 To 2： Call sub1(x，i)：Next iFor i = 0
9、 To 3： Print x(i)；： Next iEnd SubPrivate Sub sub1(a()As Integer，k As Integer)Dim i As IntegerDoa(k)=a(k)+a(k+1)j = j + 1Loop While j 2End Sub程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.0 3 7 5B.0 1 2 3C.3 2 4 5D.0 5 8 317.数据的逻辑独立性是指（分数：2.00）A.存储结构与物理结构的逻辑独立性B.数据与存储结构的逻辑独立性C.数据与程序的逻辑独立性D.数据元素之间的逻辑独立性18.假定有一菜单项
10、，名为 MenuItem，为了运行时使该菜单项失效(变灰)，应使用的语句为（分数：2.00）A.MenuItemEnabled=FalseB.MenuItemEnabled=TrueC.MenuItemVisible=FalseD.MenuItemVisible=True19.序言性注释的主要内容不包括（分数：2.00）A.模块的接口B.模块的功能C.程序设计者D.数据的状态20.以下关系表达式中，其值为 False 的是（分数：2.00）A.“XYZ“XYz“B.“VisualBasic“=“visualbasic“C.“the“there“D.“Integer“Int“21.以下语句的输出
11、结果是a=Sqr(3)Print Format(a，“$#“)（分数：2.00）A.$1.732B.$1.732C.$1732D.$0001.73222.适用于链表的查找方法是（分数：2.00）A.顺序B.二分法C.顺序，也能二分法D.随机23.Load 事件是在窗体被载入工作区时_触发的事件。（分数：2.00）A.用户B.程序员C.手工D.自动24.软件测试的过程是集成测试 验收测试 系统测试 单元测试（分数：2.00）A.、B.、C.、D.、25.为了使列表框中的项目分为多列显示，需要设置的属性为（分数：2.00）A.ColumnsB.StyleC.ListD.MultiSelect26.
12、在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1 Click()a = 2For i=1 To 3Call funl(i，（分数：2.00）A.Next i&nb27.在数据流图中，(椭圆)代表（分数：2.00）A.源点B.终点C.加工D.模块28.在调用含有对象的过程时，对象只能通过_传送。（分数：2.00）A.传址方式B.传值方式C.数组方式D.变量方式29.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Prirate Sub Command1_Click()s = 0For i=1 To 13x
13、 = i * i-1If x Mod 3 = 0 Then s = s + 1Next iPrint sEnd Sub程序运行后，单击命令按钮，则窗体中显示的内容是（分数：2.00）A.1B.5C.27D.4530.以下 Case 语句中错误的是（分数：2.00）A.Case 0 To 8B.Case Is5C.Case Is0 And Is6D.Case 1，3，Is531.希尔排序法属于（分数：2.00）A.交换类排序法B.插入类排序法C.选择类排序法D.建堆排序法32.下列程序执行后，在 Ctrl 和 Alt 这两个键都被按下的同时，再在文本框中输入“a”，输出结果为Prirate Su
14、b Text1_KeyDown(KeyCode As Integer，Shift As Integer)If Shift 0 And KeyCode = Asc(“A“)ThenPrint KeyCode + ShiftEnd IfEnd Sub（分数：2.00）A.65B.71C.0D.出错33.阅读下列程序：Private Sub Form Click()Dim i As Integer， sum As IntegerFor i = 2 To 10If i Mod 2 0 ThenPrint i；Elsesum = sum + iEnd IfNext iPrint sumEnd Sub程序
15、运行后，单击窗体，在窗体上的输出结果是（分数：2.00）A.3 5 7 9 30B.1 3 5 7 9C.2 4 6 8 20D.11 15 17 19 2034.有下列程序：Private Sub Command1_Click()X$=“Nanchang“y$=“Beijing“z$=“Nanjing“z$=InStr(Left(x$，3)+Right(y$，4)，z$)Print z$End Sub程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.0B.1C.3D.435.算法计算量的大小称为算法的（分数：2.00）A.现实性B.难度C.复杂性D.效率二、填空题(总题数：
16、13，分数：30.00)36.在单链表中，要删除一个指定的结点，必须要找到该结点的 【1】 。（分数：2.00）填空项 1:_37.假设一棵二叉树的后序遍历序列为 DGJHEBIFCA，中序遍历序列为 DBGEHJACIF，则其前序遍历序列为 【2】 。（分数：2.00）填空项 1:_38.类是具有共同属性、共同操作方法的对象的集合，所以类是对象的 【3】 。（分数：2.00）填空项 1:_39.软件工程概念的出现源自 【4】 。（分数：2.00）填空项 1:_40.数据库三级模式体系结构的划分，有利于保持数据库的 【5】 。（分数：2.00）填空项 1:_41.在属性窗口中，属性列表可以按两
17、种顺序排列，这两种顺序是 【6】 和 【7】 。（分数：4.00）填空项 1:_42.控件和窗体的 Name 属性只能通过属性窗口设置，不能在 【8】 期间设置。（分数：2.00）填空项 1:_43.为了在运行时将“d:/pic”文件夹下的图形文件“a.jpg”装入图片框 Picture1，所使用的语句为 【9】 。（分数：2.00）填空项 1:_44.编写程序，当按下某个键时，在窗体上分别以十六进制和八进制形式输出该键的 KeyCode 码。请完善下列程序。Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)Print C
18、hr(KeyCode)&“键的十六进制 KeyCode 码是“；Print 【10】 Print“八进制 KeyCode 码是“；Oct(KeyCode)End Sub（分数：2.00）填空项 1:_45.假定有一个文本框，其名称为 Text1，为了使该文本框具有焦点，应执行的语句是 【11】 。（分数：2.00）填空项 1:_46.在 3 种不同类型的组合框中，只能选择而不能输入数据的组合框是 【12】 。（分数：2.00）填空项 1:_47.当运行下列程序，单击窗体后，分别输入 72 和 24，信息框上显示的结果是 【13】 。Private Sub Form_Click()Dim x A
19、s Integer，y As Integerx=Val(InputBox(“输入整数 72“)y=Val(InputBox(“输入整数 24“)z=fun1(x，y)MsgBox Str(Z)End SubPrivate Function funl(ByVal a As Integer， ByVal b As Integer)As IntegerDor=a Mod ba = bb = rLoop Until r=0funl=aEnd Function（分数：2.00）填空项 1:_48.以下程序的功能是，产生 10 个 01000 的随机整数，放入数组 Arr 中，然后输出其中的最大值。请完善
20、下列程序。Option Base 1Private Sub Form_Click()Dim Arr(10)As IntegerDim Max As IntegerRandomizeFor i = 1 To 10Arr(i)= Int(Rnd * 1000)Next iMax = 【14】 For i = 2 To 10If 【15】 ThenMax = Arr(i)End IfNext iPrint MaxEnd Sub（分数：4.00）填空项 1:_二级 VISUAL+BASIC 笔试-214 答案解析(总分：100.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1
21、.在窗体上画两个名称分别为 Text1、Text2 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1 Click()Dim x As Integer， n As Integerx = 1n = 0Do While x 20x = x * 3n = n + 1LoopText1Text = Str(x)Text2Text = Str(n)End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别是（分数：2.00）A.15 和 1B.27 和 3 C.195 和 3D.600 和 4解析：分析 Do While 循环是先判
22、断再执行循环。程序执行后 x=1，首先判断 x 是否小于 20，条件为真，则将 x 乘以 3 再赋给 x，n 加 1 赋给 n，再次进入循环重复进行以上操作，当第 3 次循环以后 x=27，n=3。此时 x 不符合循环条件 x20，退出循环。2.为了改变一个活动控件的高度，正确的操作是（分数：2.00）A.拖拉控件 4 个角上的某个小方块 B.只能拖拉位于控件右下角的小方块C.只能拖拉位于控件左下角的小方块D.拖拉位于控件上方或下方的小方块解析：分析 拖拉 4 个角上的方块可同时改变高和宽，左右边上的方块改变宽度，上下边上的方块改变高度。3.设 a=3，b=10，c=6，以下表达式的值是a b
23、 And (Not bc) Or ca（分数：2.00）A.1B.-1C.TureD.False 解析：分析 算术表达式、关系表达式和逻辑表达式的优先级关系为：圆括号算术运算符关系运算符逻辑运算符逻辑运算符的运算次序为：NotAndOrXorEqvImpab And (Not bc)Or ca 表达式的计算过程为：310 And(Not 106)Or 63=True And (Not True)Or False=True And False Or False= False Or False=False。4.在深度为 5 的满二叉树中，叶子结点的个数为（分数：2.00）A.32B.31C.16
24、D.15解析：分析 所谓满二叉树是指除最后一层外，每层上的所有结点都有两个子结点。因此，在满二叉树中，最后一层的结点个数就是叶子结点的个数，本题中深度为 5，故叶子结点数为 2 5-1=24=16。5.执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量 s1 的内容是 s1=InputBox(“请输入字符串“，“字符串对话框“，“字符串“)（分数：2.00）A.0B.请输入字符串C.字符串对话框D.字符串 解析：分析 在执行 InputBox 函数时，会产生一个输入对话框，该函数有 7 个参数，前 3 个参数都是字符串。其中第 1 个参数用来在输入对话框内显示一个提示用户输入的字
25、符串，第 2 个参数是对话框的标题，第 3 个参数是输入的默认信息。也就是说，在执行 InputBox 函数后，如果用户没有输入任何信息，则可用此默认字符串作为输入值。如果不想用这个默认字符串作为输入值，则可在输入区直接输入数据，以取代默认值。在本题中，显示对话框后直接单击“确定”按钮，因此第 3 个参数就是默认的输入值。6.为了同时改变一个活动控件的高度和宽度，正确的操作是（分数：2.00）A.拖拉控件 4 个角上的某个小方块 B.只能拖拉位于控件右下角的小方块C.只能拖拉位于控件左下角的小方块D.不能同时改变控件的高度和宽度解析：分析 当控件处于活动状态时，用鼠标拖拉上、下、左、右 4 个
26、小方块中的某个小方块可以使控件在相应的方向上放大或缩小；而如果拖拉位于 4 个角上的某个小方块，则可使该控件同时在两个方向上放大或缩小。7.以下关于函数过程的叙述中，正确的是（分数：2.00）A.函数过程中形参的类型与函数返回值的类型没有关系 B.在函数过程中，过程的返回值可以有多个C.当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D.如果不指明函数过程参数的类型，则该参数没有数据类型解析：分析 选项 B 的叙述是错误的，调用 Function 过程只能返回一个值；选项 C 的叙述是错误的，当用数组作为过程的参数时，使用的是“传址”方式，而不是“传值”方式：选项 D 的叙述
27、是错误的，如果不指明函数过程参数的类型，按 Visual Basic 的规定为 Variant(变体数据类型)。8.一个供应商可供应多种零件，而一种零件可由多个供应商供应，则实体供应商与零件之间的联系是（分数：2.00）A.一对一B.一对多C.多对一D.多对多 解析：分析 如果实体集 A 中的每一个实体，实体集 B 中有 n(n0)个实体与之联系，反之，如果实体集 B 中的每一个实体，实体集 A 中有 m(m0)个实体与之联系，则实体集 A 与实体集 B 具有多对多联系，简记为 M：N 或 m：n。9.假定窗体的名称为 Form1，对该窗体编写如下代码：Private Sub Form_Loa
28、d()Form1Caption=“计算机“MeCaption=“等级“Caption=“考试“End Sub程序运行后，窗体的标题是（分数：2.00）A.计算机B.等级C.考试 D.Form1解析：分析 Form Load 是程序运行后首先要执行的事件过程。在上面的事件过程中，有 3 个赋值语句，这 3 个语句都用来对对象赋值，即对对象的 Caption 属性赋值，它们都可以设置窗体的标题。第 1 个语句将窗体的标题设置为“计算机”，执行第 2 个语句后，窗体的标题变为“等级”，而执行第 3 个语句后，窗体的标题变为“考试”。10.在窗体上画一个名称为 Command1 的命令按钮，然后编写如
29、下代码：Option Base 1Private Sub Command1 Click()d = 0 ：c = 10x=Array(10，12，21，32，24)For i = 1 To 5If x(i) c Thend = d + x(i)c = x(i)Elsed = d-cEnd IfNext iPrint dEnd Sub程序运行后，如果单击命令按钮，则在窗体上输出的内容为（分数：2.00）A.89B.99C.23 D.77解析：分析 在 5 次循环中，变量 c 的计算为 10、 10、12、21、32、32，变量 d 的计算为 0、-10、 2、23、55、23。本题要注意的是：关系
30、表达式“x(i)c”中的 c 值是变化的。11.函数 Int(Rnd*6+1)的取值范围是（分数：2.00）A.17 共 7 个整数B.07 共 8 个整数C.16 共 6 个整数 D.06 共 7 个整数解析：分析 Rnd 函数产生的是大于等于 0 而小于 1 的随机数字，因此 Rnd*6+1 产生的数值范围是大于等于 1 而小于 7，因此用 Int 函数取整后的结果范围应该是 16 共 6 个整数。12.使用 Do While 循环从打开的文件中逐条读取记录。以下能够正确读取数据的程序段是（分数：2.00）A.Open “c:/File1txt“ For Input As #1Do Whi
31、le Not EOF()Line Input #1， strLineLoopB.Open “c:/File1txt“ For Input As#1Do While Not EOF(#1)Line Input #1， strLineLoop C.FileNo=FreeFileOpen FileNo For Input As #1Do While Not EOF(FileNo)Line Input #1， strLineLoopD.FileNo=FreeFileOpen FileNo For Input As #1DoWhile Not EOF(#FileNo)Line Input #1， str
32、LineLoop解析：分析 本题的内容是考察如何使用文件号。在选项 A 中，EOF()函数中应有文件号；在选项 C 和 D中都有文件号使用时前后不统一的错误，其中选项 D 中，“#File No”的表示形式是错误的。13.设栈 S 和队列 Q 的初始状态为空。元素 a、b、c、d、e、f 依次通过栈 S，并且一个元素出栈后即进入队列 Q，若出队的顺序为 b、d、c、f、e、a，则栈 S 的容量至少应该为（分数：2.00）A.3 B.4C.5D.6解析：分析 由于队列是先进先出线性表，队列 Q 的出队顺序为 b、d、c、f、e、a，则入队顺序必定也是 b、d、c、f、e、a，这一顺序就是栈 S
33、的出栈顺序。又由于入栈顺序为 a、b、c、d、e、f，因此入栈和出栈顺序是：a、b 入栈，b 出栈，c、d 入栈，d、c 出栈、e、f 入栈，f、e、a 出栈，因此栈中驻留元素最多是 3 个，因此栈 S 的容量至少应该为 3。14.假定 Picturel 和 Text1 分别为图片框和文本框的名称，下列不正确的语句是（分数：2.00）A.Print 25B.PicturelPrint 25C.Text1Print 25 D.Text1Text=Print 25解析：分析 在文本框中，没有 Print 属性。如果要在文本框中显示内容，应该使用赋值的方式。15.下列打开“代码窗口”的操作中不正确的
34、是（分数：2.00）A.按 F4 键 B.单击“工程资源管理器”窗口中的“查看代码”按钮C.双击已建立好的控件D.执行“视图”菜单中的“代码窗口”命令解析：分析 在所给出的选择中，按 F4 键只能打开属性窗口，而可能用来打开代码窗口，而其他 3 个选项都可以用来打开代码窗口。16.在窗体上画一个名称为 CoilTlilandl 的命令按钮，然后编写如下事件过程：Private Sub command1 Click()Dim m As Integer， i As Integer， x(3)As IntegerFor i=0 To 3：x(i)=i：Next iFor i = 1 To 2： Ca
35、ll sub1(x，i)：Next iFor i = 0 To 3： Print x(i)；： Next iEnd SubPrivate Sub sub1(a()As Integer，k As Integer)Dim i As IntegerDoa(k)=a(k)+a(k+1)j = j + 1Loop While j 2End Sub程序运行后，单击命令按钮，则窗体上显示的内容是（分数：2.00）A.0 3 7 5B.0 1 2 3C.3 2 4 5D.0 5 8 3 解析：分析 数组也可以作为函数或者过程的参数，使用方法是直接使用数组名加括号，也可以直接使用数组名，采用 sub1(x)和
36、sub1(x()的调用形式都正确。变量 i 的作用只控制循环次数。17.数据的逻辑独立性是指（分数：2.00）A.存储结构与物理结构的逻辑独立性B.数据与存储结构的逻辑独立性C.数据与程序的逻辑独立性 D.数据元素之间的逻辑独立性解析：分析 数据的逻辑独立性是指数据库总体逻辑结构的改变，如修改数据模式、增加新的数据类型、改变数据间联系等，不需要相应修改应用程序，从而实现了数据与程序的逻辑独立性。18.假定有一菜单项，名为 MenuItem，为了运行时使该菜单项失效(变灰)，应使用的语句为（分数：2.00）A.MenuItemEnabled=False B.MenuItemEnabled=Tru
37、eC.MenuItemVisible=FalseD.MenuItemVisible=True解析：分析 同普通控件一样，菜单控件也具有属性、事件与方法，许多属性的用途和使用方法与普通控件的相关属性没有区别，比如说本题的失效(Enabled)属性。该属性的属性值为 True 或 False，默认为True，当属性值为 False 时，相对应的控件失效。19.序言性注释的主要内容不包括（分数：2.00）A.模块的接口B.模块的功能C.程序设计者D.数据的状态 解析：分析 程序注释一般为序言性注释和功能性注释。序言性注释常位于程序开头部分，它包括程序标题、程序功能说明、主要算法、接口说明、程序位置、
38、开发简历、程序设计者、复审者、复审日期及修改日期等。20.以下关系表达式中，其值为 False 的是（分数：2.00）A.“XYZ“XYz“B.“VisualBasic“=“visualbasic“ C.“the“there“D.“Integer“Int“解析：分析 本题通过关系表达式对字符串进行比较。在 Visual Basic 中，字符串数据按其 ASCII 码值进行比较。在比较两个字符串时，首先比较两个字符串的第一个字符，其中 ASCII 码值较大的字符所在的字符串大。如果第 1 个字符相同，则比较第 2 个依此类推。在本题的 4 个选项中，选项 A、选项 C、选项 D 的值均为 Tru
39、e；选项 B 中的两个字符串基本相同，但第 1 个字符串的第 1 个字母是大写字母，而第 2 个字符串的第 1 个字母是小写字母，第 1 个字符串小于第 2 个字符串，即两个字符串不相等，因此“VisualBasic“ =“visualbasic“的值为假，即 False。21.以下语句的输出结果是a=Sqr(3)Print Format(a，“$#“)（分数：2.00）A.$1.732B.$1.732 C.$1732D.$0001.732解析：分析 在使用 Format$函数使数值按“格式字符串”指定的格式输出时，符号“#”和“0”都用于数字，其个数决定了显示区段的长度。如果要显示的数值位数
40、小于格式字符串指定的区段长度，则该数值靠区段的左端显示，但这两个功能的区别在于，“#”显示的多余位不补 0，“0”显示的多余位以 0 补齐。22.适用于链表的查找方法是（分数：2.00）A.顺序 B.二分法C.顺序，也能二分法D.随机解析：分析 线性表的查找有顺序查找和二分法查找两种。由于链表不能随机访问，要访问某个结点，必须从它的直接前驱的指针域出发才能找到。因此，链式存储的线性表，即使是有序表，也只能使用顺序查找。23.Load 事件是在窗体被载入工作区时_触发的事件。（分数：2.00）A.用户B.程序员C.手工D.自动 解析：分析 Load 事件可以在启动程序时对属性和变量进行初始化。因
41、为在载入窗体后，如果运行程序，将自动触发该事件。Load 是将窗体载入工作区的事件，如果这个过程存在，接着就执行它。24.软件测试的过程是集成测试 验收测试 系统测试 单元测试（分数：2.00）A.、B.、C.、 D.、解析：分析 软件测试的过程分 4 个步骤，即单元测试、集成测试、验收测试(确认测试)和系统测试。25.为了使列表框中的项目分为多列显示，需要设置的属性为（分数：2.00）A.Columns B.StyleC.ListD.MultiSelect解析：分析 Columns 属性用来确定列表框的列数。当该属性设置为 0(默认)时，所有的项目呈单列显示；如果该属性等于 1，则列表框呈多
42、行多列显示；如果大于 1 且小于列表框中的项目数，则列表框呈单行多列显示。26.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1 Click()a = 2For i=1 To 3Call funl(i，（分数：2.00）A.Next i&nb解析：分析 在本题中，由于两个形参都没有指明用哪种方式进行参数传送，按 Visual Basic 规定，在默认的情况下，变量的数据传送按传址方式进行。当第一次调用 fun1 过程时，循环变量 i 将 1 传给形参n，变量 a 将 2 传给形参 m。经计算后，变量 m 和 n 值分别为 4 和
43、 5。返回被调过程后，变量 i 和 a 的值分别为 5 和 4。经过“Next i”语句后，循环变量 i 加了步长得 6，大于终值 3，退出循环，所以变量x=6+2=8。值得注意的是：在函数的调用过程中，不要使用循环变量作为实参，否则会产生意想不到的结果。27.在数据流图中，(椭圆)代表（分数：2.00）A.源点B.终点C.加工 D.模块解析：分析 数据流图主要图符元素有：加工，用圆或椭圆表示，输入数据经过加工变换产生输出；数据流，用箭头表示，沿箭头方向传送数据的通道；存储文件，用双杠表示，处理过程中存放各种数据文件；源、潭，用方框表示，系统和环境接口。28.在调用含有对象的过程时，对象只能通
44、过_传送。（分数：2.00）A.传址方式 B.传值方式C.数组方式D.变量方式解析：分析 在调用含有对象的过程时，对象只能通过传址方式传送，因此在定义过程时，不能在其参数前加关键字 ByVal。29.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Prirate Sub Command1_Click()s = 0For i=1 To 13x = i * i-1If x Mod 3 = 0 Then s = s + 1Next iPrint sEnd Sub程序运行后，单击命令按钮，则窗体中显示的内容是（分数：2.00）A.1B.5 C.27D.45解析：分析 在程序的
45、运算过程中，变量 x 的值为 0、3、8、15、24、35、48 等数，其中满足“x Mod 3=0”条件的有 0、3、15、24、48，所以循环结束后 s=5。30.以下 Case 语句中错误的是（分数：2.00）A.Case 0 To 8B.Case Is5C.Case Is0 And Is6 D.Case 1，3，Is5解析：分析 在多分支控制结构中，关键字 Case 后面的表达式表列被称之为域值，它可以是下列形式之一：表达式，表达式。例如：Case2， 4， 6， 8表达式 To 表达式。例如：Case 1 To 5Is 关系运算表达式，使用的运算符包括： = = =在以上 3 种形式
46、中没有包含选项 C 的形式，所有选项 C 是错误的。31.希尔排序法属于（分数：2.00）A.交换类排序法B.插入类排序法 C.选择类排序法D.建堆排序法解析：分析 希尔排序法的基本思想是：将整个无序序列分割成若干个小的子序列分别进行插入排序。所以希尔排序法属于插入类排序，但它对简单插入排序做了很大的改进。32.下列程序执行后，在 Ctrl 和 Alt 这两个键都被按下的同时，再在文本框中输入“a”，输出结果为Prirate Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer)If Shift 0 And KeyCode = Asc(“A
47、“)ThenPrint KeyCode + ShiftEnd IfEnd Sub（分数：2.00）A.65B.71 C.0D.出错解析：分析 控件事件过程也有带参数的，参数数目一般不能改动，但参数值可以像在普通过程中一样进行更改。另外，Keycode 返回字符的 ASCII 码，“a”和“A”对应 65。Shift 参数是一个位域，它用最少的位响应 Shift 键(位 0)、Ctrl 键(位 1)和 Alt 键(位 2)。这些位分别对应于值 1、2 和 4。如果 Ctrl和 Alt 这两个键都被按下，则 shift 的值为 6。最后在窗体上输出 71。33.阅读下列程序：Private Sub
48、 Form Click()Dim i As Integer， sum As IntegerFor i = 2 To 10If i Mod 2 0 ThenPrint i；Elsesum = sum + iEnd IfNext iPrint sumEnd Sub程序运行后，单击窗体，在窗体上的输出结果是（分数：2.00）A.3 5 7 9 30 B.1 3 5 7 9C.2 4 6 8 20D.11 15 17 19 20解析：分析 本题 For 循环的循环变量初值为 2，终值为 10，步长为 1。在循环体内，判断循环变量的值是否为偶数，如果是，则将该值累加给变量 sum，否则输出循环变量的值。不难看出，运行该程序后，在循环体内输出的是奇数，而累加的是偶数。在循环体外，输出偶数
