1、二级 VISUAL+BASIC 笔试 68 及答案解析(总分：90.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.在事件过程中，Private 表示_ 。（分数：2.00）A.此过程可以被任何其它过程调用B.此过程只可以被本窗体模块中的其它过程调用C.此过程不可以被任何其它过程调用D.此过程只可以被本工程中的其它过程调用 Private Sub 1blAbc_ Change() End Sub2.在 Visual Basic 中，下列哪种控件可以包含其他控件：_。（分数：2.00）A.PictureboxB.CommandbuttonC.ImageListD
2、.Cheekbox3.一个可执行的应用程序至少要包括一个_。（分数：2.00）A.标准模块B.窗体模块C.类模块D.资源文件模块4.结构化分析方法 SA、结构化设计方法 SD，和 JACKSON 方法，是在软件开发过程中常用的方法，人们使用 SA 方法时可以得到_。（分数：2.00）A.程序流程图B.具体的语言程序C.模块结构图及模块的功能说明书D.分层数据流图5.单击命令按钮之后，下列程序代码的执行结果为_。 Private Function P(N As Integer) Static sum For I=I To N Sum = sum +1 Next I P =sum End Func
3、tion Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S： End Sub（分数：2.00）A.20B.30C.115D.1356.要显示如下图所示的对话框，则下列语句正确的是 （分数：2.00）A.MsgBox“春花秋月何时了”+Chr (13)+“往事知多少”+Chr(10)B.MsgBox“春花秋月何时了”+Chr (13)+Chr (10)+“往事知多少”C.InputBox“春花秋月何时了”+Chr (13)+“往事知多少”+Chr(10)D.InputBox“春花秋月何时了”+Chr (13)+Chr(10)+“
4、往事知多少”7.下列程序段的执行结果为_。 K=0 For J = 1 To 2 For I = 1 To 3 K=I+1 Next I For I = 1 To 7 K=K+1 Next I Next J Print K（分数：2.00）A.10B.6C.11D.168.关系 R 和 S 进行自然连接时，要求 R 和 S 含有一个或多个公共_。（分数：2.00）A.元组B.行C.记录D.属性9.线性表采用链式存储方式时，结点的存储地址_。（分数：2.00）A.必须是不连续的B.连续与否均可以C.必须是连续的D.和头结点的存储地址相连续10.下面的程序段执行后，X 的结果为_。 X=0 For
5、 I=1 to 5 For j=I to 5 X=X+1 Next j Next I Print x（分数：2.00）A.5B.10C.15D.2011.在 n(n0)个元素的顺序栈中删除，1 个元素的时间复杂度为_。 （分数：2.00）A.B.C.D.12.假定有如下的 Sub 过程： Sub S(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 S a
6、，b Print a，b End Sub 程序运行后，单击命令按钮，输出结果为_ 。（分数：2.00）A.5 4B.1 1C.1.25 4D.1.25 113.为了在运行时能显示宙体左上角的控制框(系统菜单)，必须_ 。（分数：2.00）A.把窗体的 ControlBox 属性设置为 False，其他属性任意B.把窗体的 ControlBox 属性设置为 True，并且把 BoderStyle 属性设置为 1-5C.把窗体的 ControlBox 属性设置为 False，同时把 BoderStyle 属性调协为非 0 值D.把窗体的 ControlBox 属性设置为 True，同时把 Bode
7、rStyle 属性设置为 0 值14.以下关于选项按钮的说法，正确的是_。（分数：2.00）A.选项按钮的 Enabled 属性用于决定该按钮是否被选中。B.选项按钮的 Value 属性用于决定该按钮是否被选中。C.选项按钮的 Checked 属性用于决定该按钮是否被选中。D.选项按钮的 Text 属性用于决定该按钮是否被选中。15.下列程序段的执行结果为_。 I= 4 a= 5 Do I=I+1 a=a+2 Loop Until I=7 Print“I=”；I Print“A=”；a（分数：2.00）A.I=4 A=5B.I=7 A=13C.I=8 A=7D.I=7 A=1116.用于获得字
8、符串 S 从第 4 个字符开始的 4 个字符的函数是_。（分数：2.00）A.Mid(S，4，4)B.Middle(S，4，4)C.Midstr(S，4，4)D.MiddleStr(S，4，4)17.下列程序的执行结果是_。 k =0 For i=1 To 3 a = i i k Print a； Next I（分数：2.00）A.1 1 1B.1 2 3C.0 0 0D.1 4 918.能对顺序文件进行输出的语句是_。（分数：2.00）A.PutB.GetC.WriteD.Read19.阅读程序： Function F(a As Integer) b=0 Static c b=b+1 c=c
9、+1 f=a+ b+ c End Function Private Sub Command1_Click() Dim S As Integer a=2 For i=1 To 3 Print P(A) Next i End Sub 运行上面的程序，单击命令拄钮，输出结果为_ 。（分数：2.00）A.4 4 4B.4 5 6C.4 6 8D.4 7 920.数据库的概念模型_。（分数：2.00）A.依赖于计算机硬件和 DBMSB.独立于计算机硬件，依鞍子 DBMSC.依赖于计算机硬件，独立于 DBMSD.独立于计算机硬件和 DBMS21.组合框中的 Style 属性值确定了组合框的类型和显示方式；
10、以下选项中不属 Style 属性值的是_。（分数：2.00）A.下拉式组合框B.弹出式组合框C.简单式组合框D.下拉式列表框22.数据的四种基本逻辑结构是指_。（分数：2.00）A.组、链表、树、图形结构B.线性表、链表，栈队列、数组广义表C.线性结构、链表，树，图形结构D.集合，线性结构、树、图形结构23.下列关于事件的叙述中不正确的是_。（分数：2.00）A.事件是系统预先为对象定义的能被对象认别的动作。B.事件可分为用户事件与系统事件两类。C.VB 为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写。D.VB 中所有对象的默认事件都是 Click。24.使用
11、白盒测试方法时，确定测试数据应根据_和指定的覆盖标准。（分数：2.00）A.程序的内部逻辑B.程序的复杂结构C.使用说明书D.程序的功能25.命令 Picture1Circle(500，800)，800 能够在图片框 Picture 中画出的图形是_。（分数：2.00）A.半径为 sin 的圆B.细而高的椭圆C.扁而平的椭圆D.圆心在(500，800)的一个圆弧26.下列控件中可自动设置滚动条是_。（分数：2.00）A.复选框B.框架C.文本框D.标签框27.对窗体编写如下代码： Option Base 1 Private Sub Form_ KeyPress (KeyAscii As Int
12、eger) a=Array(237，126，87，48，498) m1=a(1) m2=1 If KeyAscii=13 Then For i=2 To 5 If a(i)m1 Then m1=a(I) m2=i End If Next i End If Print m1 Print m2 End Sub 程序运行后，按回车键，输出结果为_ 。（分数：2.00）A.48 4B.237 1C.498 5D.498 428.若关系 R 所有的属性都是不可再分的数据项，则称 R 属于_。（分数：2.00）A.第一范式B.第二范式C.第三范式D.第四范式29.在设计菜单时，如果要在菜单中加入一个菜单分
13、隔项，则菜单分隔项的标题必须设置为_。（分数：2.00）A.加号(+)B.减号(-)C.星号(*)D.感叹号(!)30.下列程序段的执行结果为_。 x=5 y = -20 If Net x0 Then x=y -3 Else y=x+3 Print x-y；y-x End If（分数：2.00）A.-3 3B.5 -8C.3 -3D.25 -2531.阅读程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a (
14、1)=5 a (2)=6 a (3)=7 a (4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub 运行以上程序，单击命令按钮，输出结果为_ 。（分数：2.00）A.2 4 6 8B.5 6 7 8C.10 12 14 16D.出错32.对象实现了数据和操作的结合，使数据和操作_于对象的统一体中。（分数：2.00）A.结合B.隐藏C.封装D.抽象33.有如下程序，该程序的执行结果为_。 Dim k As Integer n=5 m=1 k=1 Do While k = n m=m*2 k=k+1 Loop Print m（分数：2.00）A
15、.1B.5C.32D.4034.以下说法错误的是_。（分数：2.00）A.采用面向对象方法开发软件的基本目的和主要优点是通过重用提高软件的生成率B.在面向对象的程序中，对象是属性(状态)和方法(操作)的封装体C.在面向对象的程序中，对象彼此间通过继承和多态性启动响应的操作D.继承和多态机制是面向对象程序中实现的主要手段35.在窗体上建立三个文本框，名称分别为 Text1、Text2 和 Text3，一个命令按纽，名称为 command1，如果在 TEXT1 中输入数 200，在 TEXT2 中输入数 150，则执行下列程序后，TEXT3 的值为_。 Private Sub Command1_C
16、lick() Dim m, n As Integer m = Val (Text1. Text) n = Val (Text2. Text) If n * m = 0 Then Exit Sub End If If m n Then t =m: m= n: n = t End If Do r = m Mod n m= n n =r Loop While r 0 Text3. Text= m End Sub（分数：2.00）A.200B.50C.100D.150二、B填空题/B(总题数：10，分数：20.00)36.在面向对象的程序设计中，类描述的是具有相似性质的一组U 【1】 /U。（分数：2
17、.00）填空项 1:_37.面向对象的模型中，最基本的概念是对象和U 【2】 /U。（分数：2.00）填空项 1:_38.冒泡排序在最好情况下时间复杂度为U 【3】 /U。（分数：2.00）填空项 1:_39.软件工程是计算机科学中的一个分支，其主要思想是在软件生产中用U 【4】 /U的方法替代传统手工方法。（分数：2.00）填空项 1:_40.在关系代数中专门的关系运算包括选择，投影、U 【5】 /U、除等运算。（分数：2.00）填空项 1:_41.有如下程序，该程序的执行结果是U 【6】 /U。 Private Sub Command1_lick() For i= 1 To 4 x= 4
18、For j =1 To 3 x =3 For k=1 To 2 X= K+5 Next k Next j Next i Print x End Sub（分数：2.00）填空项 1:_42.以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 （分数：2.00）填空项 1:_43.以下程序段中 Do.Loop 循环执行的次数为U 【9】 /U。程序执行完毕后，n 的值为U 【10】 /U。 Private Sub Command1_Click() n =5 Do If n Mod 2= 0 Then n =n /2 Else n =n* 3 + 1 End If Loop Unt
19、il n=1 End Sub（分数：2.00）填空项 1:_44.一下程序的作用是生成一个 1010 的矩阵该矩阵主对角线上的数据为 1，其余数据为 0(程序运行结果如下图所示)。该程序不完整，请补充完改程序。 Private Sub Command1_Click() Dim a(10，10)As Integer For i=1 To U【11】 /U For j=1 To 10 IfU 【12】 /UThen U 【13】 /U=1 Else a(i，j)=0 End If Next j Next i For i =1 To 10 For j=1 To 10 Print a(i，j)； Ne
20、xt j Print Next i End Sub （分数：2.00）填空项 1:_45.在 Visual Basic 中，要将一个窗体装载到内存进行预处理，但不显示，应该使用U 【14】 /U语句，要将一个窗体从内存中释放，应使用U 【15】 /U语句。（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试 68 答案解析(总分：90.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.在事件过程中，Private 表示_ 。（分数：2.00）A.此过程可以被任何其它过程调用B.此过程只可以被本窗体模块中的其它过程调用 C.此过程不可以被任何其它过
21、程调用D.此过程只可以被本工程中的其它过程调用 Private Sub 1blAbc_ Change() End Sub解析：2.在 Visual Basic 中，下列哪种控件可以包含其他控件：_。（分数：2.00）A.Picturebox B.CommandbuttonC.ImageListD.Cheekbox解析：3.一个可执行的应用程序至少要包括一个_。（分数：2.00）A.标准模块B.窗体模块 C.类模块D.资源文件模块解析：4.结构化分析方法 SA、结构化设计方法 SD，和 JACKSON 方法，是在软件开发过程中常用的方法，人们使用 SA 方法时可以得到_。（分数：2.00）A.程
22、序流程图B.具体的语言程序C.模块结构图及模块的功能说明书D.分层数据流图 解析：5.单击命令按钮之后，下列程序代码的执行结果为_。 Private Function P(N As Integer) Static sum For I=I To N Sum = sum +1 Next I P =sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S： End Sub（分数：2.00）A.20B.30 C.115D.135解析：6.要显示如下图所示的对话框，则下列语句正确的是 （分数：2.00）A.Ms
23、gBox“春花秋月何时了”+Chr (13)+“往事知多少”+Chr(10)B.MsgBox“春花秋月何时了”+Chr (13)+Chr (10)+“往事知多少”C.InputBox“春花秋月何时了”+Chr (13)+“往事知多少”+Chr(10)D.InputBox“春花秋月何时了”+Chr (13)+Chr(10)+“往事知多少” 解析：7.下列程序段的执行结果为_。 K=0 For J = 1 To 2 For I = 1 To 3 K=I+1 Next I For I = 1 To 7 K=K+1 Next I Next J Print K（分数：2.00）A.10B.6C.11 D
24、.16解析：8.关系 R 和 S 进行自然连接时，要求 R 和 S 含有一个或多个公共_。（分数：2.00）A.元组B.行C.记录D.属性 解析：9.线性表采用链式存储方式时，结点的存储地址_。（分数：2.00）A.必须是不连续的B.连续与否均可以 C.必须是连续的D.和头结点的存储地址相连续解析：10.下面的程序段执行后，X 的结果为_。 X=0 For I=1 to 5 For j=I to 5 X=X+1 Next j Next I Print x（分数：2.00）A.5B.10C.15 D.20解析：11.在 n(n0)个元素的顺序栈中删除，1 个元素的时间复杂度为_。 （分数：2.0
25、0）A.B.C.D. 解析：12.假定有如下的 Sub 过程： Sub S(x As Single，y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 S a，b Print a，b End Sub 程序运行后，单击命令按钮，输出结果为_ 。（分数：2.00）A.5 4B.1 1C.1.25 4D.1.25 1 解析：13.为了在运行时能显示宙体左上角的控制框(系统菜单)，必须_
26、。（分数：2.00）A.把窗体的 ControlBox 属性设置为 False，其他属性任意B.把窗体的 ControlBox 属性设置为 True，并且把 BoderStyle 属性设置为 1-5 C.把窗体的 ControlBox 属性设置为 False，同时把 BoderStyle 属性调协为非 0 值D.把窗体的 ControlBox 属性设置为 True，同时把 BoderStyle 属性设置为 0 值解析：14.以下关于选项按钮的说法，正确的是_。（分数：2.00）A.选项按钮的 Enabled 属性用于决定该按钮是否被选中。B.选项按钮的 Value 属性用于决定该按钮是否被选中
27、。 C.选项按钮的 Checked 属性用于决定该按钮是否被选中。D.选项按钮的 Text 属性用于决定该按钮是否被选中。解析：15.下列程序段的执行结果为_。 I= 4 a= 5 Do I=I+1 a=a+2 Loop Until I=7 Print“I=”；I Print“A=”；a（分数：2.00）A.I=4 A=5B.I=7 A=13C.I=8 A=7D.I=7 A=11 解析：16.用于获得字符串 S 从第 4 个字符开始的 4 个字符的函数是_。（分数：2.00）A.Mid(S，4，4) B.Middle(S，4，4)C.Midstr(S，4，4)D.MiddleStr(S，4，4
28、)解析：17.下列程序的执行结果是_。 k =0 For i=1 To 3 a = i i k Print a； Next I（分数：2.00）A.1 1 1 B.1 2 3C.0 0 0D.1 4 9解析：18.能对顺序文件进行输出的语句是_。（分数：2.00）A.PutB.GetC.Write D.Read解析：19.阅读程序： Function F(a As Integer) b=0 Static c b=b+1 c=c+1 f=a+ b+ c End Function Private Sub Command1_Click() Dim S As Integer a=2 For i=1 T
29、o 3 Print P(A) Next i End Sub 运行上面的程序，单击命令拄钮，输出结果为_ 。（分数：2.00）A.4 4 4B.4 5 6 C.4 6 8D.4 7 9解析：20.数据库的概念模型_。（分数：2.00）A.依赖于计算机硬件和 DBMSB.独立于计算机硬件，依鞍子 DBMSC.依赖于计算机硬件，独立于 DBMSD.独立于计算机硬件和 DBMS 解析：21.组合框中的 Style 属性值确定了组合框的类型和显示方式；以下选项中不属 Style 属性值的是_。（分数：2.00）A.下拉式组合框B.弹出式组合框 C.简单式组合框D.下拉式列表框解析：22.数据的四种基本逻
30、辑结构是指_。（分数：2.00）A.组、链表、树、图形结构B.线性表、链表，栈队列、数组广义表C.线性结构、链表，树，图形结构D.集合，线性结构、树、图形结构 解析：23.下列关于事件的叙述中不正确的是_。（分数：2.00）A.事件是系统预先为对象定义的能被对象认别的动作。B.事件可分为用户事件与系统事件两类。C.VB 为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写。D.VB 中所有对象的默认事件都是 Click。 解析：24.使用白盒测试方法时，确定测试数据应根据_和指定的覆盖标准。（分数：2.00）A.程序的内部逻辑 B.程序的复杂结构C.使用说明书D.程
31、序的功能解析：25.命令 Picture1Circle(500，800)，800 能够在图片框 Picture 中画出的图形是_。（分数：2.00）A.半径为 sin 的圆B.细而高的椭圆C.扁而平的椭圆D.圆心在(500，800)的一个圆弧 解析：26.下列控件中可自动设置滚动条是_。（分数：2.00）A.复选框B.框架C.文本框 D.标签框解析：27.对窗体编写如下代码： Option Base 1 Private Sub Form_ KeyPress (KeyAscii As Integer) a=Array(237，126，87，48，498) m1=a(1) m2=1 If KeyA
32、scii=13 Then For i=2 To 5 If a(i)m1 Then m1=a(I) m2=i End If Next i End If Print m1 Print m2 End Sub 程序运行后，按回车键，输出结果为_ 。（分数：2.00）A.48 4B.237 1C.498 5 D.498 4解析：28.若关系 R 所有的属性都是不可再分的数据项，则称 R 属于_。（分数：2.00）A.第一范式 B.第二范式C.第三范式D.第四范式解析：29.在设计菜单时，如果要在菜单中加入一个菜单分隔项，则菜单分隔项的标题必须设置为_。（分数：2.00）A.加号(+)B.减号(-) C.
33、星号(*)D.感叹号(!)解析：30.下列程序段的执行结果为_。 x=5 y = -20 If Net x0 Then x=y -3 Else y=x+3 Print x-y；y-x End If（分数：2.00）A.-3 3 B.5 -8C.3 -3D.25 -25解析：31.阅读程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4)As Integer a (1)=5 a (2)=6 a (3)=7 a (4)=8 subP a()
34、 For i=1 To 4 Print a(i) Next i End Sub 运行以上程序，单击命令按钮，输出结果为_ 。（分数：2.00）A.2 4 6 8 B.5 6 7 8C.10 12 14 16D.出错解析：32.对象实现了数据和操作的结合，使数据和操作_于对象的统一体中。（分数：2.00）A.结合B.隐藏C.封装 D.抽象解析：33.有如下程序，该程序的执行结果为_。 Dim k As Integer n=5 m=1 k=1 Do While k = n m=m*2 k=k+1 Loop Print m（分数：2.00）A.1B.5C.32 D.40解析：34.以下说法错误的是_
35、。（分数：2.00）A.采用面向对象方法开发软件的基本目的和主要优点是通过重用提高软件的生成率B.在面向对象的程序中，对象是属性(状态)和方法(操作)的封装体C.在面向对象的程序中，对象彼此间通过继承和多态性启动响应的操作 D.继承和多态机制是面向对象程序中实现的主要手段解析：35.在窗体上建立三个文本框，名称分别为 Text1、Text2 和 Text3，一个命令按纽，名称为 command1，如果在 TEXT1 中输入数 200，在 TEXT2 中输入数 150，则执行下列程序后，TEXT3 的值为_。 Private Sub Command1_Click() Dim m, n As In
36、teger m = Val (Text1. Text) n = Val (Text2. Text) If n * m = 0 Then Exit Sub End If If m n Then t =m: m= n: n = t End If Do r = m Mod n m= n n =r Loop While r 0 Text3. Text= m End Sub（分数：2.00）A.200B.50 C.100D.150解析：二、B填空题/B(总题数：10，分数：20.00)36.在面向对象的程序设计中，类描述的是具有相似性质的一组U 【1】 /U。（分数：2.00）填空项 1:_ （正确答案
37、：对象）解析：37.面向对象的模型中，最基本的概念是对象和U 【2】 /U。（分数：2.00）填空项 1:_ （正确答案：类）解析：38.冒泡排序在最好情况下时间复杂度为U 【3】 /U。（分数：2.00）填空项 1:_ （正确答案：0(n)）解析：39.软件工程是计算机科学中的一个分支，其主要思想是在软件生产中用U 【4】 /U的方法替代传统手工方法。（分数：2.00）填空项 1:_ （正确答案：工程化）解析：40.在关系代数中专门的关系运算包括选择，投影、U 【5】 /U、除等运算。（分数：2.00）填空项 1:_ （正确答案：连接）解析：41.有如下程序，该程序的执行结果是U 【6】 /
38、U。 Private Sub Command1_lick() For i= 1 To 4 x= 4 For j =1 To 3 x =3 For k=1 To 2 X= K+5 Next k Next j Next i Print x End Sub（分数：2.00）填空项 1:_ （正确答案：16）解析：42.以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 （分数：2.00）填空项 1:_ （正确答案：7N=3-M+1 8 A(M，N)）解析：43.以下程序段中 Do.Loop 循环执行的次数为U 【9】 /U。程序执行完毕后，n 的值为U 【10】 /U。 Priva
39、te Sub Command1_Click() n =5 Do If n Mod 2= 0 Then n =n /2 Else n =n* 3 + 1 End If Loop Until n=1 End Sub（分数：2.00）填空项 1:_ （正确答案：9 5 10 1）解析：44.一下程序的作用是生成一个 1010 的矩阵该矩阵主对角线上的数据为 1，其余数据为 0(程序运行结果如下图所示)。该程序不完整，请补充完改程序。 Private Sub Command1_Click() Dim a(10，10)As Integer For i=1 To U【11】 /U For j=1 To 1
40、0 IfU 【12】 /UThen U 【13】 /U=1 Else a(i，j)=0 End If Next j Next i For i =1 To 10 For j=1 To 10 Print a(i，j)； Next j Print Next i End Sub （分数：2.00）填空项 1:_ （正确答案：1110 12 i=j 13 a(i，j)）解析：45.在 Visual Basic 中，要将一个窗体装载到内存进行预处理，但不显示，应该使用U 【14】 /U语句，要将一个窗体从内存中释放，应使用U 【15】 /U语句。（分数：2.00）填空项 1:_ （正确答案：14 load 15 unload）解析：
