计算机类 二级 VB
2014年全国计算机等级《二级VB》考前押密试题(2) 43 题 含答案 VB
1 单选题 1 / 43
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Co mmand1_Click() Di mI ,Num Rando mize Do For I =1To 1000 Num=Int(Rnd*100) Print Num; Select Case Num Case 12 Exit For Case 58 Exit DO Case 65,68,92 End End Select Next I Loop End Sub 上述事件过程执行后,下列描述中正确的是( )。
A Do 循环执行的次数为1000次 B 在For 循环中产生的随机数小于或等于100 C 当所产生的随机数为12时结束所有循环 D 当所产生的随机数为65、68或92时窗体关闭、程序结束
查看答案 D. 当所产生的随机数为65、68或92时窗体关闭、程序结束
2 单选题 2 / 43
下列叙述中正确的是( )。
A 一个算法的空间复杂度大,则其时间复杂度必定大 B 一个算法的空间复杂度大,则其时间复杂度必定小 C 一个算法的时间复杂度大,则其空间复杂度必定小 D 上述3种说法都不对
查看答案 D. 上述3种说法都不对
3 单选题 3 / 43
窗体上有文本框Text1和一个菜单,菜单标题、名称见表,结构见图。要求程序执行时单击"保存"菜单项,则把其标题显示在Text1文本框中。下面可实现此功能的事件过程是( )。
标题 名称
文件 file
新建 new
保存 save
A Private Sub save_Click() Text1 . Text =file . save . Caption End Sub B Private Sub save_Click() Text1 . Text =save . Caption End Sub C Private Sub file_Click() Text1 . Text =file . save . Caption End Sub D Private Sub file_Click() Text1 . Text =save . Caption End Sub
查看答案 B. Private Sub save_Click() Text1 . Text =save . Caption End Sub
4 单选题 4 / 43
Function 过程与Sub 过程的最主要区别是( )。
A Function 过程一定要有形参,而Sub 过程可以没有形参 B Function 过程的终端语句是End Function ,而Sub 过程的终端语句是End Sub C Function 过程是用于计算函数值的,而Sub 过程是用于改变属性值的 D Function 过程有返回函数值,而Sub 过程没有返回值
查看答案 D. Function 过程有返回函数值,而Sub 过程没有返回值
5 单选题 5 / 43
假定建立一个名为Co mmand1的命令按钮数组,则以下说法中错误的是( )。
A 数组中每个命令按钮的名称(Name 属性)均为Co mmand1 B 数组中每个命令按钮的标题(Caption 属性)都一样 C 数组中所有命令按钮可以使用同一个事件过程 D 用名称Co mmand1(下标)可以访问数组中的每个命令按钮
查看答案 B. 数组中每个命令按钮的标题(Caption 属性)都一样
6 单选题 6 / 43
在窗体上面1个名称为Co mmand1的命令按钮,然后编写下列事件过程 Option Base 1 Private Sub Co mmand1_Click() Di ma(5,5)As Integer For i =1To 5 For j=1To 5 a(i ,j)=(i +j )*5\10 Next j Next i s =0 For i =1To 5 s =s +a(i ,i) Next i Print s End Sub 程序运行后,单击命令按钮,输出结果是( )。
A 15 B 13 C 11 D 9
查看答案 A. 15
7 单选题 7 / 43
当在滚动条内拖动滚动块时触发( )。
A KeyUp 事件 B KeyPress 事件 C Scroll 事件 D Change 事件
查看答案 C. Scroll 事件
8 单选题 8 / 43
下列各种形式的循环中,输出"*"的个数最少的循环是( )。
A a=5:b =8 Do Print "*" a=a+1 Loop While a<b B a=5:b =8 Do Print "*" a=a+1 Loop Until a<b C a=5:b =8 Do Until a-b Print "*" b =b +1 Loop D a=5:b =8 Do Until a>b Print "*" a=a+1 Loop
查看答案 C. a=5:b =8 Do Until a-b Print "*" b =b +1 Loop
9 单选题 9 / 43
下列叙述中正确的是( )。
A 软件测试应该由程序开发者来完成 B 程序经调试后一般不需要再测试 C 软件维护只包括对程序代码的维护 D 以上三种说法都不对
查看答案 D. 以上三种说法都不对
10 单选题 10 / 43
下列程序的执行结果为( )。 Private Sub Co mmand1_Click() Di mx As Integer ,y As Integer x=12:y =20 Call Value(x,y) Print x;y End Sub Private Sub Value(ByVal m As Integer ,ByVal n AsInteger) m=m*2:n =n -5 Print m;n End Sub
A 20 12 20 15 B 12 20 12 25 C 24 15 12 20 D 24 12 12 15
查看答案 C. 24 15 12 20
11 单选题 11 / 43
下列程序执行后,变量X 的值为( )。 Di mfl ,b ,c ,d As Si ngle Di m X As Si ngle fl =10 b =30 c =400 If b >fl Then d =fl :fl =b :b =d End If If b >c Then X=b Else If fl >c Then X=c Else X=a End If
A 10 B 30 C 400 D 430
查看答案 B. 30
12 单选题 12 / 43
下列叙述中错误的是( )。
A 菜单项的快捷键不可以任意设置 B 除了Click 事件之外,菜单项还能响应其他的事件过程,如DblClick 等 C 每个菜单项都是一个控件,与其他控件一样都有自己的属性和事件 D 在程序执行时,如果菜单项的Enabled 属性为False ,则该菜单项变成灰色
查看答案 B. 除了Click 事件之外,菜单项还能响应其他的事件过程,如DblClick 等
13 单选题 13 / 43
表达式5Mod 3+3\5*2的值是( )。
A 0 B 2 C 4 D 6
查看答案 B. 2
14 单选题 14 / 43
假定有下表所列的菜单结构:
要求程序运行后,如果单击菜单项"大图标",则在该菜单项前添加一个"√"。以下正确的事件过程是( )。
A Private Sub bigicon_Click() bigicon .Checked =False End Sub B Private Sub bigicon_Click() Me .appear .bigicon .Checked =True End Sub C Private Sub bigicon_Click() bigicon .Checked =True End Sub D Private Sub bigicon_Click() appear .bigicon .Checked =True End Sub
查看答案 C. Private Sub bigicon_Click() bigicon .Checked =True End Sub
15 单选题 15 / 43
下列关于关系运算的叙述中正确的是( )。
A 投影、选择、连接从二维表的行的方向来进行运算 B 并、交、差从二维表的列的方向来进行运算 C 投影、选择、连接从二维表的列的方向来进行运算 D 以上三种说法都不对
查看答案 C. 投影、选择、连接从二维表的列的方向来进行运算
16 单选题 16 / 43
窗体上有一个名称为Picture1的图片框控件,一个名称为Label1的标签控件。如图所示。
现有如下程序:
Public Sub display (x As Control)
If TypeOf xis Label Then
x.Caption ="计算机等级考试"
Else
x.Picture =Loadpicture("pic .jpg")
EndIf
End Sub
Private Sub Label1_Click()
Call display(Label1)
End Sub
Private Sub Picture1_Click()
Call display(Picture1)
End Sub
对以上程序,下列叙述中错误的是( )。
A 程序运行时会出错 B 单击图片框,在图片框中显示一幅图片 C 过程中的X 是控件变量 D 单击标签,在标签中显示一串文字
查看答案 B. 单击图片框,在图片框中显示一幅图片
17 单选题 17 / 43
将文本框的( )属性设置为True 时,文本框可以输入或显示多行文本,且会自动换行。
A Text B ScrollBars C Multi Li ne D Enabled
查看答案 C. Multi Li ne
18 单选题 18 / 43
下列有关数据库的叙述,正确的是( )。
A 数据处理是将信息转化为数据的过程 B 数据的物理独立性是指当数据的逻辑结构改变时,数据的存储结构不变 C 关系中的每一列称为元组,一个元组就是一个字段 D 如果一个关系中的属性或属性组并非该关系的关键字,但它是另一个关系的关键字,则称其为本关系的外关键字
查看答案 D. 如果一个关系中的属性或属性组并非该关系的关键字,但它是另一个关系的关键字,则称其为本关系的外关键字
19 单选题 19 / 43
过程语句中,使用的<参数表>可以是( )。
A 常量或变量名 B 表达式或变量名 C 数组元素或变量名 D 变量名或数组名
查看答案 D. 变量名或数组名
20 单选题 20 / 43
下列排序方法中,最坏情况下比较次数最少的是( )。
A 冒泡排序 B 简单选择排序 C 直接插入排序 D 堆排序
查看答案 D. 堆排序
21 单选题 21 / 43
下列不能输出"Program"的语句是( )。
A Print Mid("VBProgram",3,7) B Print Right("VBProgram",7) C Print Mid("VBProgram",3) D Print Left("VBProgram",7)
查看答案 D. Print Left("VBProgram",7)
22 单选题 22 / 43
下列对于软件测试的描述正确的是( )。
A 软件测试的目的是证明程序是否正确 B 软件测试的目的是使程序运行结果正确 C 软件测试的目的是尽可能多地发现程序中的错误 D 软件测试的目的是使程序符合结构化原则
查看答案 C. 软件测试的目的是尽可能多地发现程序中的错误
23 单选题 23 / 43
在窗体上画一个命令按钮,其名称为Co mmand1,然后编写下列代码: Option Base 1 Private Sub Co mmand1_Click() Di ma a=Array(1,2,3,4) j=1 For i =4To 1Step -1 s =s +a(i)*j j=j*10 Next i Print S End Sub 程序运行后,单击命令按钮,其输出结果是( )。
A 4321 B 1234 C 34 D 12
查看答案 B. 1234
24 单选题 24 / 43
设有如下三个关系表:
下列操作中正确的是( )。
A T=R∩S B T=R∪S C T=R×S D T=R/S
查看答案 C. T=R×S
25 单选题 25 / 43
可以实现从键盘输入一个作为双精度变量a的值的语句是( )。
A a=InputBox() B a=InputBox("请输入一个值") C a=Val(InputBox("请输入一个值")) D a=Val(InputBox())
查看答案 C. a=Val(InputBox("请输入一个值"))
26 单选题 26 / 43
可以作为其他控件容器的控件是( )。
A 窗体控件,列表框控件,图像框控件 B 窗体控件,文本框控件,框架控件 C 窗体控件,框架控件,图片框控件 D 窗体控件,标签控件,图片框控件
查看答案 C. 窗体控件,框架控件,图片框控件
27 单选题 27 / 43
在通用对话框中打开"颜色对话框"的方法是( )。
A ShowOpen B MenuIte m.Enabled =True C MenuIte m.Visi ble =True D MenuIte m.Visi ble =Flase
查看答案 B. MenuIte m.Enabled =True
28 单选题 28 / 43
一间宿舍可住多个学生,则实体宿舍和学生之间的联系是( )。
A 一对一 B 一对多 C 多对一 D 多对多
查看答案 B. 一对多
29 单选题 29 / 43
在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下事件过程: Private Sub Co mmand1_Click() Di ma 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 C 9 7 D 死循环
查看答案 C. 9 7
30 单选题 30 / 43
下列叙述中正确的是( )。
A 在面向对象的程序设计中,各个对象之间具有密切的关系 B 在面向对象的程序设计中,各个对象都是公用的 C 在面向对象的程序设计中,各个对象之间相对独立,相互依赖性小 D 上述3种说法都不对
查看答案 C. 在面向对象的程序设计中,各个对象之间相对独立,相互依赖性小
31 单选题 31 / 43
以下叙述中错误的是( )。
A 在KeyPress 事件过程中不能识别键盘的按下与释放 B 在KeyPress 事件过程中不能识别回车键 C 在KeyDown 和KeyUp 事件过程中,将键盘输入的"A"和"a"视作相同的字母 D 在KeyDown 和KeyUp 事件过程中,从大键盘上输出的"1"和从右侧小键盘上输入的"1"被视作不同的字符
查看答案 B. 在KeyPress 事件过程中不能识别回车键
32 单选题 32 / 43
单击按钮时,以下程序运行后的输出结果是( )。 Private Sub proc1(x As Integer ,y As Integer ,z As Integer) x=3*z y =2*z z =x+y End Sub Private Sub Co mmand1_Click() Di mx As Integer ,y As Integer ,z As Integer x=1:y =2:z =3 Call proc1(x,x,z) Print x;x;z Call proc1(x,y ,y) Print x;y ;y End Sub
A 6 6 12 6 10 10 B 9 5 10 5 10 10 C 9 6 12 9 10 15 D 9 10 10 5 4 10
查看答案 A. 6 6 12 6 10 10
33 单选题 33 / 43
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Co mmand1的命令按钮,运行后的窗体外观如图所示:
设有如下的类型和变量声明:
Private Type Person
name As STRING*8
major As Stri ng*20
End Type
Di mp As Person
设文本框中的数据已正确地赋值给Person 类型的变量p ,当点击"保存"按钮时,能够正确地把变量中的数据写入随机文件Test2.dat 中的程序段是( )。
A Open "c :\Test2.dat"For Output As #1 Put #1,1,p Close #1 B Open "c :\Test2.dat"For Rando m As #1 Get #1,1,p Close #1 C Open "c :\Test2.dat"For Rando m As #1Len =Len (p)Put #1,1,p Close #1 D Open "c :\Test2.dat"For Rando m As #1Len =Len (p)Get #1,1,p Close #1
查看答案 C. Open "c :\Test2.dat"For Rando m As #1Len =Len (p)Put #1,1,p Close #1
34 单选题 34 / 43
设在工程文件中有一个标准模块,其中定义了下列记录类型: Type Books Name As Stri ng*10 TelNum As Stri ng*20 End Type 在窗体上画一个名为Co mmand1的命令按钮,要求当执行事件过程Co mmand1Click 时,在顺序文件Person .txt中写入一条Books 类型的记录。下列能够完成该操作的事件过程是( )。
A Private Sub Co mmand1_Click() Di m BASBooks Open "Person txt"For Output As #1 B .Name =InputBox ("输入姓名") B .TelNum=lnputBox ("输入电话号码") Write #1BName ,BTelNum Close #1 End Sub B Private Sub Co mmand1_Click() Di m BAs Books Open "Person txt"For Input As #1 B .Name =InputBox("输入姓名") B .TelNum=InputBox("输入电话号码") Print #1,B.Name ,B.TelNam Close #1 End Sub C Private Sub Co mmand1_Click() Di m BASBooks Open "Person txt"For Output As #1 B .Name =InputBox("输入姓名") B .TelNum=InputBox("输入电话号码") Write #1,B Close #1 End Sub D Private Sub Co mmand1_Click() Open "Person txt"For Input As #1 Name =lnputBox("输入姓名") TelNum=lnputBox("输入电话号码") Pri m#1Name TelNum Close #1 End Sub
查看答案 A. Private Sub Co mmand1_Click() Di m BASBooks Open "Person txt"For Output As #1 B .Name =InputBox ("输入姓名") B .TelNum=lnputBox ("输入电话号码") Write #1BName ,BTelNum Close #1 End Sub
35 单选题 35 / 43
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Co mmand1,然后编写如下事件过程: Private Sub Form_Load() List1.AddIte m"Ite m1" List1.AddIte m"Ite m2" List1.AddIte m"Ite m3" End Sub Private Sub Co mmand1_Click() List1.List(List1.ListCount)="AAAA" End Sub 程序运行后,单击命令按钮,其结果为( )。
A 把字符串"AAAA"添加到列表框中,但位置不能确定 B 把字符串"AAAA"添加到列表框的最后(即"Ite m3"的后面) C 把列表框中原有的最后一项改为"AAAA" D 把字符串"AAAA"插入到列表框的最前面(即"Ite m1"的前面)
查看答案 B. 把字符串"AAAA"添加到列表框的最后(即"Ite m3"的后面)
36 单选题 36 / 43
有如下函数: Function fun(a As Integer ,n As Integer)As Integer Di m m As Integer While a >=n a=a-n m=m+1 Wend fun =m End Function 该函数的返回值是( )。
A a 乘以n 的乘积 B a 加n 的和 C a 减n 的差 D a 除以n 的商(不含小数部分)
查看答案 B. a 加n 的和
37 单选题 37 / 43
为了暂时关闭计时器,应把该计时器的某个属性设置为False ,这个属性是( )。
A Visi ble B Ti mer C Enabled D Interval
查看答案 C. Enabled
38 单选题 38 / 43
下列叙述中,不属于软件需求规格说明书的作用的是( )。
A 便于用户、开发人员进行理解和交流 B 反映出用户问题的结构,可以作为软件开发工作的基础和依据 C 作为确认测试和验收的依据 D 便于开发人员进行需求分析
查看答案 D. 便于开发人员进行需求分析
39 单选题 39 / 43
在窗体上画一个名称为File 的文件列表框,并编写如下程序: Private Sub File1_DblClick() x=Shell(File1.File Name ,1) End Sub 以下关于该程序的叙述中,错误的是( )。
A x 没有实际作用,因此可以将该语句写为:Call Shell(File .File Name ,1) B 双击文件列表框中的文件,将触发该事件过程 C 要执行的文件的名字通过File1.File Name 指定 D File1中显示的是当前驱动器、当前目录下的文件
查看答案 A. x 没有实际作用,因此可以将该语句写为:Call Shell(File .File Name ,1)
40 单选题 40 / 43
设A="87654321",则表达式Val(Left(A,4)+Mid(A,4,2))的值为( )。
A 876543 B 876554 C 8 D 6
查看答案 B. 876554
41 主观题 41 / 43
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立两个命令按钮,名称分别为Command1和Command2、标题分别为"显示"和"删除",一个名称为Pic1的图片框。要求程序运行后,每单击一次"显示"按钮,不使用任何变量而直接在图片框中显示"Picture1";如果单击"删除"按钮,则清除图片框中的文本,如图31-1所示。
图31-1
注意:保存时必须存放在考生文件夹下,窗体文件名为sj1.frm,工程文件名为sj1.vbp。
(2)在名称为Form1的窗体上建立一个名称为List1的列表框。在程序运行后,通过Form_Load()事件过程加载窗体时,执行语句List1.AddItem "Item1"和List1.AddItem "Item2",每当单击列表项时,就将执行语句List1.AddItem List1.Text一次,如图31-2所示。
图31-2
注意:保存时必须存放在考生文件夹下,窗体文件名为sj2.frm,工程文件名为sj2.vbp。
查看答案 42 主观题 42 / 43
(1)在窗体上建立一个名称为Text1的文本框和一个名称为Cmd1、标题为"计算"的命令按钮,如图4-3所示。程序运行后,单击"计算"命令按钮,通过在对话框输入整数12,放入整型变量a中,然后计算a!(提示:运算结果应放入Long型变量中),在文本框中显示结果,如图4-4所示,并把结果存入文件out.txt中。考生文件夹中有一个标准模块mode.bas,该模块中提供了保存文件的过程putdata,考生可以直接调用。
注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sj3.vbp。
(2)在考生文件夹中有一个工程文件sj4.vbp及窗体文件sj4.frm。在名为Form1的窗体上有两个框架,其中一个框架中有两个单选按钮,另一个框架中有两个复选框,窗体上还有一个标题为"确定"的命令按钮和一个初始内容为空的文本框。所有控件已经全部画出。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,则对文本框中的文字进行相应的设置,如图4-5所示。
图4-5
窗体上的控件已经绘制出,但没有给出主要程序内容,请编写适当的事件过程,完成上述功能。
注意:不能修改已经给出的程序部分和已有的控件;在结束程序运行之前,必须选中一个单选按钮和至少一个复选框,并单击"确定"按钮;必须通过单击窗体右上角的"关闭"按钮结束程序,否则无成绩。最后,按原文件名并在原文件夹中保存修改后的文件。
查看答案 (1)在窗体上建好控件后,先设置控件属性,再编写事件过程和调试程序,并使其符合题目要求。当运行程序后,所弹出的对话框是通过调用函数InputBox来实现(通过VisuAl BAsiC系统本身提供的)。本题主要是考查循环语句的应用。计算一个数值的阶乘时使用了For循环,最后调用了所给模块中的过程将结果进行保存。① 建立界面并设置控件属性。程序中用到的控件及其属性见表4-2。
表4-2
控件 属性 设置值
文本框 Name Text1
命令按钮 Name Cmd1
命令按钮 Caption 计算
②声明存储运算结果的Long型变量。在编写程序代码时要注意变量范围的设定,题目要求将计算结果存入Long变量中,所以把最后放入文本框内的变量设置为长整型。例如:Dim temp As Long③打开工程资源管理器,在其空白处右键添加模块mode.bas(此文件已在考生文件夹里),模块代码如下:
43 主观题 43 / 43
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的,请在有"?"号的地方填入正确内容,然后删除"?"及代码前的所有注释符(即'号),但不能修改其他部分。存盘时不得改变文件名和文件夹。
本题描述如下:
在窗体上有一个文本框、两个单选按钮及两个命令按钮。文本框的名称为Text1,内空;两个命令按钮的名称分别为Command1与Command2、标题分别为"读取"与"加密";单选按钮的名称分别为Option1和Option2,标题分别为3,5。单击"读取",程序将读入考生文件夹下的文本文件in5.txt,单击"加密",加密过的文本显示在Text1中。根据单选按钮中的不同的数字,加密的方法不同。例如选择Option1,则逐一把读入的字符串改为它前面的第3个字母。程序运行时效果如图37-5所示。
图37-5
查看答案 单选按钮组常用于提供唯一选择,VAluE属性值决定每个单选按钮的选中状态:FAlsE表示未选、TruE表示选中,CAption属性用于设置或返回单选按钮的标题。Chr函数返回StrinG,其中包含有与指定的字符代码相关的字符。其语法格式为:Chr(ChArCoDE) 。ChArCoDE必要参数,是一个用来识别某字符的LonG型数。MiD$(字符串,起始位置[,个数])函数用于从字符串指定位置开始的含指定个数字符的字符串;StrinG(个数,字符)函数用于返回含指定个数字符的字符串;AsC(字符串)函数用于返回字符串首字符的ASCII码值。根据题意,将一个文本框控件、两个单选按钮控件和两个命令按钮添加到窗体中,文本框的名称为TExt1、TExt属性为空,单选按钮的名称分别为Option1和Option2,CAption属性分别为"3"和"5",命令按钮的名称为CommAnD1和CommAnD2,CAption属性分别为"读取"和"加密"。双击CommAnD1进入代码窗口,编写如下代码: