1、二级 VISUAL+BASIC 笔试 58 及答案解析(总分：90.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.以下关于变量作用域的叙述中，正确的是（分数：2.00）A.窗体中凡被声明为 Private 的变量只能在某个指定的过程中使用B.全局变量必须在标准模块中声明C.模块级变量只能用 Private 关键字声明D.Static 类型变量的作用域是它所在的窗体或模块文件2.在窗体上画一个名称为 Text1 的文本框，一个名称为 Command1 的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click( ) n=
2、Val(Text1.Text) If n/2=n/2 Then f=f1(n) Else f=f2(n) End if Print f；n End Sub Public Function f1(ByRef x) x=X*X n=x+x End Function Public Function f2(ByVal x) X=X*X f2=X+x+x End Function 程序运行后，在文本框中输入 6，然后单击命令按钮，窗体上显示的是（分数：2.00）A.72 36B.108 36C.72 6D.108 63.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮
3、，然后编写如下事件过程： Private Sub Command1_Click( ) Dim array1(10，10)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=2 T0 4 Array1(i，j)=i+j Next j Next i Text1.Text=array1(2，3)+array1(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（分数：2.00）A.15B.14C.13D.124.语句 Prim5/4*6/5Mod 2 的输出结果是（分数：2.00）A.0B.1C.2D.35.在
4、结构化程序设计方法中，下面哪种内聚性最弱?（分数：2.00）A.逻辑内聚B.时间内聚C.偶然内聚D.过程内聚6.数据库系统可分为三级模式，下列选项中不属于数据库三级模式的是（分数：2.00）A.抽象模式B.外模式C.概念模式D.内模式7.设有下列二叉树： （分数：2.00）A.ABCDEFB.BDAECFC.ABDCEFD.DBEFCA8.在窗体上画一个命令按钮(其 Nmne 属性为 Command1)，然后编写如下代码： Option Base l Private Sub Command1_Click( ) Dim a s=0 a=Array(1，2，2，4) j=1 For i=4 To
5、1 Step-1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是（分数：2.00）A.4321B.1234C.34D.129.在窗体上画四个文本框(如图所示)，并用这四个文本框建立一个控件数组，名称为 Text1(下标从 0 开始，自左至右顺序增大)，然后编写如下事件过程： Private Sub Command1_Click( ) For Each Text Box ln Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内
6、容分别为 （分数：2.00）A.01 2 3B.1 2 3 4C.01 3 2D.出错信息10.一个工程中含有窗体 Form1、Form2 和标准模块 Model1，如果在 Fomil 中有语句 Public X As Integer，在 Model1 中有语句 Public Y As Integer则以下叙述中正确的是（分数：2.00）A.变量 X、Y 的作用域相同B.Y 的作用域是 Model1C.在 Form1 中可以直接使用 XD.在 Fomr2 中可以直接使用 X 和 Y11.在数据库管理系统提供的数据语言中，负责数据的完整性、安全性的定义与检查以及并发控制、故障恢复等功能的是（分数
7、：2.00）A.数据定义语言B.数据转换语言C.数据操纵语言D.数据控制语言12.以下关系表达式中，其值为 False 的是（分数：2.00）A.“ABC“AbC“B.“the“they“C.“VISUAl，“=UCase(“Visual“)D.“Integer“Int“13.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click( ) a=12345 Print Format $(a，“000.00“) End Sub 程序运行后，单击命令按钮，窗体上显示的是（分数：2.00）A.123.45B.12345.00C.1
8、2345D.00123.4514.以下关于图片框控件的说法中，错误的是（分数：2.00）A.可以通过 Print 方法在图片框中输出文本B.清空图片框控件中图形的方法之一是加载一个空图形C.图片框控件可以作为容器使用D.用 Stretch 属性可以自动凋整图片框中的图形的大小15.在窗体上画个文本框、一个标签和一个命令按钮，其名称分别为 Text1、Label1 和 Command1，然后编写 如下两个事件过程： Private sub Command1_Click( ) strText=lnputBox(“请输入”) Text1.Text=strText EndSub Private Sub
9、 Text1_Change( ) Label1.Caption=Right(Trim(Text1.Text)，3) End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入 abcdef，则在标签中显示的内容是（分数：2.00）A.空B.abcdefC.abeD.def16.假字在窗体(名称为 Forml)的代码窗口中定义如下记录类型: Private Type animal Anima1Name As String * 20 aColor As String * 10 End Type 在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub
10、 Command1_Click( ) Dim rec As animal Open“c: /vbTest.dat“For Random As#1 Len = Len(rec) rec.animalName = “Cat“ rec.aColor = “White“ Pat#1 , rec Close#1 End Sub 则以下叙述中正确的是（分数：2.00）A.记录类型 animal 不能在 Form1 中定义,必须在标准模块中定义B.如果文件 c：/vbTesdat 不存在，则 Open 命令执行失败C.由于 Put 命令中没有指明记录号，因此每次都把记录写到文件的末尾D.语句“Put#1，r
11、ec“将 animal 类型的两个数据元素写到文件中17.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod2=0 Then f=m Else f=l End lf End Function Private Sub Command1_Click( ) Dim i As Integer s=0 For i=1 To 5 s=s+f(i) Next Print 8 End Sub 程序运行后，单击命令按钮，在窗体上显示的是 A11 B。10 C9 D8（分数：2.00）A
12、.B.C.D.18.检查软件产品是否符合需求定义的过程称为（分数：2.00）A.确认测试B.集成测试C.验证测试D.验收测试19.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) c=1234 c1=Trim(Str(c) For i=1 T0 4 Print_ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： 1 12 123 1234 则在下划线处应填入的内容为（分数：2.00）A.Right(c1，B.Left(c1，C.Mid(c1，i，1)D.Mid(c1，i，20.在
13、窗体上画一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框，然后编写如下事件过程： Private Sub Command1_Click( ) n=Val(Text1.Text) For i=2 To n Forj =2 To Sqr(i) If i Mod j=0 Then Exit For Next j lf jSqr(i) Then Print i Next i End Sub 该事件过程的功能是（分数：2.00）A.输出 n 以内的奇数B.输出 n 以内的偶数C.输出 n 以内的素数D.输出 n 以内能被 j 整除的数21.以下数据结构中，属于线性数据结构的是（
14、分数：2.00）A.集合B.线性表C.二叉树D.图22.执行语句 s=Len(Mid(“VisualBasic”，1，6)后，s 的值是，（分数：2.00）A.VisualB.BasicC.6D.1123.以下叙述中错误的是（分数：2.00）A.一个工程可以包括多种类型的文件B.Visual Basic 应用程序既能以编译方式执行，也能以解释方式执行C.程序运行后，在内存中只能驻留一个窗体D.对于事件驱动型应用程序，每次运行时的执行顺序可以不一样24.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Comma
15、nd1_Click( ) Text1.Text=“Visual“ Me.Text1=“Basie“ Text1=“Program“ End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是（分数：2.00）A.VisualB.BasicC.ProgramD.出错25.在窗体上画个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) x=-5 If Sgn(x)Then y=Sgn(x2) Else y=Sgn(x) End If Print y End Sub 程序运行后，单击命令按钮，窗体上显示的是（分数：2.00
16、）A.-5B.25C.1D.-126.算法中的每个步骤都必须是有明确意义的，不允许有模陵两可的解释，也不允许有多义性，这个性质称为（分数：2.00）A.可行性B.有穷性C.正确性D.确定性27.在窗体上画一个名称为 Drive1 的驱动器列表框，个名称为 Dir1 的目录列表框。当改变当前驱动器时，目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是（分数：2.00）A.Drive1_ChangeB.Drive1_ClickC.Dir1_ClickD.Dir1_Change28.在关系数据库中，用来表示实体之间联系的是（分数：2.00）A.树形结构B.网状结构C
17、.线性表D.二维表29.在窗体上画一个名称为 Text1 的文本框，要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是 APrivate SubText1_KeyPress(KeyAscii As Integer) If KeyAscii65 or KeyAscii90 Then MsgBox“请输入大写字母” KeyAscii=0 End If End Sub B. Private Sub Text1_KeyDown( KeyCode As Integer,Shift As Integer) If KeyCode 65 or KeyCode 90 Then Msgbox“请输入大
18、写字母” KeyCode = 0 End If End Sub C. Private SuB Text1_MouseDown( Button AS Integer,_ Shift As lnteger,X As Single,Y As Single) If Asc ( Text1. Text) 65 or Asc ( Text1.Text) 90 Then Msgbox“请输入大写字母” End If End Sub D. Private Sub Text1_Change( ) If Asc(Text1.Text) 64 And Asc(Text1.Text) 9l Then Msgbox“请
19、输入大写字母” End lf End Sub（分数：2.00）A.B.C.D.30.下面对对象概念描述，不正确的是（分数：2.00）A.任何对象都必须有继承性B.对象是属性和方法的封装体C.对象间的通讯靠消息传递D.操作是对象的动态属性31.确定个控件在窗体上的位置的属性是（分数：2.00）A.Width 和 fteightB.Width 或 IteightC.Top 和 LeftD.Top 或 Left32.以下叙述中错误的是（分数：2.00）A.下拉式菜单和弹出式菜单都用菜单编辑器建立B.在多窗体程序中，每个窗体都可以建立自己的菜单系统C.除分隔线外，所有菜单项都能接收 Click 事件D
20、.如果把一个菜单项的 Enabled 属性设置为 False，则该菜单项不可见33.以下描述中正确的是（分数：2.00）A.标准模块中的任何过程都可以在整个工程范围内被调用B.在一个窗体模块中可以调用在其他窗体中被定义为 Public 的通用过程C.如果工程中包含 SubMain 过程，则程序将首先执行该过程D.如果工程中不包含 SubMain 过程，则程序一定首先执行第一个建立的窗体34.对建立良好的程序设计风格，描述正确的是（分数：2.00）A.程序应简单、清晰、可读性好B.符号名的命名只要符合语法即可C.充分考虑程序的执行效率D.程序的注释可有可无35.以下关于函数过程的叙述中，正确的是
21、（分数：2.00）A.函数过程形参的类型与函数返回值的类型没有关系B.在函数过程中，过程的返回值可以有多个C.当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D.如果不指明函数过程参数的类型，则该参数没有数据类型二、B填空题/B(总题数：10，分数：20.00)36.解题方案的准确而完整的描述称为U 【1】 /U。（分数：2.00）填空项 1:_37.在数据结构中，顺序存储结构的数据元素所占的存储空间是U 【2】 /U的。（分数：2.00）填空项 1:_38.软件开发环境是全面支持软件开发全过程的U 【3】 /U的集合。（分数：2.00）填空项 1:_39.数据库理论中，数据
22、的独立性一般可分为物理独立性和U 【4】 /U（分数：2.00）填空项 1:_40.数据库系统中，实现各种数据管理功能的核心软件称为U 【5】 /U（分数：2.00）填空项 1:_41.在菜单编辑器中建立一个菜单，其主菜单项的名称为 mnuEdit，Visible 属性为 False。程序运行后，如果用鼠标右键单击窗体，则弹出与 mnuEdit 对应的菜单。以下是实现上述功能的程序，请填空。 Private Sub FormU 【6】 /U(Button As Integer，Shift As Integer，X As SinSle，Y As SinSle) If Button=2 Then
23、U【7】 /UmnuEdit End If End Sub（分数：2.00）填空项 1:_42.在窗体上画一个名称为 Text1 的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为 Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示。请填空。 （分数：2.00）填空项 1:_43.在窗体上画两个组合框，其名称分别为 Combo1、Comb02，然后画两个标签，名称分别为Label1、Label2，如 图所示。程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。 （分数：2.00）
24、填空项 1:_44.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Privme Sub Command1_Click( ) n=5 f=1 s=0 For i=1 To n f=fU 【12】 /U s=s+f Next Print s End Sub 该事件过程的功能是计算 （分数：2.00）填空项 1:_45.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click( ) Dim a(10)As Integer For i=1 To 10 a(i)=(i) Next
25、 Call swap(U 【13】 /U) For i=1 T0 10 Print a(i) Next End Sub Sub swap(b( )As Integer) n=U 【14】 /U For i=1 To n/2 t=b(i) b(i)=b(n) b(n)=t U 【15】 /U Next End Sub 上述程序的功能是，通过调用过程 swap，调换数组中数值的存放位置，即 a(1)与 a(10)的值互换；a(2)与 a(9)的值互换;a(5)与 a(6)的值互换。请填空。（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试 58 答案解析(总分：90.00，做题时
26、间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.以下关于变量作用域的叙述中，正确的是（分数：2.00）A.窗体中凡被声明为 Private 的变量只能在某个指定的过程中使用B.全局变量必须在标准模块中声明 C.模块级变量只能用 Private 关键字声明D.Static 类型变量的作用域是它所在的窗体或模块文件解析：解析 在窗体中凡是被声明为 Private 的变量，可以在整个窗体中被调用。全局变量只能在标准模块中声明。模块级变量可以用 Private 关键字声明，也可以在通用过程中用 Dim 关键字声明。Static类型的变量如果在事件过程中声明，那么只能在该过程中调用
27、。2.在窗体上画一个名称为 Text1 的文本框，一个名称为 Command1 的命令按钮，然后编写如下事件过程和通用过程： Private Sub Command1_Click( ) n=Val(Text1.Text) If n/2=n/2 Then f=f1(n) Else f=f2(n) End if Print f；n End Sub Public Function f1(ByRef x) x=X*X n=x+x End Function Public Function f2(ByVal x) X=X*X f2=X+x+x End Function 程序运行后，在文本框中输入 6，然后
28、单击命令按钮，窗体上显示的是（分数：2.00）A.72 36 B.108 36C.72 6D.108 6解析：解析 由于输入的数字为 6，6 对 2 的浮点除法与整数除法的结果一致，都是 3，所以执行 Then后面的语句，即 f=fl(n)。根据 Function 对 n 的定义，参数 x 以传地址的方式传送数值，故 n 值在被传送到 n 函数过程后，通过 x：x。x，变为 36。f1 值由此变为 72。3.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim array
29、1(10，10)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=2 T0 4 Array1(i，j)=i+j Next j Next i Text1.Text=array1(2，3)+array1(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（分数：2.00）A.15B.14C.13D.12 解析：解析 根据“array1(i,j)=i+j“可知：array1(2，3)的值为 5，array1(3，4)的值为 7，相加的结果为 12。4.语句 Prim5/4*6/5Mod 2 的输出结果是（分数
30、：2.00）A.0B.1 C.2D.3解析：解析 “/”表示浮点除法；“/”表示整数除法；“Mod”为取模运算。“/”与“。”运算的优先级高于“/”，“/”运算的优先级高于“Mod。5.在结构化程序设计方法中，下面哪种内聚性最弱?（分数：2.00）A.逻辑内聚B.时间内聚C.偶然内聚 D.过程内聚解析：解析 内聚有很多种类，其中内聚性由弱到强的顺序为：偶然内聚、逻辑内聚、时间内聚、过程内聚。6.数据库系统可分为三级模式，下列选项中不属于数据库三级模式的是（分数：2.00）A.抽象模式 B.外模式C.概念模式D.内模式解析：解析 数据库的三级模式是指概念模式、内模式和外模式。其中外模式又叫子模式
31、，内模式又叫物理模式。7.设有下列二叉树： （分数：2.00）A.ABCDEFB.BDAECFC.ABDCEF D.DBEFCA解析：解析 二叉树的遍历分为先序、中序、后序三种不同方式。本题要求先序遍历遍历顺序应该为：访问根结点一，先序遍历左子树一，先序遍历右子树。按照定义，先序遍历序列是 ABDCEF。8.在窗体上画一个命令按钮(其 Nmne 属性为 Command1)，然后编写如下代码： Option Base l Private Sub Command1_Click( ) Dim a s=0 a=Array(1，2，2，4) j=1 For i=4 To 1 Step-1 s=s+a(i
32、)*j j=j*10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是（分数：2.00）A.4321B.1234 C.34D.12解析：解析 本题首先用 Array 给数组 a 赋值，a 有四个元素，分别被赋值 1、2、3、 4。For 循环执行4 次，每次变量 s 加 a(i)的 j 倍。j 每执行一次乘 10。故最终输出的结果为：4*1+3*10+2*100+1*1000=1234。9.在窗体上画四个文本框(如图所示)，并用这四个文本框建立一个控件数组，名称为 Text1(下标从 0 开始，自左至右顺序增大)，然后编写如下事件过程： Private
33、Sub Command1_Click( ) For Each Text Box ln Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为 （分数：2.00）A.01 2 3 B.1 2 3 4C.01 3 2D.出错信息解析：解析 For Each 可以对数组元素进行处理，包括查询、显示或读取。它所重复执行的次数由数组中元素的个数确定。本题把 Text(i)的下标 Index 值赋给 Text(i)的 Text 属性。10.一个工程中含有窗体 Form1、Form2 和标准模块 Model1，
34、如果在 Fomil 中有语句 Public X As Integer，在 Model1 中有语句 Public Y As Integer则以下叙述中正确的是（分数：2.00）A.变量 X、Y 的作用域相同B.Y 的作用域是 Model1C.在 Form1 中可以直接使用 X D.在 Fomr2 中可以直接使用 X 和 Y解析：解析 在 Model1 中用 Public 定义 Y，故 Y 为全局变量，选项 B 错误。山于 X 在 Form1 中用Public 定义，故 X 为本窗体内的通用变量，但它不能在 Form2 中直接调用。11.在数据库管理系统提供的数据语言中，负责数据的完整性、安全性的
35、定义与检查以及并发控制、故障恢复等功能的是（分数：2.00）A.数据定义语言B.数据转换语言C.数据操纵语言D.数据控制语言 解析：解析 在数据库管理系统提供的数据语言中，数据控制语言负责数据的完整性、安全性的定义与检查以及并发控制、故障恢复等功能。12.以下关系表达式中，其值为 False 的是（分数：2.00）A.“ABC“AbC“ B.“the“they“C.“VISUAl，“=UCase(“Visual“)D.“Integer“Int“解析：解析 字符串数据是按照其 ASCII 码的值进行比较的。如果两个字符串的第一个字符一样大，则比较第二个字符的 ASCII 码的大小。大写字母 B
36、的 ASCII 码值小于小写字母 b 的 ASCII 码值。13.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click( ) a=12345 Print Format $(a，“000.00“) End Sub 程序运行后，单击命令按钮，窗体上显示的是（分数：2.00）A.123.45B.12345.00 C.12345D.00123.45解析：解析 解题的关键是掌握对格式说明字符的理解。0 表示一个数字位，0 的个数决定了显示区段的长度，多余的位以 0 补齐；小数点与 O 结合使用，可以放在显示区段的任何位置，根据格
37、式字符串的位置，小数部分多余的数字按四舍五入处理。由于本题中变量 a 为 12345，并没有涉及小数，故可以直接在其后补两个 0。14.以下关于图片框控件的说法中，错误的是（分数：2.00）A.可以通过 Print 方法在图片框中输出文本B.清空图片框控件中图形的方法之一是加载一个空图形C.图片框控件可以作为容器使用D.用 Stretch 属性可以自动凋整图片框中的图形的大小 解析：解析 图片框中可以输出文本，与窗体类似，故答案 A 是正确的。通过加载一个空图形(Prcture1.Picture=LoadPicture(“)可以清空图片框，所以答案 B 的表述正确。图片框可以作为容器使用，即可
38、以作为父控件，这也是图片框与图像框的主要区别之一。答案 C 也是正确的。D 选项理解有误，Stretch 属性可以自动调整图形以适合图片框，而不是调整图形的大小。关于 Stretch 属性，在 2002 年9 月的试题中也出现过，它是图像框比较特殊的一个属性，图片框无此属性。15.在窗体上画个文本框、一个标签和一个命令按钮，其名称分别为 Text1、Label1 和 Command1，然后编写 如下两个事件过程： Private sub Command1_Click( ) strText=lnputBox(“请输入”) Text1.Text=strText EndSub Private Sub
39、 Text1_Change( ) Label1.Caption=Right(Trim(Text1.Text)，3) End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入 abcdef，则在标签中显示的内容是（分数：2.00）A.空B.abcdefC.abeD.def 解析：解析 Trim 表示去掉字符串两边的空白字符。Risht 函数返回字符串最后面的 n 个字符。本题首先通过 lnputBox 函数输入一个字符串并赋绐 strText，然后把 strText 赋给，Text1.Text。再经过 Trim函数和 Right 函数的计算，得出的结果应该是 abcdef 的最后三个字符
40、 def。16.假字在窗体(名称为 Forml)的代码窗口中定义如下记录类型: Private Type animal Anima1Name As String * 20 aColor As String * 10 End Type 在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim rec As animal Open“c: /vbTest.dat“For Random As#1 Len = Len(rec) rec.animalName = “Cat“ rec.aColor = “White“ Pa
41、t#1 , rec Close#1 End Sub 则以下叙述中正确的是（分数：2.00）A.记录类型 animal 不能在 Form1 中定义,必须在标准模块中定义B.如果文件 c：/vbTesdat 不存在，则 Open 命令执行失败C.由于 Put 命令中没有指明记录号，因此每次都把记录写到文件的末尾D.语句“Put#1，rec“将 animal 类型的两个数据元素写到文件中 解析：解析 Type 语句通常在标准模块中使用，如果放在窗体模块中，则应加上关键字 Private。如果文件 vbText.dat 不存在，则 Open 语句可以自行生成一个文件。对于用 Random 方式打开的文
42、件，“记录号”是需要写入的编号。如果省略，则写到下一个记录位置，即最近执行 Get 或 Put 语句后或由最近的Seek 语句所指定的位置。注意，省略记录号，逗号不可以省略。17.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod2=0 Then f=m Else f=l End lf End Function Private Sub Command1_Click( ) Dim i As Integer s=0 For i=1 To 5 s=s+f(i) Next P
43、rint 8 End Sub 程序运行后，单击命令按钮，在窗体上显示的是 A11 B。10 C9 D8（分数：2.00）A.B.C. D.解析：解析 f 函数过程令参数 m 在是 2 的倍数的情况下返回 m 值，在 m 不是 2 的倍数的情况下，返回1。在 For 循环中调用此过程，执行五次循环，i 值分别为 1、2、3、4、 5。当 i 为 2、4 的时候，f(i)值为 2、4，其他情况下为 1，故 s 值为 1+1+1+2+4=9，正确答案为 C。18.检查软件产品是否符合需求定义的过程称为（分数：2.00）A.确认测试 B.集成测试C.验证测试D.验收测试解析：解析 确认测试是要检查已实
44、现的软件是否满足了需求规格说明书中确定了的各种需求，以及软件配置是否完全、正确。软件需求规格说明书是软件确认测试的基础。19.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) c=1234 c1=Trim(Str(c) For i=1 T0 4 Print_ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： 1 12 123 1234 则在下划线处应填入的内容为（分数：2.00）A.Right(c1，B.Left(c1， C.Mid(c1，i，1)D.Mid(c1，i，解析：解析
45、 根据题意，Str 函数将 1234 转换成字符串数据。在执行 For 循环时，第一次输出 1，第二次输出 12，第三次输出 123，第 4 次输出 1234。观察所有选项，只有 B 项符合题意，表示每次从字符串c1 的左起取 i 个字符。选项 A 表示从 c1 的右起取 i 个字符，C 项表示从字符串 c1 的第 i 个字符开始取一个字符，D 项表示从字符串 c1 的第 i 个字符开始取 i 个字符。这三个选项都不符合题意。20.在窗体上画一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框，然后编写如下事件过程： Private Sub Command1_Click(
46、 ) n=Val(Text1.Text) For i=2 To n Forj =2 To Sqr(i) If i Mod j=0 Then Exit For Next j lf jSqr(i) Then Print i Next i End Sub 该事件过程的功能是（分数：2.00）A.输出 n 以内的奇数B.输出 n 以内的偶数C.输出 n 以内的素数 D.输出 n 以内能被 j 整除的数解析：解析 为了判断一个数 n 是不是素数，可以将 n 被 2 到根号 2 之间的所有整数除，如果都除不尽，则 n 就是素数，否则不是素数。本题是典型的判断素数的程序语句。21.以下数据结构中，属于线性数
47、据结构的是（分数：2.00）A.集合B.线性表 C.二叉树D.图解析：解析 所谓的线性结构：如果一个非空的数据结构满足下列两个条件，即 1) 有且只有一个根结点； 2) 每一个结点最多有一个前件，也最多有一个后件。同时满足两个条件的只有线性表，而其他三种数据结构的结点可能存在多个前件或后件，所以不是线性结构。22.执行语句 s=Len(Mid(“VisualBasic”，1，6)后，s 的值是，（分数：2.00）A.VisualB.BasicC.6 D.11解析：解析 Mid(s，i，n)表示从字符串 sS 的第 i 个字符开始向后截取 n 个字符，Len(s)返回字符串 s的长度。本题通过
48、Mid 函数返回字符串 Visual，再通过 Len 函数返回字符串的个数：6。23.以下叙述中错误的是（分数：2.00）A.一个工程可以包括多种类型的文件B.Visual Basic 应用程序既能以编译方式执行，也能以解释方式执行C.程序运行后，在内存中只能驻留一个窗体 D.对于事件驱动型应用程序，每次运行时的执行顺序可以不一样解析：解析 Visual Basic 中一个工程可以含有多重窗体以及多种类型的文件。 Visual Basic 应用程序的执行方式有两种：编译方式与解释方式。程序运行后，在内存中可以驻留多个窗体，只要没有被关闭，窗体就保留在内存中。24.在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Text1.Text=“Visual“ Me.Text1=“Basie“ Text1=“Program“ End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是（分数：2.00）A.VisualB.Bas
