计算机等级考试二级VB全真模拟1.docx

1、计算机等级考试二级VB全真模拟1计算机等级考试二级VB全真模拟卷一、选择题 (1) 栈和队列的共同特点是A) 都是先进先出 B) 都是先进后出C) 只允许在端点处插入和删除元素 D) 没有共同点答案： C(2) 已知二叉树后序遍历序列是dabec，中序遍历序列是debac，它的前序遍历序列是A) acbed B) decab C) deabc D) cedba答案：D(3) 链表不具有的特点是A) 不必事先估计存储空间 B) 可随机访问任一元素C) 插入删除不需要移动元素 D) 所需空间与线性表长度成正比答案：B(4) 结构化程序设计的3种结构是A) 顺序结构、选择结构、转移结构B) 分支结构

2、、等价结构、循环结构C) 多分支结构、赋值结构、等价结构D) 顺序结构、选择结构、循环结构答案：D(5) 为了提高测试的效率，应该 A) 随机选取测试数据B) 取一切可能的输入数据作为测试数据C) 在完成编码以后制定软件的测试计划D) 集中对付那些错误群集的程序答案：D(6) 算法的时间复杂度是指A) 执行算法程序所需要的时间B) 算法程序的长度C) 算法执行过程中所需要的基本运算次数D) 算法程序中的指令条数答案：C(7) 软件生命周期中所花费用最多的阶段是A) 详细设计 B) 软件编码 C) 软件测试 D) 软件维护答案：D(8) 数据库管理系统DBMS中用来定义模式、内模式和外模式的语言

3、为 A) C B) Basic C) DDL D) DML答案：C(9) 下列有关数据库的描述，正确的是A) 数据库是一个DBF文件 B) 数据库是一个关系C) 数据库是一个结构化的数据集合 D) 数据库是一组文件答案：C(10) 下列有关数据库的描述，正确的是A) 数据处理是将信息转化为数据的过程B) 数据的物理独立性是指当数据的逻辑结构改变时，数据的存储结构不变C) 关系中的每一列称为元组，一个元组就是一个字段D) 如果一个关系中的属性或属性组并非该关系的关键字，但它是另一个关系的关键字，则称其为本关系的外关键字答案：D(11) 关于Visual Basic方法的概念错误的是A) 方法是对

4、象的一部分 B) 方法是预先定义好的操作C) 方法是对事件的响应 D) 方法用于完成某些特定的功能答案：C(12) 下列说法有错误的是A) 默认情况下，属性Visible的值为TrueB) 如果设置控件的Visible属性为False，则运行时控件会隐藏C) Visible的值可设为True或者FalseD) 设置Visible属性同设置Enabled属性的功能是相同的，都是使控件处于失效状态答案：D(13) 下列各控件不包含滚动条的控件是A) ListBox B) ComboBox C) TextBox D) LabelBox答案：D(14) 如果在程序中要将c定义为静态变量，且为整型数，则

5、应使用的语句是A) Redim a As Integer B) Static a As IntegerC) Public a As Integer D) Dim a As Integer 答案：B(15) 声明一个变量为局部变量应该用A) Global B) PrivateC) Static D) Public答案：C(16) 执行x$=InputBox(请输入x的值) 时，在弹出的对话框中输入123，在列表框List1选中第1个列表项(数据为456) ，使其值为123456的语句是A) y=x$+List1.List(0) B) y=x$+List1.List(1) C) y=Val(x$)

6、 +Val(List1.List(0) ) D) y=Val(x$) & Val(List1.List(1) )答案：A(17) 以下各项中，Visual Basic不能接收的图形文件是A) .ico文件 B) .jpg文件C) .psd文件 D) .bmp文件答案：C(18) 下面的属性中，用于自动调整图像框中图形内容的大小的是A) Picture B) CurentYC) CurrentX D) Stretch答案：D(19) 下面有关注释语句的格式，错误的是A) Rem注释内容B) 注释内容C) a=3:b=2 对a、b赋值D) Private Sub Command1_MouseDow

7、n(button As Integer , shift As Integer , _ Rem 鼠标按下事件的命令调用过程 X As Single ,Y As Single) 答案：D(20) 只有将组合框的Style属性设置为何值时，才能触发DblClick事件？A) 0 B) 1 C) 2 D) 3答案：B(21) 以下属于Visual Basic合法的数组元素是A) x8 B) x8C) s(0) D) v8正确答案：C(22) 编写如下两个事件过程：Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer) Print

8、Chr(KeyCode) End SubPrivate Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub在一般情况下(即不按住Shift键和锁定大写键时) 运行程序，如果按A键，则程序输出的结果是A) A aB) aA C) A A D) aa 正确答案：C(23) 要使菜单项MenuOne在程序运行时失效，使用的语句是A) MenuOne.Visible=True B) MenuOne.Visible=FalseC) MenuOne.Enabled=True D) MenuOne.Enabled=False答

9、案：D(24) 在窗体上建立通用对话框需要添加的控件是A) Data控件 B) From控件C) CommonDialog控件 D) VBComboBox控件答案：C(25) 在Visual Basic中，要将一个窗体加载到内存进行预处理但不显示，应使用的语句是A) Load B) ShowC) Hide D) Unload答案：A(26) 运行下列程序段后，显示的结果为J1=4J2=9If J1J2 Then Print J2 Else Print J1A) 4 B)9C) 13 D) 49答案：B(27) 下列语句正确的是A) If AB Then Print A不等于BB) If AB

10、Then Printf A不等于BC) If AB Then Print A不等于BD) If AB Print A不等于B答案：C(28) 下面语句正确的是A) If xy Then y=x3B) If xy Then y=3xC) If xy Then y=x3D) If xy Then y=x* *3答案：A(29) 计算z的值，当x大于y时，z=x；否则z=y。下列语句错误的是A) If x=y Then z=x : z=y B) If x=y Then z=x Else z=yC) z=y : If x=y Then z=x D) If x0 Then x=y-3 Else y=x+

11、3Print x-y; y-xA) -3 3 B) 5 -9C) 3 -3 D) -6 5答案：A(31) 不能脱离控件(包括客体) 而独立存在的过程是A) 事件过程 B) 通用过程C) Sub过程 D) 函数过程答案：A(32) Sub过程与Function过程最根本的区别是A) Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以B) Function过程可以有形参，Sub过程不可以C) Sub过程不能返回值，而Function过程能返回值D) 两种过程参数的传递方式不同答案： C(33) 单击命令按钮时，下列程序的执行结果为Private Sub Command1

12、_Click() Dim x As Integer, y As Integerx=12:y=32 Call Proc(x,y) Print x; yEnd SubPublic Sub Proc(n As Integer, ByVal m As Integer) n=n Mod 10m=m Mod 10End SubA) 1232 B) 232C) 23 D) 123答案：B(34) 单击命令按钮时，下列程序的执行结果是Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integera=3b=4c=5Print S

13、ecProc(c, b, a) End SubFunction FirProc(x As Integer, y As Integer, z As Integer) FirProc=2 x+y+3 zEnd FunctionFunction SecProc(x As Integer, y As Integer, z As Integer) SecProc=FirProc(z, x, y) +xEnd FunctionA) 20 B) 22C) 28 D) 30答案：C(35) 下列程序的执行结果为Private Sub Command1_Click() Dim FirStr As StringF

14、irSt=abcdefPrint Pat(FirStr) End SubPrivate Function Pat(xStr As String) As StringDim tempStr As String, strLen As IntegertempStr=strLen=Len(xStr) i=1Do While i=Len(xStr) -3tempStr=tempStr+Mid(xStr, i, 1) +Mid(xStr, strLen -i+1, 1) i=i+1LoopPat=tempStrEnd FunctionA) abcdef B) afbecdC) fedcba D) defa

15、bc正确答案：B二、填空题（无答题记录！）(1) 算法的基本特征是可行性、确定性、 【1】 和拥有足够的情报。正确答案：有穷性(2) 在长度为n的有序线性表中进行二分查找。最坏的情况下，需要的比较次数为 【2】 。正确答案：log2n(3) 在面向对象的程序设计中，类描述的是具有相似性质的一组 【3】 。正确答案：对象(4) 通常，将软件产品从提出、实现、使用维护到停止使用退役的过程称为 【4】 。正确答案：软件生命周期(5) 数据库管理系统常见的数据模型有层次模型、网状模型和 【5】 3种。正确答案：关系模型(6) Visual Basic对象可以分为两类，分别为 【6】 和 【7】 。正确

16、答案：预定义对象正确答案：用户定义对象(7) 完成下面的程序，使显示结果如下图所示。Private Sub Form_Click() FontSize=18Sample= 【8】 x=(ScaleWidth-TextWidth(Sample) ) /2y=(ScaleHeight-TextHeight(Sample) ) /2CurrentX=xCurrentY=y【9】 SampleEnd Sub正确答案：Welcome to Beijing !正确答案：Print(8) 下列程序的功能是：当x100时，没有意义。请填空。Private Sub Command1_Click() Dim x

17、As Singlex=InputBox(请输入x的值！) 【10】 Case Is Y，AB，正确表示它们之间关系的式子是（B）A)Sgn(Y-X)-sgn(A-B)b And cb Or cb Xor cb Eqv ca9.设S=“中华人民共和国”，表达式Left（S,1）+Right（S,1）+Mid（S,3,2）的值为（B）A) “中华民国”B) “中国人民”C) “中共人民”D) “人民共和”10.下列表达式的值为2123的是（B）A) Val(123asd) & 2000B) Val(123asd) + 2000C) Str(123) & 2000D)Str(123)+200011.

18、下列叙述不正确的是（C）A)InputBox函数返回值为字符型B)MsgBox函数返回值为所单击按钮的整数值C)MsgBox语句返回值为所单击按钮的键值D)Shell函数返回值为所执行文件的工作代码12.下列叙述不正确的是（A）A)命令按钮的默认属性为CaptionB)标签的默认主属性为CaptionC)复选框的默认属性为valueD)滚动条的默认属性为value13.下列各程序段中，正确的是（C）A)If 10 10 Then a= a+1 Else a= a+ 5 End IfC)If a =10 Thena=a + 1ElseEnd IfD)If a =10 Thena=a + 1Els

19、e If a 5,Is 5,1,3 to 10Print OKEnd SelectD)Select Case XCase 1,3 Is 5Print OKEnd Select17.有如下程序：Private Sub Form_Click()Dim check As Boolean, n As Integercheck=Falsen= 0DoDo While n 10n=n + 1If n= 5 Then check=TrueExit DoEnd IfPrint n；LoopLoop Until check=TrueEnd Sub程序运行后，输出的结果是（B）A)1 2 3B)1 2 3 4C)

20、1 2 3 4 5D)1 2 3 4 5 618.在运行阶段，要在文本框Text1获得焦点时选中文本框中所有内容，对应的事件过程是（A）A)Private Sub Text1_GotFocus()Text1.SelStart=0Text1.SelLength=Len(Text1.text)End SubB)Private Sub Text1_LostFocus()Text1.SelStart=0Text1.SelLength=Len(Text1.text)End SubC)Private Sub Text1_Change()Text1.SelStart=0Text1.SelLength=Len

21、(Text1.text)End SubD)Private Sub Text1_SetFocus()Text1.SelStart=0Text1.SelLength=Len(Text1.text)End Sub19.有如下程序（D）Private Sub From_Activate()Dim aa=Array(1 ,2 ,3, 4, 5)For i=LBound(a) To UBound(a)a(i)=i*a(i)Next iPrint i,LBound(a),UBound(a),a(i)End Sub A)4 0 4 25B)5 0 4 25C)不确定D)程序出错20.在窗体上画一个水平滚动条，名称为HScroll1;再画一个文本框，名称为Text1。要想使用滚动条滑块的变化量来调用文本框中文字的大小，则可满足的语句是（C）A)Text1.FontName= HScroll1.MaxB)Text1.FontSize= HScroll1.MinC)Text1.FontSize= HScroll1.valueD)Text1.FontBold= HScroll1.value21.在下列程序中，无论使用鼠标左键还是右键都能弹出菜单，且弹出菜单中的菜单项都响应鼠标单的是（D）A)Sub Form_MouseDown (