1、二级 VISUAL+BASIC 笔试-197 及答案解析(总分：90.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.假定有如下的 Sub 过程：Sub S(x As Single，y As Single)t=xx=t/yy=t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a As SingleDim b As Singlea=5b=4S a，bPrint a，bEnd Sub程序运行后，单击命令按钮，输出结果为_ 。（分数：2.00）A.5 4B.1 1C.1.25 4D.1
2、.25 12.一个可执行的应用程序至少要包括一个_。（分数：2.00）A.标准模块B.窗体模块C.类模块D.资源文件模块3.用于获得字符串 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)4.在设计菜单时，如果要在菜单中加入一个菜单分隔项，则菜单分隔项的标题必须设置为_。（分数：2.00）A.加号(+)B.减号(-)C.星号(*)D.感叹号(!)5.要显示如下图所示的对话框，则下列语句正确的是（分数：2.00）A.B.C.D.6.对窗体编写如下代码：Opt
3、ion Base 1Private Sub Form_ KeyPress (KeyAscii As Integer)a=Array(237，126，87，48，498)m1=a(1)m2=1If KeyAscii=13 ThenFor i=2 To 5If a(i)m1 Thenm1=a(I)m2=iEnd IfNext iEnd IfPrint m1Print m2End Sub程序运行后，按回车键，输出结果为_ 。（分数：2.00）A.48 4B.237 1C.498 5D.49847.线性表采用链式存储方式时，结点的存储地址_。（分数：2.00）A.必须是不连续的B.连续与否均可以C.必
4、须是连续的D.和头结点的存储地址相连续8.数据库的概念模型_。（分数：2.00）A.依赖于计算机硬件和 DBMSB.独立于计算机硬件，依鞍子 DBMSC.依赖于计算机硬件，独立于 DBMSD.独立于计算机硬件和 DBMS9.下列程序的执行结果是_。k =0For i=1 To 3a = i i kPrint a；Next I（分数：2.00）A.1 1 1B.1 2 3C.0 0 0D.1 4 910.以下关于选项按钮的说法，正确的是_。（分数：2.00）A.选项按钮的 Enabled 属性用于决定该按钮是否被选中。B.选项按钮的 Value 属性用于决定该按钮是否被选中。C.选项按钮的 Ch
5、ecked 属性用于决定该按钮是否被选中。D.选项按钮的 Text 属性用于决定该按钮是否被选中。11.在 Visual Basic 中，下列哪种控件可以包含其他控件：_。（分数：2.00）A.PictureboxB.CommandbuttonC.ImageListD.Cheekbox12.能对顺序文件进行输出的语句是_。（分数：2.00）A.PutB.GetC.WriteD.Read13.单击命令按钮之后，下列程序代码的执行结果为_。Private Function P(N As Integer)Static sumFor I=I To NSum = sum +1Next IP =sumEn
6、d FunctionPrivate Sub Command1_Click()S=P(1)+P(2)+P(3)+P(4)Print S：End Sub（分数：2.00）A.20B.30C.115D.13514.若关系 R 所有的属性都是不可再分的数据项，则称 R 属于_。（分数：2.00）A.第一范式B.第二范式C.第三范式D.第四范式15.下列程序段的执行结果为_。K=0For J = 1 To 2For I = 1 To 3K=I+1Next IFor I = 1 To 7K=K+1Next INext JPrint K（分数：2.00）A.10B.6C.11D.1616.阅读程序：Func
7、tion F(a As Integer)b=0Static cb=b+1c=c+1f=a+ b+ cEnd FunctionPrivate Sub Command1_Click()Dim S As Integera=2For i=1 To 3Print P(（分数：2.00）A.Next iEnd Sub运行上面的程序，单击命令拄钮，输出结果为_ 。A) 444B.456C.4 68D.47917.为了在运行时能显示宙体左上角的控制框(系统菜单)，必须_ 。（分数：2.00）A.把窗体的 ControlBox 属性设置为 False，其他属性任意B.把窗体的 ControlBox 属性设置为
8、True，并且把 BoderStyle 属性设置为 1-5C.把窗体的 ControlBox 属性设置为 False，同时把 BoderStyle 属性调协为非 0 值D.把窗体的 ControlBox 属性设置为 True，同时把 BoderStyle 属性设置为 0 值18.下列控件中可自动设置滚动条是_。（分数：2.00）A.复选框B.框架C.文本框D.标签框19.在事件过程中，Private 表示_ 。（分数：2.00）A.此过程可以被任何其它过程调用B.此过程只可以被本窗体模块中的其它过程调用C.此过程不可以被任何其它过程调用D.此过程只可以被本工程中的其它过程调用Private S
9、ub 1blAbc_ Change()End Sub20.下列程序段的执行结果为_。I= 4a= 5DoI=I+1a=a+2Loop Until I=7Print“I=”；IPrint“A=”；a（分数：2.00）A.I=4 A=5B.I=7A=13C.I=8A=7D.I=7A=1121.数据的四种基本逻辑结构是指_。（分数：2.00）A.组、链表、树、图形结构B.线性表、链表，栈队列、数组广义表C.线性结构、链表，树，图形结构D.集合，线性结构、树、图形结构22.对象实现了数据和操作的结合，使数据和操作_于对象的统一体中。（分数：2.00）A.结合B.隐藏C.封装D.抽象23.组合框中的 S
10、tyle 属性值确定了组合框的类型和显示方式；以下选项中不属 Style 属性值的是_。（分数：2.00）A.下拉式组合框B.弹出式组合框C.简单式组合框D.下拉式列表框24.结构化分析方法 SA、结构化设计方法 SD，和 JACKSON 方法，是在软件开发过程中常用的方法，人们使用 SA 方法时可以得到_。（分数：2.00）A.程序流程图B.具体的语言程序C.模块结构图及模块的功能说明书D.分层数据流图25.在 n(n0)个元素的顺序栈中删除，1 个元素的时间复杂度为_。（分数：2.00）A.B.C.D.26.命令 Picture1Circle(500，800)，800 能够在图片框 Pic
11、ture 中画出的图形是_。（分数：2.00）A.半径为 sin 的圆B.细而高的椭圆C.扁而平的椭圆D.圆心在(500，800)的一个圆弧27.阅读程序：Sub subP(b()As Integer)For i=1 To 4b(i)=2*iNext iEnd SubPrivate Sub Command1_Click()Dim a(1 To 4)As Integera (1)=5a (2)=6a (3)=7a (4)=8subP a()For i=1 To 4Print a(i)Next iEnd Sub运行以上程序，单击命令按钮，输出结果为_ 。（分数：2.00）A.2 468B.5678
12、C.10121416 D.出错28.以下说法错误的是_。（分数：2.00）A.采用面向对象方法开发软件的基本目的和主要优点是通过重用提高软件的生成率B.在面向对象的程序中，对象是属性(状态)和方法(操作)的封装体C.在面向对象的程序中，对象彼此间通过继承和多态性启动响应的操作D.继承和多态机制是面向对象程序中实现的主要手段29.在窗体上建立三个文本框，名称分别为 Text1、Text2 和 Text3，一个命令按纽，名称为 command1，如果在 TEXT1 中输入数 200，在 TEXT2 中输入数 150，则执行下列程序后，TEXT3 的值为_。Private Sub Command1_
13、Click()Dim m, n As Integerm = Val (Text1. Text)n = Val (Text2. Text)If n * m = 0 ThenExit SubEnd IfIf m n Thent =m: m= n: n = tEnd IfDor = m Mod nm= nn =rLoop While r 0Text3. Text= mEnd Sub（分数：2.00）A.200B.50C.100D.15030.下列关于事件的叙述中不正确的是_。（分数：2.00）A.事件是系统预先为对象定义的能被对象认别的动作。B.事件可分为用户事件与系统事件两类。C.VB 为每个对象
14、设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写。D.VB 中所有对象的默认事件都是 Click。31.使用白盒测试方法时，确定测试数据应根据_和指定的覆盖标准。（分数：2.00）A.程序的内部逻辑B.程序的复杂结构C.使用说明书D.程序的功能32.关系 R 和 S 进行自然连接时，要求 R 和 S 含有一个或多个公共_。（分数：2.00）A.元组B.行C.记录D.属性33.有如下程序，该程序的执行结果为_。Dim k As Integern=5m=1k=1Do While k = nm=m*2k=k+1LoopPrint m（分数：2.00）A.1B.5C.32D.40
15、34.下列程序段的执行结果为_。x=5y = -20If Net x0 Thenx=y -3Elsey=x+3Print x-y；y-xEnd If（分数：2.00）A.-3 3B.5 -8C.3 -3D.25 -2535.下面的程序段执行后，X 的结果为_。X=0For I=1 to 5For j=I to 5X=X+1Next jNext IPrint x（分数：2.00）A.5B.10C.15D.20二、填空题(总题数：10，分数：20.00)36.在面向对象的程序设计中，类描述的是具有相似性质的一组 【1】 。（分数：2.00）填空项 1:_37.面向对象的模型中，最基本的概念是对象和
16、 【2】 。（分数：2.00）填空项 1:_38.冒泡排序在最好情况下时间复杂度为 【3】 。（分数：2.00）填空项 1:_39.软件工程是计算机科学中的一个分支，其主要思想是在软件生产中用 【4】 的方法替代传统手工方法。（分数：2.00）填空项 1:_40.在关系代数中专门的关系运算包括选择，投影、 【5】 、除等运算。（分数：2.00）填空项 1:_41.有如下程序，该程序的执行结果是 【6】 。Private Sub Command1_lick()For i= 1 To 4x= 4For j =1 To 3x =3For k=1 To 2X= K+5Next kNext jNext
17、iPrint xEnd Sub（分数：2.00）填空项 1:_42.以下程序的作用是生成一个如下图的矩阵，该程序不完整，请补充完改程序。 （分数：2.00）填空项 1:_43.以下程序段中 Do.Loop 循环执行的次数为 【9】 。程序执行完毕后，n 的值为 【10】 。Private Sub Command1_Click()n =5DoIf n Mod 2= 0 Thenn =n /2Elsen =n* 3 + 1End IfLoop Until n=1End Sub（分数：2.00）填空项 1:_44.一下程序的作用是生成一个 1010 的矩阵该矩阵主对角线上的数据为 1，其余数据为 0
18、(程序运行结果如下图所示)。该程序不完整，请补充完改程序。Private Sub Command1_Click()Dim a(10，10)As IntegerFor i=1 To 【11】 For j=1 To 10If 【12】 Then【13】 =1Elsea(i，j)=0End IfNext jNext iFor i =1 To 10For j=1 To 10Print a(i，j)；Next jPrintNext iEnd Sub（分数：2.00）填空项 1:_45.在 Visual Basic 中，要将一个窗体装载到内存进行预处理，但不显示，应该使用 【14】 语句，要将一个窗体从内
19、存中释放，应使用 【15】 语句。（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试-197 答案解析(总分：90.00，做题时间：90 分钟)一、选择题(总题数：35，分数：70.00)1.假定有如下的 Sub 过程：Sub S(x As Single，y As Single)t=xx=t/yy=t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a As SingleDim b As Singlea=5b=4S a，bPrint a，bEnd Sub程序运行后，单击命令按钮，输出结果为_
20、 。（分数：2.00）A.5 4B.1 1C.1.25 4D.1.25 1 解析：2.一个可执行的应用程序至少要包括一个_。（分数：2.00）A.标准模块B.窗体模块 C.类模块D.资源文件模块解析：3.用于获得字符串 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)解析：4.在设计菜单时，如果要在菜单中加入一个菜单分隔项，则菜单分隔项的标题必须设置为_。（分数：2.00）A.加号(+)B.减号(-) C.星号(*)D.感叹号(!)解析：5.要显示如下图
21、所示的对话框，则下列语句正确的是（分数：2.00）A.B.C.D. 解析：6.对窗体编写如下代码：Option Base 1Private Sub Form_ KeyPress (KeyAscii As Integer)a=Array(237，126，87，48，498)m1=a(1)m2=1If KeyAscii=13 ThenFor i=2 To 5If a(i)m1 Thenm1=a(I)m2=iEnd IfNext iEnd IfPrint m1Print m2End Sub程序运行后，按回车键，输出结果为_ 。（分数：2.00）A.48 4B.237 1C.498 5 D.4984解
22、析：7.线性表采用链式存储方式时，结点的存储地址_。（分数：2.00）A.必须是不连续的B.连续与否均可以 C.必须是连续的D.和头结点的存储地址相连续解析：8.数据库的概念模型_。（分数：2.00）A.依赖于计算机硬件和 DBMSB.独立于计算机硬件，依鞍子 DBMSC.依赖于计算机硬件，独立于 DBMSD.独立于计算机硬件和 DBMS 解析：9.下列程序的执行结果是_。k =0For i=1 To 3a = i i kPrint a；Next I（分数：2.00）A.1 1 1 B.1 2 3C.0 0 0D.1 4 9解析：10.以下关于选项按钮的说法，正确的是_。（分数：2.00）A.
23、选项按钮的 Enabled 属性用于决定该按钮是否被选中。B.选项按钮的 Value 属性用于决定该按钮是否被选中。 C.选项按钮的 Checked 属性用于决定该按钮是否被选中。D.选项按钮的 Text 属性用于决定该按钮是否被选中。解析：11.在 Visual Basic 中，下列哪种控件可以包含其他控件：_。（分数：2.00）A.Picturebox B.CommandbuttonC.ImageListD.Cheekbox解析：12.能对顺序文件进行输出的语句是_。（分数：2.00）A.PutB.GetC.Write D.Read解析：13.单击命令按钮之后，下列程序代码的执行结果为_。
24、Private Function P(N As Integer)Static sumFor I=I To NSum = sum +1Next IP =sumEnd FunctionPrivate Sub Command1_Click()S=P(1)+P(2)+P(3)+P(4)Print S：End Sub（分数：2.00）A.20B.30 C.115D.135解析：14.若关系 R 所有的属性都是不可再分的数据项，则称 R 属于_。（分数：2.00）A.第一范式 B.第二范式C.第三范式D.第四范式解析：15.下列程序段的执行结果为_。K=0For J = 1 To 2For I = 1 T
25、o 3K=I+1Next IFor I = 1 To 7K=K+1Next INext JPrint K（分数：2.00）A.10B.6C.11 D.16解析：16.阅读程序：Function F(a As Integer)b=0Static cb=b+1c=c+1f=a+ b+ cEnd FunctionPrivate Sub Command1_Click()Dim S As Integera=2For i=1 To 3Print P(（分数：2.00）A.Next iEnd Sub运行上面的程序，单击命令拄钮，输出结果为_ 。A) 444B.456 C.4 68D.479解析：17.为了在
26、运行时能显示宙体左上角的控制框(系统菜单)，必须_ 。（分数：2.00）A.把窗体的 ControlBox 属性设置为 False，其他属性任意B.把窗体的 ControlBox 属性设置为 True，并且把 BoderStyle 属性设置为 1-5 C.把窗体的 ControlBox 属性设置为 False，同时把 BoderStyle 属性调协为非 0 值D.把窗体的 ControlBox 属性设置为 True，同时把 BoderStyle 属性设置为 0 值解析：18.下列控件中可自动设置滚动条是_。（分数：2.00）A.复选框B.框架C.文本框 D.标签框解析：19.在事件过程中，Pr
27、ivate 表示_ 。（分数：2.00）A.此过程可以被任何其它过程调用B.此过程只可以被本窗体模块中的其它过程调用 C.此过程不可以被任何其它过程调用D.此过程只可以被本工程中的其它过程调用Private Sub 1blAbc_ Change()End Sub解析：20.下列程序段的执行结果为_。I= 4a= 5DoI=I+1a=a+2Loop Until I=7Print“I=”；IPrint“A=”；a（分数：2.00）A.I=4 A=5B.I=7A=13C.I=8A=7D.I=7A=11 解析：21.数据的四种基本逻辑结构是指_。（分数：2.00）A.组、链表、树、图形结构B.线性表、
28、链表，栈队列、数组广义表C.线性结构、链表，树，图形结构D.集合，线性结构、树、图形结构 解析：22.对象实现了数据和操作的结合，使数据和操作_于对象的统一体中。（分数：2.00）A.结合B.隐藏C.封装 D.抽象解析：23.组合框中的 Style 属性值确定了组合框的类型和显示方式；以下选项中不属 Style 属性值的是_。（分数：2.00）A.下拉式组合框B.弹出式组合框 C.简单式组合框D.下拉式列表框解析：24.结构化分析方法 SA、结构化设计方法 SD，和 JACKSON 方法，是在软件开发过程中常用的方法，人们使用 SA 方法时可以得到_。（分数：2.00）A.程序流程图B.具体的
29、语言程序C.模块结构图及模块的功能说明书D.分层数据流图 解析：25.在 n(n0)个元素的顺序栈中删除，1 个元素的时间复杂度为_。（分数：2.00）A.B.C.D. 解析：26.命令 Picture1Circle(500，800)，800 能够在图片框 Picture 中画出的图形是_。（分数：2.00）A.半径为 sin 的圆B.细而高的椭圆C.扁而平的椭圆D.圆心在(500，800)的一个圆弧 解析：27.阅读程序：Sub subP(b()As Integer)For i=1 To 4b(i)=2*iNext iEnd SubPrivate Sub Command1_Click()Di
30、m a(1 To 4)As Integera (1)=5a (2)=6a (3)=7a (4)=8subP a()For i=1 To 4Print a(i)Next iEnd Sub运行以上程序，单击命令按钮，输出结果为_ 。（分数：2.00）A.2 468B.5678C.10121416 D.出错解析：28.以下说法错误的是_。（分数：2.00）A.采用面向对象方法开发软件的基本目的和主要优点是通过重用提高软件的生成率B.在面向对象的程序中，对象是属性(状态)和方法(操作)的封装体C.在面向对象的程序中，对象彼此间通过继承和多态性启动响应的操作 D.继承和多态机制是面向对象程序中实现的主要
31、手段解析：29.在窗体上建立三个文本框，名称分别为 Text1、Text2 和 Text3，一个命令按纽，名称为 command1，如果在 TEXT1 中输入数 200，在 TEXT2 中输入数 150，则执行下列程序后，TEXT3 的值为_。Private Sub Command1_Click()Dim m, n As Integerm = Val (Text1. Text)n = Val (Text2. Text)If n * m = 0 ThenExit SubEnd IfIf m n Thent =m: m= n: n = tEnd IfDor = m Mod nm= nn =rLoo
32、p While r 0Text3. Text= mEnd Sub（分数：2.00）A.200B.50 C.100D.150解析：30.下列关于事件的叙述中不正确的是_。（分数：2.00）A.事件是系统预先为对象定义的能被对象认别的动作。B.事件可分为用户事件与系统事件两类。C.VB 为每个对象设置好各种事件，并定义好事件过程的过程名，但过程代码必须由用户自行编写。D.VB 中所有对象的默认事件都是 Click。 解析：31.使用白盒测试方法时，确定测试数据应根据_和指定的覆盖标准。（分数：2.00）A.程序的内部逻辑 B.程序的复杂结构C.使用说明书D.程序的功能解析：32.关系 R 和 S
33、进行自然连接时，要求 R 和 S 含有一个或多个公共_。（分数：2.00）A.元组B.行C.记录D.属性 解析：33.有如下程序，该程序的执行结果为_。Dim k As Integern=5m=1k=1Do While k = nm=m*2k=k+1LoopPrint m（分数：2.00）A.1B.5C.32 D.40解析：34.下列程序段的执行结果为_。x=5y = -20If Net x0 Thenx=y -3Elsey=x+3Print x-y；y-xEnd If（分数：2.00）A.-3 3 B.5 -8C.3 -3D.25 -25解析：35.下面的程序段执行后，X 的结果为_。X=0
34、For I=1 to 5For j=I to 5X=X+1Next jNext IPrint x（分数：2.00）A.5B.10C.15 D.20解析：二、填空题(总题数：10，分数：20.00)36.在面向对象的程序设计中，类描述的是具有相似性质的一组 【1】 。（分数：2.00）填空项 1:_ （正确答案：对象）解析：37.面向对象的模型中，最基本的概念是对象和 【2】 。（分数：2.00）填空项 1:_ （正确答案：类）解析：38.冒泡排序在最好情况下时间复杂度为 【3】 。（分数：2.00）填空项 1:_ （正确答案：0(n)）解析：39.软件工程是计算机科学中的一个分支，其主要思想是
35、在软件生产中用 【4】 的方法替代传统手工方法。（分数：2.00）填空项 1:_ （正确答案：工程化）解析：40.在关系代数中专门的关系运算包括选择，投影、 【5】 、除等运算。（分数：2.00）填空项 1:_ （正确答案：连接）解析：41.有如下程序，该程序的执行结果是 【6】 。Private Sub Command1_lick()For i= 1 To 4x= 4For j =1 To 3x =3For k=1 To 2X= K+5Next kNext jNext iPrint xEnd Sub（分数：2.00）填空项 1:_ （正确答案：16）解析：42.以下程序的作用是生成一个如下图
36、的矩阵，该程序不完整，请补充完改程序。 （分数：2.00）填空项 1:_ （正确答案：7N=3-M+1 8 A(M，N)）解析：43.以下程序段中 Do.Loop 循环执行的次数为 【9】 。程序执行完毕后，n 的值为 【10】 。Private Sub Command1_Click()n =5DoIf n Mod 2= 0 Thenn =n /2Elsen =n* 3 + 1End IfLoop Until n=1End Sub（分数：2.00）填空项 1:_ （正确答案：9 5 10 1）解析：44.一下程序的作用是生成一个 1010 的矩阵该矩阵主对角线上的数据为 1，其余数据为 0(程
37、序运行结果如下图所示)。该程序不完整，请补充完改程序。Private Sub Command1_Click()Dim a(10，10)As IntegerFor i=1 To 【11】 For j=1 To 10If 【12】 Then【13】 =1Elsea(i，j)=0End IfNext jNext iFor i =1 To 10For j=1 To 10Print a(i，j)；Next jPrintNext iEnd Sub（分数：2.00）填空项 1:_ （正确答案：1110 12 i=j 13 a(i，j)）解析：45.在 Visual Basic 中，要将一个窗体装载到内存进行预处理，但不显示，应该使用 【14】 语句，要将一个窗体从内存中释放，应使用 【15】 语句。（分数：2.00）填空项 1:_ （正确答案：14 load 15 unload）解析：
