1、VB笔试模拟试卷 112及答案与解析 1 算法的空间复杂度是指 ( )。 （ A）算法程序的长度 （ B）算法程序中的指令条数 （ C）算法程序所占的存储空间 （ D）算法执行过程中所需要的存储空间 2 数据的存储结构是指 ( )。 （ A）数据所占的存储空间 （ B）数据的逻辑结构在计算机中的存放形式 （ C）数据在计算机中的顺序存储方式 （ D）存储在计算机外存中的数据 3 有下列二叉树，对此二叉树前序遍历的结果为( )。 （ A） ACFHIBEDG （ B） ABCDEFGHI （ C） ABDEGCFHI （ D） ABCDEFHGI 4 下列描述中正确的是 ( )。 （ A）程序就
2、是软件 （ B）软件开发不受计算机系统的限制 （ C）软件既是逻辑实体，又是物理实体 （ D）软件是程序、数据和相关文档的集合 5 两个或两个以上模块之间联系的紧密程度称为 ( )。 （ A）耦合性 （ B）内聚性 （ C）复杂性 （ D）数据传输特性 6 数据库技术的根本目标是要解决数据的 ( )。 （ A）存储问题 （ B）共享问题 （ C）安全问题 （ D）保护问题 7 下列不 属于软件工程 3个要素的是 ( )。 （ A）工具 （ B）过程 （ C）方法 （ D）环境 8 关系数据库管理系统能实现的专门关系运算包括 ( )。 （ A）排序、索引、统计 （ B）选择、投影、连接 （ C）
3、关联、更新、排序 （ D）显示、打印、制表 9 将 E-R图转换到关系模式时，实体与实体间的联系可以表示成 ( )。 （ A）属性 （ B）关系 （ C）键 （ D）域 10 设计数据库的存储结构属于 ( )。 （ A）需求分析 （ B）概念设计 （ C）逻辑设计 （ D）物 理设计 11 以下关于函数过程的叙述中，正确的是 （ A）函数过程形参的类型与函数返回值的类型没有关系 （ B）在函数过程中，过程的返回值可以有多个 （ C）当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递 （ D）如果不指明函数过程参数的类型，则该参数没有数据类型 12 设 a=5， b=4， c=3
4、， d=2，下列表达式的值是 3 2*b Or a=c And b C Or c d （ A） 1 （ B） True （ C） False （ D） 2 13 以下叙述中错误的是 （ A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 （ B）当程序运行时，双击一个窗体，则触发该窗体的 DblClick事件 （ C） Visual Basic应用程序只能以解释方式执行 （ D）事件可以由用户引发，也可以由系统引发 14 运行以下程序后，输出的图形是 Private Sub Command1_Click() Line(500，500)-(1000， 500) Line(75
5、0， 300)-(750， 700) End Sub （ A）一条折线 （ B）两条分离的直线段 （ C）一个伞形图形 （ D）一个十字形图形 15 设 x=4， y=8， z=7，以下表达式的值是 x y And(Not y z) Or z x （ A） 1 （ B） -1 （ C） Tree （ D） False 16 为了使命令按钮 (名称为 Command1)右移 200，应使用的语句是 （ A） Command1.Move-200 （ B） Command1.Move200 （ C） Command1.Left=Command1.Left+20 （ D） Command1.Left=
6、Command1.Left-200 17 在窗体上画两个名称分别为 Text1、 Texte2的文本框和一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() Dim x As Integer， n As Integer x = 1 n = 0 Do While x 20 x = x * 3 n = n + 1 Loop Text1.Text=Str(x) Text2.Text=Str(n) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别是 （ A） 15和 1 （ B） 27和 3 （ C） 195和 3
7、 （ D） 600和 4 18 在窗体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer， n As Integer For i=0 To 50 i = i + 3 n = n + 1 If i 10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是 （ A） 2 （ B） 3 （ C） 4 （ D） 5 19 在窗体上画一个名称为 Text1的文本框和一个名称为 Co
8、mmand1的命令按钮，然后编写 如下事件过程： Private Sub Command1_Click() Dim arrayl(10，10)As Integer Dim i， j As Integer For i=1 To 3 For j=2 To 4 arrayl(i，j)=i + j Next j Next i Text1.Text=arrayl(2， 3)+arrayl(3， 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是 （ A） 12 （ B） 13 （ C） 14 （ D） 15 20 在窗体上画一个名称为 Commandl的命令按钮，然后编写如下程序： P
9、rivate Sub Command1_Click() Dim i As Integer， j As Integer Dim a(10， 10)As Integer For i=1 To 3 For i=1 To 3 a(i， j)=(i-1) *3+j Print a(i， j)； Next i Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的是 （ A） 1 2 3 246 3 69 （ B） 2 3 4 3 4 5 4 5 6 （ C） 1 4 7 2 5 8 3 6 9 （ D） 1 2 3 4 5 6 7 8 9 21 下列不能打开工具箱窗口的操作是
10、（ A）执行 “视图 ”菜单中的 “工具箱 ”按钮 （ B）按 Alt+F8键 （ C）单击工具栏上的 “工具箱 ”按钮 （ D）按 Alt+V键，然后按 Alt+X键 22 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer， s As Integer a = 8 s = 1 Do s = s + a a = a - 1 Loop While a =0 Print s， a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 （ A） 7 9 （ B） 34 0 （
11、C） 9 （ D）死循环 23 假定有以下程序段： For i= 1 To 4 For j=5 To 1 Step-1 Print i*j Next j， Next i 则语句 Print i*j的执行次数是 （ A） 20 （ B） 16 （ C） 17 （ D） 18 24 在窗体上画一个名称为 Text1的文本框，一个名称为 Command1的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click() n=Val(Text1.Text) if n2=n/2 Then f=f1(n) Else f=f2(n) End If Print f； n E
12、nd Sub Public Function f1(ByRef x) x = x * x f1 =x + x End Function Public Function f2(ByVal x) x = x + x f2=x+x+x End Function 程序运行后，在文本框中输入 6，然后单击命令按钮，窗体上显示的是 （ A） 72 36 （ B） 108 36 （ C） 72 6 （ D） 108 6 25 以下关于函数过程的叙述中，正确的是 （ A）如果不指明函数过程参数的类型，则该参数没有数据类型 （ B）函数过程的返回值可以有多个 （ C）当数组作为函数过程的参数时，既能以传值方式传
13、递，也能以引用方式传递 （ D）函数过程形参的类型与函数返回值的类型没有关系 26 设在菜单编辑器中定义了一个菜单项 ，名为 menul为了在运行时隐藏该菜单项，应使用的语句是 （ A） menul.Enabled=Tme （ B） menul.Enabled=False （ C） menul.Visible=True （ D） menul.Visible=False 27 在窗体上绘制一个名称为 Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=
14、2 Else fun=1 End If End Function Private Sub Command1_Click() Dim i As Integer， s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，在窗体上显示的是 （ A） 6 （ B） 7 （ C） 8 （ D） 9 28 在用通用对 话框控件建立 “打开 ”或 “保存 ”文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件 (即 .txt文件 )，则正确的描述格式是 （ A） text(.txt)|(*.txt) （
15、B）文本文件 (.txt)|(.txt) （ C） text(.txt)|(*.txt) （ D） text(.txt)(*.txt) 29 在窗体上绘制一个名称为 Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Commandl_Click() Dim c As Integer， d As Integer d=0 c=6 x=Array(2， 4， 6， 8， 10， 12) For i=1 To 6 If x(i) c Then d=d+x(i) c=x(i) Else d=d-c End If Next i Print d End Su
16、b 程序运行后，如果单击命令按钮，则在窗体上输出的内容为 （ A） 10 （ B） 16 （ C） 12 （ D） 20 30 设有如下程序： Private Sub Command1_Click() Dim C As Integer， d As Integer c=4 d=InputBox(“请输入一个整数 ”) Do While d 0 If d c Then c=c+1 End If d=InputBox(“请输入一个整数 ”) Loop Print c+d End Sub 程序运行后，单击命令按钮，如果在输入对话框中依次输入 1、 2、 3、 4、 5、 6、7、 8、 9和 0，则输
17、出结果是 （ A） 12 （ B） 11 （ C） 10 （ D） 9 31 执行下面的程序段后， i的值为 _， s的值为 _。 s=2 For i=2 To 9 Step 0.8 s=s +1 Next i 32 一棵二叉树第六层 (根结点为第一层 )的结点数最多为 _个。 33 问题处理方案的正确而完整的描 述称为 _。 34 与数学表达式 对应的， Visual Basic表达式是 _。 35 将 C盘根目录下的图形文件 moon.jpg装入图片框 Picture1的语句是 _。 36 在窗体上画一个名称为 Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名
18、称为 Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。Private Sub Option1_Click(Index As Integer) Select Case _ Case 0 a=“宋体 ” Case 1 a=“黑体 ” Case 2 a=“楷体 _GB2312” End Select Text1._=a End Sub 37 在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() n = 5 f = 1 s = 0 For i=1 To n f
19、= f_ s = s + f Next Print s End Sub 该事件过程的功能是计算的值。请填空。 38 设有如下程序 Option Base 1 Private Sub Command1_Click() Dim arrl Dim Min As Integer， i As Integer arrl=Array(12， 435， 76， -24， 78， 54， 866， 43) Min=_ For i=2 To 8 If arrl(i) Min Then Next i Print “最小值是： ”； Min End Sub 以上程序的功能是：用 Arcay函数建立一个含有 8个元素的
20、数组，然后查找并输出该数组中各元素的最小值。请填空。 39 在窗体上画一个名称为 Lablel的标签和一个名称为 Listl的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签 Labell中显示所选中的项目，如图所示。请在 _处填入适当的内容，将程序补充完整。 Private Sub Form load() Listl.AddItem “北京 ” List1.AddItem “上海 ” List1.AddItem “河北 ” End Sub Private Sub _() Labell.Caption=_ End Sub 40 以下是一个比赛评分程序。在窗体上建
21、立一个名为 Text1的文本框数组，然后画一个名为 Text2的文本框和名为 Command1的命令按钮。运行时在文本框数组中输入 7个分数，单击 “计算得分 ”命令按钮，则最后得分显示在 Text2文本框中 (去掉一个最高分和一个最低分后的平均分即为最后得分 )，如图所示。请填空。Private Sub Commandl_Click() Dim k As Integer Dim sum As Single， max； As Single， min As Single sum=Text1(0) max=Text1(0) min= _ For k= _ To 6 If max Text1(k)
22、Then max = Text1(k) End If If min Texl(k) Then min = Text1(k) End If sum=sum+Text1(k) Next k Text2= (_) /5 End Sub VB笔试模拟试卷 112答案与解析 1 【正确答案】 D 【试题解析】 一个算法的空间复杂度，一般是指执行这个算法所需的存储空间。一个算法所占用的存储空间包括算法程序所占用的空间、输入的初始数据所占用的存储空间及算法执行过程中所需要的额外空间。 2 【正确答案】 B 【试题解析】 数据的存储结构，又称为数据的物理结构，是数据的逻辑结构在计算机中的存放形式。数据的存储结
23、构有顺序结构、链式结构、散列结构和索引结构等。 3 【正确答案】 C 【试题解析】 对二叉树的前序遍历是指：先访问根结点，然后访问左子树，最后访问右子树，并且，在访问左、右子树时，先访问根结点，再依次访问其左、右子树。 4 【正确答案】 D 【试题解析】 软件是运行在计算机硬件之上的逻辑实体，包括程序、数据和相关的文档，软件的开发、运行对计算机系统具有依赖性，受计算机系统的限制。 5 【正确答案】 A 【试题解析】 耦合性是模块间互相连接的紧密程度的度量，取决于各个模块之间接口的复杂度、调用方式以及哪些信息通过接口。 6 【正确答案】 B 【试题解析】 在数据库系统中，需要对数据进行集中、统一
24、的管理，以达到被多个应用程序共享的目标。 7 【正确答案】 D 【试题解析】 软件工程包括 3个要素，即方法、工具和过程。方法 是完成软件工程项目的技术手段；工具支持软件的开发、管理和文档生成；过程支持软件开发的各个环节的控制、管理 8 【正确答案】 B 【试题解析】 关系数据库管理系统的专门关系运算包括选择运算、投影运算和连接运算。 9 【正确答案】 B 【试题解析】 将 E-R图转换成指定 RDBMS中的关系模式是数据库逻辑设计的主要工作。从 E-R图到关系模式的转换是比较直接的，实体和联系都可以表示成关系 10 【正确答案】 D 【试题解析】 物理设计阶段主要解决选择文件存储结构和确定文
25、件存取方法的 问题，包括：选择存储结构、确定存取方法、选择存取路径，确定数据的存放位置。 11 【正确答案】 A 【试题解析】 本题主要考查考生对 Function函数过程的理解。函数过程的返回值可以由用户自行定义，不受形式参数的影响。故 A表述正确。函数过程中，过程的返回值只能有一个，但可以有多种可能，选项 B表述有误。当数组作为函数过程的参数时，一般只能以传地址的方式传输数值。 C项表述错误。在不指明函数过程参数的类型时，该参数为变体变量 (Vriant数据类型 )，在 Visual Basic中参数不可能没有数据类 型。故选项 D错误。 12 【正确答案】 B 【试题解析】 本题考查考生
26、对 VB中运算符的理解。首先考生应按照优先级将表达式分段，然后各段分别计算。各种运算符混合运算时，优先级的关系是：函数运算数值运算符和字符串运算符关系运算符逻辑 (布尔 )运算符。因为逻辑运算符的优先级低，而且运算结果应该是 True或 False，因此可以判断出选项 A和选项 D错误。在题目的表达式中先计算 2*b 8；然后判断 3 8、 a c、 bc、 c d关系表达式的结果，分别是 False、 False、 True、 True。接着 计算 False Or False And True Or True，结果为 True。本题为常考题型，考生应该特别注意，多做相关练习。 13 【正确
27、答案】 C 【试题解析】 本题考查 Visual Basic的相关知识。 Visual Basic应用程序可以以两种方法执行：编译方式与解释方式，所以选项 C是错误的，应为所选。其他选项说法都是正确的。 14 【正确答案】 D 【试题解析】 本题考查 Line方法的使用。 Line方法与 Move方法都是 Visual Basic很重要的方法，历年试题至今未 考过 Line方法的使用，值得关注。本题实际上是划了一个十字形图形，横线的起始点为 (500， 500)，终点为 (1000， 500)；纵线的起始点为 (750， 300)，终点为 (750， 700)。考生可以画直角坐标系进行模拟，答
28、案为 D。 15 【正确答案】 D 【试题解析】 本题考查关系运算符与逻辑运算符。 Not表示 “非 ”。 “Or”所连接的关系式，只要有一个为 Tree，则结果为 True。 And连接的关系式必须同时为True，结果是为 True。本题由于 “Not y z”被括号括起来，故优先计算。 “Not y z”为 False， “x y”为 Tree，所以 “x y And (Not y z)”为 False，故 “x y And (Not y z)Or z x”为 False。所以正确答案为 D。 16 【正确答案】 C 【试题解析】 本题考查命令按钮控件的属性。题目要求命令按钮右移 200，
29、也就是说距离左边框的距离增加 200，使用 Left属性可以实现。 Left则是距离窗体左边框的距离，所以本题正确答案是选项 C。考生需要注意，命令按钮没有 Move属性。 17 【正确答案】 B 【试题解析】 本题考查 Do循环控制语句。根据题意， Do循环控制语句执行了 3次，在执行第三次循环后， x的值为 27，此时终止循环。由于循环了 3次， n值加了 3次 1，故本题正确答案为 B。 18 【正确答案】 B 【试题解析】 本题考查 For循环控制语句。根据 For i循环，本应循环 51次，但该循环语句中嵌套了 If语句，该语句表示当 i值大于 10时，即提前退出 For循环。 i的
30、初始值为 0，在执行完第三次循环时 i值为 9，在执行第 4次循环的时候， i值变为 12，满足 If条件语句，退出 For i循环。所以 n加了 3次 1，正确答案为B。 19 【正确答案】 A 【试题解析】 本题使用 For循环语句对数组进行赋值，根据 “Arrayl(i， j)=i+j”可得： 当 i=1， j=2时， arrayl(1， 2)=3； 当 i=1， j=3时， arrayl(1， 3)=4； 当 i=1， j=4时， arrayl(1， 4)=5； 当 i=2， j=3时， arrayl(2， 2)=4； 当 i=2， j=3时， arrayl(2， 3)=5； 当 i=
31、2， j=4时， array1(2， 4)=6； 当 i=3， j=1时， arrayl(3， 1)=4； 当 i=3， j=2时， arrayl(3， 2)=5； 当 i=3， j=3时， arrayl(3， 3)=6； 当 i=3， j=3时， arrayl(3， 4)=7。 所以 arrayl(2， 3)+arrayl(3， 4)=12。 故本题的正确答案为 A。 20 【正确答案】 D 【试题解析】 本题仍然是使用 For循环对二维数组赋值。由于有 For,循环的嵌套，当 i等于 1时， Forj循环执行三次，根据 “a(i,j)=(i-1)*3+j”可知输出的数值为1、 2、 3。此
32、时 For j循环终止， 并执行 “Print”语句，即进行换行。然后再执行For i的第二次循环，以此类推，正确答案为 D。 21 【正确答案】 B 【试题解析】 本题考查工具箱的打开方式。基本有三种：一为单击 “视图 ”菜单后选择 “工具箱 ”按钮；二为单击工具栏上的 “工具箱 ”按钮；三为使用访问键， Alt+V打开 “视图 ”菜单， Alt+X打开 “工具箱。故 A、 C、 D、操作方式正确。 B项不能打开 VB任何功能。 22 【正确答案】 C 【试题解析】 本题也是考查 Do循环控制语句。由于在 a =0的情况下， Do循环才可以继续执行 循环语句块，所以本循环所条件限制只能执行一
33、次，分别使 s值加上 a值， a值再减去 1，故正确答案为 C。 23 【正确答案】 A 【试题解析】 本题考查 For循环控制语句。考生要理解 For循环的执行顺序与次数。本题有 2个 For循环，外层的 For循环每执行 1次，内层的 For循环都会全部执行 1次，总执行次数为 4乘以 5次，故答案为 A。 24 【正确答案】 A 【试题解析】 本题综合考查 Function函数的建立，调用与传地址、传值的区别。由于输入的数字为 6， 6对 2的浮点除法与整数除法的结果一致，都是 3，所以执行 Then后面的语句，即 f=f1(n)。根据 Function对 f1的定义，参数 x以传地址的
34、方式传送数值，故 n值在被传送到 f1函数过程后，通过 x=x*x，变为 36。 f1值由此变为 72，故正确答案为 A。 25 【正确答案】 D 【试题解析】 本题主要考查对 Function函数过程的理解。在不指明函数过程参数的类型时，该参数为变体变量 (Vriant数据类型 )，在 Visual Basic中参数不可能没有数据类型，选项 A说法错误。函数过程中，过程的返回值只能有一个，但可以有多种可能，选项 B说法错 误。当数组作为函数过程的参数时，一般只能以传地址的方式传输数值，选项 C说法错误。函数过程的返回值可以由用户自行定义，不受形式参数的影响，选项 D正确。 26 【正确答案】
35、 D 【试题解析】 本题考查菜单项的控制。 Enabled属性确定 menul的有效性，而Visible确定 menul的可见性。二者要正确区分。本题正确选项为 D，当 Visible属性设为 False时，菜单项不可见。 27 【正确答案】 B 【试题解析】 本题考查通用过程的调用以及 Mod函数的用法。 “Mod”表示取模， fun过程 的功能是当 m可以被 2整除时，返回 2，否则返回 1。程序利用了一个 For,循环来调用该过程，最后的输出结果是 1+2+1+2+1=7，选项 B正确。 28 【正确答案】 A 【试题解析】 本题考查文件对话框的属性。指出文件是文本文件用“text(.t
36、xt)|(*.txt)”表示。正确答案为 A项。 B项缺少 “*”； C项的分隔符有误； D项缺少分隔符。 29 【正确答案】 C 【试题解析】 本题属于综合性题目，考查知识点较多，难度较大。首先程序包含了一个循环结构，同时循环结构中还嵌套有一个条件结构。循环 体内部将数组中的元素与 c做比较，如果大于 c，则与 d求和，并将结果赋给 d，将该元素赋给c。否则执行 d=d-c。最后的运行结果是 12，选项 C正确。 30 【正确答案】 D 【试题解析】 本题是对控制结构的综合考查。 Do WhileLoop 循环的功能是：当指定的 “循环条件 ”为 Tree或直到指定的 “循环条件 ”变为 T
37、rue之前重复执行一组语句。考生仔细分析即可做答。考生应该注意： Do Loop是根据计算条件表达式以决定是否继续执行循环体中的代码；在循环结构中，循环条件必须是一个数值或者值为 Tree (非零 )或 False(零 )的表达式，在 Do Loop循环中，只要条件表达式为 Tree就执行功能代码块；循环条件为 True或非零，循环可以随意执行多少次，如果循环条件一开始便为 False，则不会执行语句； Do循环可以嵌套，其嵌套的规则与 For-Next循环相同。 31 【正确答案】 5.6,5 【试题解析】 本题考查 For循环控制语句。根据 “先检查，后执行 ”的原则。第一次执行循环时，
38、i值为 3.2，此时 i值没有超过终值，所以开始第一次循环；第二次执行循环前 i值为 4，仍然满足条件；第三次执行前 i值为 4.8，继续执行第三次执行结束后， i值又加 0.8，此时值为 5.6，此时超过终值，终止循环。故第 1空填5.6。据此， For循环执行了三次，每次 s值都加 1，其初始值为 2，故第 2空填5。 32 【正确答案】 32 【试题解析】 二叉树的一个性质是，在二叉树的第 k层上，最多有 2k-1(k1)个结点。由此， 26-1等于 32。所以答案为 32。 33 【正确答案】 算法或程序或流程图 【试题解析】 算法是问题处理方案正确而完整的描述。 34 【正确答案】
39、(Cos(a+B0)2/(3*x)+5 或 (Cos(a+B)*Cos(a+B)/(3*x)+5 或 (Cos(a+B0*Cos (a+B)/(3*x)+5 或 Cos(a+B0*Cos(a+B)/3/x+5 【试题解析】 本题主要考查考生对算术运算符的了解。平方在 Visual Basic中用“”表达，本题的除法应使用浮点除法 “尸表达，否则得不出相同的结果。 35 【正确答案】 Picturel.Picture=LoadPicture (“c： moon.jpg“) 【试题解析】 本题考查图片框的图片装入方法 。 LoadPicture函数与 Picture属性一致，都是用来为图片框装入图
40、片。在设计阶段，可以通过设置 Picture属性来装入图片。在运行阶段，可以通过 LoadPicture函数来装入 36 【正确答案】 Index, Font或 FontName或 Font.Name 【试题解析】 本题考查对控件数组下标的理解。用于控件数组拥有相同的名称，所以必须用下标来访问控件数组中的不同元素。这个属性用 Index来表示。本题建立了单选按钮的控件数组，要求选择不同的单选按钮，则文本框中的字体将根据所选的 单选按钮切换，所以在 Select分支控制语句的 Case后填： Index，表示不同的控件。第二处应把字体值赋给 Text1的 FontName属性，该属性确定文本框中
41、文字的显示格式。 Name属性为 Font属性的子属性，故答案中的写法是等价写法。 37 【正确答案】 /i或 *1/i 【试题解析】 本题考查 For循环。根据题意，每执行一次 For循环， s都要加一次 f。根据已给的等式可以看出， f值每次要比前一次多除一个 i。所以本空填：/i。 38 【正确答案】 arrl(1)或 12,Min=arrl(i) 【试题解析】 本题考查考生对简单算法的掌握。题目要求找出数组的最小值，利用一个 For循环和条件语句来实现。首先应该给 Min赋值，这里注意 For循环是从 i=2 To 8，并没有包含 i=1，因此这里的初值应该是 arrl(1)，也就是
42、12。然后从数组的第 2个元素开始和 Min做比较，如果小于 Min则应该将两者进行交换，即Min=arrl(i)。这样 Min总是做过比较的元素的最小值，循环结束后，它也是整个数组的最小值。如果题目的 For循环是 Fori=1 To 8，那么 Min的初值可以是任意一个大于 arrl最小 值的数，而不一定是 arr(1)。 39 【正确答案】 List1 DblClick或 Form1.Listl DblCiick或 Me.List1 DblClick , Listl.Text 或 Listl 或 Forml.Listl.Text 或 Me.Listl.Text或 Forml.Listl或
43、 Me.Listl 【试题解析】 由于本程序要响应列表框的双击事件，故第一处应填：Listl_DblClick。指明 List1所属的窗体也可以，上面的答案是等价的。列表框的Text属性返回被选中的列表 框的内容，根据题意，第二处应该填： List1.Text。同时由于 Text属性是列表框的属性值，可以省略不写，故上述答案是等价的。 40 【正确答案】 sum或 max或 Text1(0)或 Text1(0).Text, 1, sum-max-min或 sum-min-max 【试题解析】 本题考查解决。实际问题的能力。题目综合性较强，需要对基本算法有所了解。按照题目要求，我们需要先找出最大值和最小值，然后对所有的数进行求和，求和结果减去最大值和最小值，再取平均数即可。掌握了该程序的流程，就很容易回答。
