您现在的位置: 中国男护士网 >> 考试频道 >> 计算机等级 >> 二级辅导 >> VB >> 模拟题 >> 正文    
  2007年9月计算机二级VB模拟试题(5)及答案 【注册男护士专用博客】          

2007年9月计算机二级VB模拟试题(5)及答案

www.nanhushi.com     佚名   不详 

一 、选择题
(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.分支结构、等价结构、循环结构
C.多分支结构、赋值结构、等价结构
D.顺序结构、选择结构、循环结构
正确答案: D

(5) 为了提高测试的效率,应该
A.随机选取测试数据
B.取一切可能的输入数据作为测试数据
C.在完成编码以后制定软件的测试计划
D.集中对付那些错误群集的程序
正确答案: D

(6) 算法的时间复杂度是指
A.执行算法程序所需要的时间
B.算法程序的长度
C.算法执行过程中所需要的基本运算次数
D.算法程序中的指令条数
正确答案: C

(7) 软件生命周期中所花费用最多的阶段是
A.详细设计 
B.软件编码
C.软件测试 
D.软件维护
正确答案: D

(8) 数据库管理系统DBMS中用来定义模式、内模式和外模式的语言为
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.方法是对象的一部分 
B.方法是预先定义好的操作
C.方法是对事件的响应 
D.方法用于完成某些特定的功能
正确答案: C

(12) 下列说法有错误的是
A.默认情况下,属性Visible的值为False
B.如果设置控件的Visible属性为False,则运行时控件会隐藏
C.Visible的值可设为True或者False
D.设置Visible属性同设置Enabled属性的功能是相同的,都是使控件处于失效状态
正确答案: D

(13) 下列各控件不包含滚动条的控件是
A.ListBox 
B.ComboBox
C.TextBox 
D.LabelBox
正确答案: D

(14) 如果在程序中要将c定义为静态变量,且为整型数,则应使用的语句是
A.Redim a As Integer 
B.Static a As Integer
C.Public a As Integer 
D.Dim a As Integer 
正确答案: B

(15) 声明一个变量为局部变量应该用
A.Global 
B.Private
C.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$) +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.CurentY
C.CurrentX 
D.Stretch
正确答案: D

