1、二级 VISUAL+BASIC 笔试 324 及答案解析(总分：100.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.以下语句的输出结果是 _。 Print Format (“123.58”，“#，#.00”)（分数：2.00）A.123.58B.123.00C.123.58D.0，123.582.改变驱动器列表框的 Drive 属性值将激活_事件。（分数：2.00）A.ChangeB.ScrollC.KeyDownD.KeyUp3.以下叙述中错误的是_。（分数：2.00）A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用 Private 定义的通用过
2、程能被其他窗体调用C.在设计 Visual Basic 程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件D.全局变量必须在标准模块中定义4.执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量 strInput 的内容是_。 atrInput=InputBox(“请输入字符串”，“字符串对话框”，“字符串”)（分数：2.00）A.“请输入字符串”B.“字符串对话框”C.“字符串”D.空字符串5.设 a=5，b=6，c=7，d=8，则执行下列语句后，x 的值为_。 x=IIF(aB) And(cd)，10,20)（分数：2.00）A.10B.20C.30D.3006.
3、以下正确的叙述是_。（分数：2.00）A.Select Case 语句中的测试表达式可以是任何形式的表达式B.Select Case 语句中的测试表达式只能是数值表达式或字符串表达式C.在执行 Select Case 语句时，所有的 Case 子句均按出现的次序被顺序执行D.如下 Select Case 语句中的 Case 表达式是错误的： Select Case x Case 1 to 10 End Select7.以下关系表达式中，其值为假的是_。（分数：2.00）A.“XYZ“XYz“B.“VisualBasic“=“visualbasic“C.“the“there“D.“Integer
4、“Int“8.n 个顶点的强连通图的边数至少有 _。（分数：2.00）A.n-1B.n(n-1)C.nD.n+19.在窗体上画两个标签和一个命令按钮，其名称分别为 Label1、Label2 和 Command1，然后编写如下程序：Private Sub func(L As Label，ByVal a As Integer) L.Caption=“1234“ a=a*aEnd SubPrivate Sub Form_ Load() Label1.Caption=“ABCD“ Label2.Caption=10End SubPrivate Sub Command1_Click() a=Val(L
5、abel2.Caption) Call func (Label1，A) Label2.Caption=aEnd Sub 程序运行后，单击命令按钮，在两个标签 Label1 和 Label2 中显示的内容分别是_。（分数：2.00）A.ABCD 和 10B.1234 和 100C.ABCD 和 100D.1234 和 1010.设窗体 Form1 中有一名为 mnuFile 的菜单，它只有一个标题为 Open 的子菜单。为使程序运行时，按下Alt+ F 键窗体中能够显示如下图所示的菜单项，则 mnuFile 的标题应为 _。 （分数：2.00）A.File(B.File(C.File(&D.Fi
6、le(-11.用链表表示线性表的优点是_。（分数：2.00）A.便于插入和删除操作B.数据元素的物理顺序与逻辑顺序相同C.花费的存储空间较顺序存储少D.便于随机存取12.软件开发的结构化生命周期方法将软件生命周期划分成_。（分数：2.00）A.定义、开发、运行维护B.设计阶段、编程阶段、测试阶段C.总体设计、详细设计、编程调试D.需求分析、功能定义、系统设计13.在设计应甩程序时，通过_窗口可以查看到应用程序工程中的所有组成部分。（分数：2.00）A.代码窗口B.窗体设计窗口C.属性窗口D.工程资源管理器窗口14.下列不属于结构化分析的常用工具是_。（分数：2.00）A.数据流图B.数据字典C
7、.判定树D.PAD 图15.在 Visual Basic 中，下列运算符中优先级最高的是_。（分数：2.00）A.*B./C.D.Not16.窗体上画一个文本框(其名称为 Text1)和一个标签(其名称为 Label1)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是_。（分数：2.00）A.Private Sub Text1_ Change() Label1.Caption=Text1.TextEnd SubB.Private Sub Text1_ Click() Label1.Caption=Text1.TextEnd SubC.Pr
8、ivate Sub Label1_ Change() Label1.Caption=Text1.TextEnd SubD.Private Sub Label1_ Click() Label1.Caption=Text1.TextEnd Sub17.以下程序段运行的结果是_。Dim a(-1 To 5)As BooleanDim flag As Booleanflag=FalseDim i As IntegerDim j As IntegerDo Until flag=True For i= -1 To 5 j=j+1 If a (i)= False Then a(i)=True Exit Fo
9、r End If If i=5 Then flag=True End If Next Loop Print j（分数：2.00）A.20B.7C.35D.818.假定程序中有以下语句： answer=MsgBox(“String1“,“String2“, “String3“ ,2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则 answer 的值为_。（分数：2.00）A.String1B.String2C.String3D.119.设置复选框中或单选按钮的标题对齐方式的属性是_。（分数：2.00）A.AlignB.StyleC.SortedD.Alignment20.在数据管
10、理技术发展过程中，文件系统与数据库系统的主要区别是数据库系统具有_。（分数：2.00）A.数据无冗余B.数据可共享C.专门的数据管理软件D.特定的数据模型21.能够获得一个文本框中被选取文本的内容的属性是_。（分数：2.00）A.TextB.SeILengthC.SelTextD.SelStart22.下列说法中，不属于数据模型所描述的内容是_。（分数：2.00）A.数据结构B.数据操作C.数据查询D.数据约束23.在窗体上画一个命令按钮(名称为 Command1)，然后编写如下事件过程：Private Sub Command1_ Click() Dim b As Integer b=b+1E
11、nd Sub 运行程序，三次单击命令按钮后，变量 b 的值是_。（分数：2.00）A.0B.1C.2D.324.在窗体上画一个命令按钮(其名称为 Command1)，然后编写如下事件过程：Private Sub Command1_Click() Dim a(5，5)As Integer Dim i As Integer, j As Integer For i= 1 To 3 For j= 1 To 3 a(i，j)=(i-1)*3+j Print a (i，j) Next j Print Next iEnd Sub 程序运行后，单击命令按钮，在窗体上的输出结果是_。（分数：2.00）A.1 4
12、 7 2 5 8 3 6 9B.1 2 3 4 5 6 7 8 9C.1 2 3 4 5 6 7 8 9D.没有输出25.在窗体上画一个命令按钮(其名称为 Conlmand1)，然后编写如下事件过程：Private Sub Command1_Click() For i=1 To 4 If i=1 Then x=i If i=4 Then x=x+1 Print x Next iEnd Sub 程序运行后，单击命令按钮，其输出结果为_。（分数：2.00）A.1 2 3 4B.2 3 4 5C.2 3 4 4D.3 4 5 626.算法分析的目的是 _。（分数：2.00）A.找出数据结构的合理性B
13、.找出算法中输入和输出之间的关系C.分析算法的易懂性和可靠性D.分析算法的效率以求改进27.在窗体上画一个通用对话框，程序运行后，通过 ShowOpen 方法显示“打开”对话框，要求在该对话框的“文件类型”栏中只显示扩展名为.DOC 的文件，则对通用对话框的 Filter 属性的正确设置是_。（分数：2.00）A.“(*.DO)*.DOC“B.“(*.DO(.DO)“C.“(*.DO)*.DOC“D.“(*.DO)*.DOC“28.为了清除列表框中的所有内容，应使用的方法是_。（分数：2.00）A.ClsB.ClearC.RemoveD.RemoveItem29.在窗体上画一个命令按钮，然后编
14、写如下程序：Sub S1(ByVal x As Integer, By Val y As Integer) Dim t As Integer t=x x=y y=tEnd SubPrivate Sub Command1_ Click() Dim a As Integer, b As Integer a=10 b=30 S1 a，b Print “a=“；a=“b=“；bEnd Sub 程序运行后，单击命令按钮，输出结果是_。（分数：2.00）A.a=30 b=10B.a=30 b=30C.a=10 b=30D.a=10 b=1030.在窗体上画一个命令按钮(名称为 Command1)，然后编写
15、如下事件过程：Private Sub Command1_Click() b=5 c=6 Print a=b+ cEnd Sub 程序运行后，单击命令按钮，输出的结果是_。（分数：2.00）A.a=11B.a=b+ cC.a=D.False31.在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为 Text1、Command1 和 Label1，文本框的 Text1 属性设置为空白，然后编写如下事件过程：Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x)End Sub 程序运行后，在文本
16、框中输入 28.653，单击命令按钮，标签中显示的内容是_。（分数：2.00）A.27B.28C.29D.3032.下列程序段的执行结果为_。X=5Y=-20If Not X0 Then X=Y-3 Else Y=X+3Print X-Y；Y-X（分数：2.00）A.-3 3B.5 -8C.3 -3D.25 -2533.分布式数据库系统不具有的特点是 _。（分数：2.00）A.分布式B.数据冗余C.数据分布性和逻辑整体性D.位置透明性和复制透明性34.已知数据表 A 中每个元素距其最终位置不远，为节省时间，应采用的算法是_。（分数：2.00）A.堆排序B.直接插入排序C.快速排序D.直接选择排
17、序35.在软件工程中，白箱测试法可用于测试程序的内部结构。此方法将程序看做是_。（分数：2.00）A.循环的集合B.地址的集合C.路径的集合D.目标的集合二、B填空题/B(总题数：13，分数：30.00)36.测试的目的是暴露错误，评价程序的可靠性；而U 【1】 /U的目的是发现错误的位置并改正错误。（分数：2.00）填空项 1:_37.在最坏情况下，堆排序需要比较的次数为U 【2】 /U。（分数：2.00）填空项 1:_38.若串 s=“Program“，则其子串的数目是U 【3】 /U。（分数：2.00）填空项 1:_39.一个项目具有一个项目主管，一个项目主管可管理多个项目，则实体“项目
18、主管”与实体“项目”的联系属于U 【4】 /U的联系。（分数：2.00）填空项 1:_40.数据库管理系统常见的数据模型有层次模型、网状模型和U 【5】 /U三种。（分数：2.00）填空项 1:_41.为了选择多个控件，可以按住U 【6】 /U键，然后单击每个控件。（分数：2.00）填空项 1:_42.执行下面的程序段后，S 的值为U 【7】 /U。 s=5 For i=2.6 To 4.9 Step 0.6 s=s+1 Next i（分数：2.00）填空项 1:_43.由 Array 函数建立的数组的名字必须是U 【8】 /U类型。（分数：2.00）填空项 1:_44.若有一个动态数组 a
19、有两个元素 a(0)和 a(1)，现要令数组 a 有三个元素 a(0)、a(1)和 a(2)，则应当使用U 【9】 /U语句。（分数：2.00）填空项 1:_45.在窗体上画一个命令按钮 Command1，然后编写如下程序： Private Sub Command1_Click() Dim arr()As Integer ReDim arr(3) For i=0 To 3 arr(i)=i Next i x=InputBox(“请输入一个数学”) If Val(x)4 Then ReDim arr(4) arr(4)=x End If Me.Print(arr(4)-arr(3) End Su
20、b 程序运行后，单击命令按钮，在输入对话框中输入 12，输出结果为U 【10】 /U。（分数：2.00）填空项 1:_46.为了定义自己的鼠标光标，首先应把 MousePointer 属性设置为U 【11】 /U，然后把U 【12】 /U属性设置为一个图标文件。（分数：4.00）填空项 1:_47.建立打开文件、保存文件、颜色、字体、打印对话框所使用的方法分别为U 【13】 /U、 U【14】 /U、ShowColor、ShowFont 和 ShowPrinter。（分数：4.00）填空项 1:_48.启动窗体在U 【15】 /U对话框中指定。（分数：2.00）填空项 1:_二级 VISUAL
21、+BASIC 笔试 324 答案解析(总分：100.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.以下语句的输出结果是 _。 Print Format (“123.58”，“#，#.00”)（分数：2.00）A.123.58 B.123.00C.123.58D.0，123.58解析：评析 Format 用于格式化输出文本，其一般格式如下： Format(expression,format) 其中，expression 为任何有效表达式。format 为格式字符串，其描述符作用如下： #：输出数字，不在输出前后补 0。 0：输出数字，在输出的前后补 0。 .：
22、输出小数点。 ，：输出千分位分隔符。 %：输出百分比符号，同时转化数值。 ：输出前加“”。2.改变驱动器列表框的 Drive 属性值将激活_事件。（分数：2.00）A.Change B.ScrollC.KeyDownD.KeyUp解析：评析 驱动器列表框控件的相关属性和事件 驱动器列表框的 Drive 属性，用来设置或返回程序运行时所选择的驱动器名。 当驱动器列表框的 Drive 属性值发生变化时，会触发驱动器列表框的 Change 事件。 当驱动器列表框的滚动框被重新定位或沿水平或垂直方向滚动时，会触发驱动器列表框的 Scroll 事件。 在驱动器列表框获得焦点时，按下或松开键盘上的按键，会
23、触发驱动器列表框的 KeyDown 或 KeyUp事件。3.以下叙述中错误的是_。（分数：2.00）A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用 Private 定义的通用过程能被其他窗体调用 C.在设计 Visual Basic 程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件D.全局变量必须在标准模块中定义解析：评析 一个应用程序可以有多个窗体(最多可达 255 个)；在默认情况下，模块级变量对该模块中的所有过程都是可见的，但对其他模块中的代码不可见。模块级变量在模块的声明部分用 Private 或 Dim声明。 全局变量必须用 Public 或 Global
24、语句声明，不能用 Dim 语句声明，更不能用 Private 语句声明；同时，全局变量只能在标准模块中声明，不能在过程或窗体模块中声明。 在设计 Visual Basic 程序时，窗体、标准模块、类模块等都分别有各自的类型名，保存时需要保存为不同的文件。4.执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量 strInput 的内容是_。 atrInput=InputBox(“请输入字符串”，“字符串对话框”，“字符串”)（分数：2.00）A.“请输入字符串”B.“字符串对话框”C.“字符串” D.空字符串解析：评析 InputBox(“请输入字符串”，“字符串对话框”，“字符串
25、”)，其中“请输入字符串”为在文本框显示给用户的信息，“字符串对话框”为显示在输入框标题栏中的标题，“字符串”为在没有用户输入时返回的值。5.设 a=5，b=6，c=7，d=8，则执行下列语句后，x 的值为_。 x=IIF(aB) And(cd)，10,20)（分数：2.00）A.10B.20 C.30D.300解析：评析 函数：IIF(expr,val1，val2)与 IF 语句相似，当布尔表达式 expr 为 True 时，则选择val1 的值，否则选择 val2 的值。6.以下正确的叙述是_。（分数：2.00）A.Select Case 语句中的测试表达式可以是任何形式的表达式B.Sel
26、ect Case 语句中的测试表达式只能是数值表达式或字符串表达式 C.在执行 Select Case 语句时，所有的 Case 子句均按出现的次序被顺序执行D.如下 Select Case 语句中的 Case 表达式是错误的： Select Case x Case 1 to 10 End Select解析：评析 SelectCase 语句中的测试表达式只能是数值表达式或字符串表达式。7.以下关系表达式中，其值为假的是_。（分数：2.00）A.“XYZ“XYz“B.“VisualBasic“=“visualbasic“ C.“the“there“D.“Integer“Int“解析：评析 字符串
27、比较大小规则：从左到右逐个比较其字符的 ASCII 值。有以下几种情况： 字符串相等。 当两个字符串不是所有对应位置上的字符都相等，以第一次出现不同字符时的比较结果为准。 前面完全相等，以长者为大。 对于纯英文且大小写相同，可按英文字典顺序比较。在字典顺序后出现的比在前面出现的大。当出现不对 应的大小写字母时，小写字母总是大于相同的大写字母。 字符串由汉字组成时，实际上按拼音的 ASCII 值比较。 数字字符比较遵循上面的规则。8.n 个顶点的强连通图的边数至少有 _。（分数：2.00）A.n-1B.n(n-1)C.n D.n+1解析：评析 在有向图中，若任意两个顶点都连通，则称该图是强连通图
28、，这样的有向图的形状是环状，因而至少应有 n 条边。9.在窗体上画两个标签和一个命令按钮，其名称分别为 Label1、Label2 和 Command1，然后编写如下程序：Private Sub func(L As Label，ByVal a As Integer) L.Caption=“1234“ a=a*aEnd SubPrivate Sub Form_ Load() Label1.Caption=“ABCD“ Label2.Caption=10End SubPrivate Sub Command1_Click() a=Val(Label2.Caption) Call func (Labe
29、l1，A) Label2.Caption=aEnd Sub 程序运行后，单击命令按钮，在两个标签 Label1 和 Label2 中显示的内容分别是_。（分数：2.00）A.ABCD 和 10B.1234 和 100C.ABCD 和 100D.1234 和 10 解析：评析 单击命令按钮后变量 a 赋初值 a=10，通过 Call 调用函数后，Label1.Caption=“1234”，而由于参数 a 是按值传递的，所以调用完函数后变量 a 的值在单击事件中并没有改变，所以执行语句Label2.Caption=a 后，Label2 中显示的值仍为 10。10.设窗体 Form1 中有一名为 m
30、nuFile 的菜单，它只有一个标题为 Open 的子菜单。为使程序运行时，按下Alt+ F 键窗体中能够显示如下图所示的菜单项，则 mnuFile 的标题应为 _。 （分数：2.00）A.File(B.File(C.File(& D.File(-解析：评析 编辑菜单时，为了能够通过键盘访问菜单项，可以在字母前插入一个&符号。在程序运行时，&后面的字母带有下划线，而&本身不可见。如编辑菜单时输入的标题为 File(&F)，则运行时该菜单项显示为 File(F)，并且可以通过按键 Alt +F 来访问该菜单项。11.用链表表示线性表的优点是_。（分数：2.00）A.便于插入和删除操作 B.数据元
31、素的物理顺序与逻辑顺序相同C.花费的存储空间较顺序存储少D.便于随机存取解析：评析 链式存储结构克服了顺序存储结构的缺点：它的结点空间可以动态申请和释放；它的数据元素的逻辑次序靠结点的指针来指示，不需要移动数据元素。故链式存储结构下的线性表便于插入和删除操作。12.软件开发的结构化生命周期方法将软件生命周期划分成_。（分数：2.00）A.定义、开发、运行维护 B.设计阶段、编程阶段、测试阶段C.总体设计、详细设计、编程调试D.需求分析、功能定义、系统设计解析：评析 通常，将软件产品从提出、实现、使用维护到停止使用退役的过程称为软件生命周期。它可以分为软件定义、软件开发及软件运行维护三个阶段。1
32、3.在设计应甩程序时，通过_窗口可以查看到应用程序工程中的所有组成部分。（分数：2.00）A.代码窗口B.窗体设计窗口C.属性窗口D.工程资源管理器窗口 解析：评析 工程管理器窗口用来列出当前工程中的窗体和模块以及类模块等工程的组成部分。14.下列不属于结构化分析的常用工具是_。（分数：2.00）A.数据流图B.数据字典C.判定树D.PAD 图 解析：评析 结构化分析的常用工具有数据流图、数据字典、判定树和判定表。而 PAD 图是常见的过程设计工具中的图形设计。15.在 Visual Basic 中，下列运算符中优先级最高的是_。（分数：2.00）A.* B./C.D.Not解析：评析 运算符
33、优先级别：算术运算关系运算逻辑运算算术运算符运算优先级：(指数)(取负)-(乘法)*(浮点除法)/(整数除法)/(取模)MOD(加 法)+。16.窗体上画一个文本框(其名称为 Text1)和一个标签(其名称为 Label1)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是_。（分数：2.00）A.Private Sub Text1_ Change() Label1.Caption=Text1.TextEnd Sub B.Private Sub Text1_ Click() Label1.Caption=Text1.TextEnd SubC
34、.Private Sub Label1_ Change() Label1.Caption=Text1.TextEnd SubD.Private Sub Label1_ Click() Label1.Caption=Text1.TextEnd Sub解析：评析 当在文本框中输入字符时，文本框的内容发生变化，所以应把程序写在 Text1_ Change()事件中。17.以下程序段运行的结果是_。Dim a(-1 To 5)As BooleanDim flag As Booleanflag=FalseDim i As IntegerDim j As IntegerDo Until flag=True
35、 For i= -1 To 5 j=j+1 If a (i)= False Then a(i)=True Exit For End If If i=5 Then flag=True End If Next Loop Print j（分数：2.00）A.20B.7C.35 D.8解析：评析 该程序段的作用是给数组 a 的每个数组元素赋值 True，具体实现的方式为： 每次从数组a 的第一个元素开始判断，该元素是否为 False，如果是，则令此元素为 True，然后跳出循环，重新从数组 a 的第一个元素开始判断：如果当前元素不为 False，则判断下一个元素。因此语句 j=j+1 将执行1+2+3
36、+4+5+6+7=28 次，即 j=28。然后再遍历一遍数组 a 的所有元素，最后结束程序段。所以 j 最终的值是：j=28+7=35。18.假定程序中有以下语句： answer=MsgBox(“String1“,“String2“, “String3“ ,2) 执行该语句后，将显示一个信息框，此时如果单击“确定”按钮，则 answer 的值为_。（分数：2.00）A.String1B.String2C.String3D.1 解析：评析 MsgBox 函数：在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。 返回值 常数 值 描述 vbOK 1 OK v
37、bCancel 2 Cancel vbAbort 3 Abort vbRetry 4 Retry vbIgnore 5 Ignore vbYes 6 Yes vbNo 7 No 本题单击的是“确定”按钮，及 vbOK，所以 MsgBox返回 1。19.设置复选框中或单选按钮的标题对齐方式的属性是_。（分数：2.00）A.AlignB.StyleC.SortedD.Alignment 解析：评析 复选框和单选按钮的相关属性 Style 属性：指定复选框或单选按钮的显示方式。 Alignment 属性：设置复选框或单选按钮控件标题的对齐方式，可以取 0 和 1 两种值，取值为 0 则控件标题左对齐
38、：取值为 1 则控件标题右对齐。20.在数据管理技术发展过程中，文件系统与数据库系统的主要区别是数据库系统具有_。（分数：2.00）A.数据无冗余B.数据可共享C.专门的数据管理软件D.特定的数据模型 解析：评析 在文件系统中，相互独立的记录其内部结构的最简单形式是等长同格式记录的集合，易造成存储空间大量浪费，不方便使用。而在数据库系统中，数据是结构化的，这种结构化要求在描述数据时不仅描述数据本身，还要描述数据间的关系，这正是通过采用特定的数据模型来实现的。21.能够获得一个文本框中被选取文本的内容的属性是_。（分数：2.00）A.TextB.SeILengthC.SelText D.SelS
39、tart解析：评析 文本框有很多属性，其中 text 属性用来设置文本框中显示的内容。 SelLength 属性存放当前选中的字符数。 SelText 属性含有当前所选择的文本字符串，如果没有选择文本，则该属性含有一个空字符串。 SelStart 属性定义当前选择的文本的起始位置。22.下列说法中，不属于数据模型所描述的内容是_。（分数：2.00）A.数据结构B.数据操作C.数据查询 D.数据约束解析：评析 数据模型所描述的内容有 3 个部分，它们是数据结构、数据操作和数据约束。其中，数据模型中的数据结构主要描述数据的类型、内容、性质，以及数据库的联系等：数据操作主要是描述在相应数据结构上的操
40、作类型与操作方式。23.在窗体上画一个命令按钮(名称为 Command1)，然后编写如下事件过程：Private Sub Command1_ Click() Dim b As Integer b=b+1End Sub 运行程序，三次单击命令按钮后，变量 b 的值是_。（分数：2.00）A.0B.1 C.2D.3解析：评析 变量定义后，若没有人工定义初值，程序启动后，系统将自动把变量初值设为 0。本题中，变量 b 是局部变量，只作用于单击事件中，每次单击都会对 b 重新赋值。24.在窗体上画一个命令按钮(其名称为 Command1)，然后编写如下事件过程：Private Sub Command1
41、_Click() Dim a(5，5)As Integer Dim i As Integer, j As Integer For i= 1 To 3 For j= 1 To 3 a(i，j)=(i-1)*3+j Print a (i，j) Next j Print Next iEnd Sub 程序运行后，单击命令按钮，在窗体上的输出结果是_。（分数：2.00）A.1 4 7 2 5 8 3 6 9B.1 2 3 4 5 6 7 8 9 C.1 2 3 4 5 6 7 8 9D.没有输出解析：评析 程序共有两层循环，每执行完一次内循环，则打印换行，由此判断选项 A，B 可能正确，当外层循环执行第
42、一次时，a(i，j)=(i-1)*3+j 相当于 a(1，j)=j，由此可判断选项 B 为正确答案。25.在窗体上画一个命令按钮(其名称为 Conlmand1)，然后编写如下事件过程：Private Sub Command1_Click() For i=1 To 4 If i=1 Then x=i If i=4 Then x=x+1 Print x Next iEnd Sub 程序运行后，单击命令按钮，其输出结果为_。（分数：2.00）A.1 2 3 4B.2 3 4 5 C.2 3 4 4D.3 4 5 6解析：评析 第一次循环时 X 的值为 2，每次加 1，所以答案为 2 3 4 5。26
43、.算法分析的目的是 _。（分数：2.00）A.找出数据结构的合理性B.找出算法中输入和输出之间的关系C.分析算法的易懂性和可靠性D.分析算法的效率以求改进 解析：评析 算法分析是指对一个算法的运行时间和占用空间做定量的分析，一般计算出相应的数量级，常用时间复杂度和空间复杂度表示。分析算法的目的就是要降低算法的时间复杂度和空间复杂度，提高算法的执行效率。27.在窗体上画一个通用对话框，程序运行后，通过 ShowOpen 方法显示“打开”对话框，要求在该对话框的“文件类型”栏中只显示扩展名为.DOC 的文件，则对通用对话框的 Filter 属性的正确设置是_。（分数：2.00）A.“(*.DO)*
44、.DOC“B.“(*.DO(.DO)“C.“(*.DO)*.DOC“D.“(*.DO)*.DOC“ 解析：评析 CommonDialog1. Filter=“(*.DOC) *.DOC“，通过 ShowOpen 方法显示“打开”对话框时对话框的“文件类型”栏中只显示扩展名为.DOC 的文件。28.为了清除列表框中的所有内容，应使用的方法是_。（分数：2.00）A.ClsB.Clear C.RemoveD.RemoveItem解析：评析 使用 Clear 方法清除列表框中所有内容。29.在窗体上画一个命令按钮，然后编写如下程序：Sub S1(ByVal x As Integer, By Val
45、y As Integer) Dim t As Integer t=x x=y y=tEnd SubPrivate Sub Command1_ Click() Dim a As Integer, b As Integer a=10 b=30 S1 a，b Print “a=“；a=“b=“；bEnd Sub 程序运行后，单击命令按钮，输出结果是_。（分数：2.00）A.a=30 b=10B.a=30 b=30C.a=10 b=30 D.a=10 b=10解析：评析 过程 S1 似乎是要将两个变量的值进行交换，但由于参数是用传值的方式来传递变量值的，所以执行完该过程后，a 和 b 的值并未被交换，
46、保持原来的值不变。30.在窗体上画一个命令按钮(名称为 Command1)，然后编写如下事件过程：Private Sub Command1_Click() b=5 c=6 Print a=b+ cEnd Sub 程序运行后，单击命令按钮，输出的结果是_。（分数：2.00）A.a=11B.a=b+ cC.a=D.False 解析：评析 在本题中，变量 a 未定义，因此初始值为 0，在表达式 a=b+ c 中，a=0，b+ c=5+6=11，所以表达式的值为 False，程序的输出结果为 False。31.在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为 Text1、Command1 和
47、 Label1，文本框的 Text1 属性设置为空白，然后编写如下事件过程：Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x)End Sub 程序运行后，在文本框中输入 28.653，单击命令按钮，标签中显示的内容是_。（分数：2.00）A.27B.28C.29 D.30解析：评析 程序中各部分值的运算过程为： “Text1.Text=“28.653“ Val(Text1.Text)=28.653 Val(Text1.Text)+0.5=29.153 Int(Val(Text1.Text)+0.5)=29 x=29 str(x)=“29“32.下列程序段的执行结