(19) 下面有关注释语句的格式,错误的是
A.Rem注释内容
B.注释内容
C.a=3:b=2 ′对a、b赋值
D.Private Sub Command1_MouseDown(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.x[8]
C.s(0) 
D.v[8]
正确答案: C

(22) 编写如下两个事件过程:
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Print Chr(KeyCode)
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print Chr(KeyAscii)
End Sub
在一般情况下(即不按住Shift键和锁定大写键时) 运行程序,如果按"A"键,则程序输出的结果是
A.A
a
B.a

C.A 

D.a
a
正确答案: C

(23) 要使菜单项MenuOne在程序运行时失效,使用的语句是
A.MenuOne.Visible=True 
B.MenuOne.Visible=False
C.MenuOne.Enabled=True 
D.MenuOne.Enabled=False
正确答案: D

(24) 在窗体上建立通用对话框需要添加的控件是
A.Data控件 
B.From控件
C.CommonDialog控件 
D.VBComboBox控件
正确答案: C

(25) 在Visual Basic中,要将一个窗体加载到内存进行预处理但不显示,应使用的语句是
A.Load 
B.Show
C.Hide 
D.Unload
正确答案: A

(26) 运行下列程序段后,显示的结果为
J1=23
J2=32
If J1
A.23 
B.32
C.55 
D.2332
正确答案: B

(27) 下列语句正确的是
A.If A≠B Then Print "A不等于B"
B.If A<>B Then Printf "A不等于B"
C.If A<>B Then Print "A不等于B"
D.If A≠B Print "A不等于B"
正确答案: C

(28) 下面语句正确的是
A.If x<3y And x>y Then y=x^3
B.If x<3y And x>y Then y=3x
C.If x<3y:x>y Then y=x^3
D.If x<3y And x>y 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=y
C.z=y : If x>=y Then z=x 
D.If x<=y Then z=y Else z=x
正确答案: A

(30) 下列程序段执行结果为
x=5
y=-6
If Not x>0 Then x=y-3 Else y=x+3
Print x-y; y-x
A.-3 3 
B.5 -9
C.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_Click()
Dim x As Integer, y As Integer
x=12:y=32 
Call Proc(x,y)
Print x; y
End Sub
Public Sub Proc(n As Integer, ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A.1232 
B.232
C.23 
D.123
正确答案: B

(34) 单击命令按钮时,下列程序的执行结果是
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a=3
b=4
c=5
Print SecProc(c, b, A.
End Sub
Function FirProc(x As Integer, y As Integer, z As Integer)
FirProc=2x+y+3z
End Function
Function SecProc(x As Integer, y As Integer, z As Integer)
SecProc=FirProc(z, x, y) +x
End Function
A.20 
B.22
C.28 
D.30
正确答案: C

(35) 下列程序的执行结果为
Private Sub Command1_Click()
Dim FirStr As String
FirSt= "abcdef"
Print Pat(FirStr)
End Sub
Private Function Pat(xStr As String) As String
Dim tempStr As String, strLen As Integer
tempStr= ""
strLen=Len(xStr)
i=1
Do While i <=Len(xStr) -3
tempStr=tempStr+Mid(xStr, i, 1) +Mid(xStr, strLen -i+1, 1)
i=i+1
Loop
Pat=tempStr
End Function
A.abcdef 
B.afbecd
C.fedcba 
D.defabc
正确答案: B


二 、填空题
(1) 算法的基本特征是可行性、确定性、 【1】 和拥有足够的情报。
正确答案:  1.(有穷性)

(2) 在长度为n的有序线性表中进行二分查找。最坏的情况下,需要的比较次数为 【2】 。
正确答案:  1.(log2n)

(3) 在面向对象的程序设计中,类描述的是具有相似性质的一组 【3】 。
正确答案:  1.(对象)

 (4) 通常,将软件产品从提出、实现、使用维护到停止使用退役的过程称为 【4】 。
正确答案:  1.(软件生命周期)

(5) 数据库管理系统常见的数据模型有层次模型、网状模型和 【5】 3种。
正确答案:  1.(关系模型)

(6) Visual Basic对象可以分为两类,分别为 【6】 和 【7】 。
正确答案:  1.(预定义对象) 2.(用户定义对象)

(7) 完成下面的程序,使显示结果如下图所示。
Private Sub Form_Click()
 FontSize=18
 Sample$=" 【8】 "
 x=(ScaleWidth-TextWidth(Sample$) ) /2
 y=(ScaleHeight-TextHeight(Sample$) ) /2
 CurrentX=x
 CurrentY=y
  【9】 Sample$
End Sub
正确答案:  1.(Welcome to Beijing !) 2.(Print)

(8) 下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。
Private Sub Command1_Click()
 Dim x As Single
 x=InputBox("请输入x的值!")
  【10】
  Case Is < 50
  y=0.8 * x
 Case 50 To 100
  y=0.7 * x
 【11】
  Print "输入的数据出界!"
 End Select
 Print x, y
End Sub
正确答案:  1.(Select Case x) 2.(Case Else)


(9) 改变驱动器列表框的Drive属性值将引发 【12】 事件。
正确答案:  1.(Change)

(10) 下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。
首先在窗体层定义如下变量:
Dim PaintStart As Boolean
编写如下事件过程:
Private Sub Form_Load()
 DrawWidth=2
 ForeColor=vbGreen
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
         X As Single, Y As Single)
   【13】
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _
         X As Single, Y As Single)
 If PaintStart Then
   PSet (X, Y)
 End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, _
         X As Single, Y As Single)
   【14】
End Sub
Private Sub Form_DblClick()
   【15】
End Sub
正确答案:  1.(PaintStart = True) 2.(PaintStart = False) 3.(Cls)

 

文章录入:杜斌    责任编辑:杜斌 
  • 上一篇文章:

  • 下一篇文章:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
     

    联 系 信 息
    QQ:88236621
    电话:15853773350
    E-Mail:malenurse@163.com
    免费发布招聘信息
    做中国最专业男护士门户网站
    最 新 热 门
    最 新 推 荐
    相 关 文 章
    没有相关文章
    专 题 栏 目

      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)                            【进男护士社区逛逛】
    姓 名:
    * 游客填写  ·注册用户 ·忘记密码
    主 页:

    评 分:
    1分 2分 3分 4分 5分
    评论内容:
  • 请遵守《互联网电子公告服务管理规定》及中华人民共和国其他各项有关法律法规。
  • 严禁发表危害国家安全、损害国家利益、破坏民族团结、破坏国家宗教政策、破坏社会稳定、侮辱、诽谤、教唆、淫秽等内容的评论 。
  • 用户需对自己在使用本站服务过程中的行为承担法律责任(直接或间接导致的)。
  • 本站管理员有权保留或删除评论内容。
  • 评论内容只代表网友个人观点,与本网站立场无关。