月计算机二级VB模拟试题10及答案

1、2007年9月计算机二级VB模拟试题(10)及答案一 、选择题(1) 循环链表的主要优点是A) 不再需要头指针了B) 从表中任一结点出发都能访问到整个链表C) 在进行插入、删除运算时，能更好的保证链表不断开D) 已知某个结点的位置后，能够容易的找到它的直接前件 正确答案:  B (2) 栈底至栈顶依次存放元素A、B、C、D，在第五个元素E入栈前，栈中元素可以出栈，则出栈序列可能是A) ABCED      B) DCBEAC) DBCEA      D) CDABE

2、  正确答案:  B (3) n个顶点的强连通图的边数至少有A) n-1       B) n(n-1) C) n        D) n+1 正确答案:  C (4) 在结构化程序设计思想提出之前，在程序设计中曾强调程序的效率，现在，与程序的效率相比，人们更重视程序的A) 安全性      B) 一致性  C) 可理解性  &

3、#160;   D) 合理性 正确答案:  C (5) 模块独立性是软件模块化所提出的要求，衡量模块独立性的度量标准则是模块的A) 抽象和信息隐蔽     B) 局部化和封装化C) 内聚性和耦合性     D) 激活机制和控制方法 正确答案:  C (6) 软件开发的结构化生命周期方法将软件生命周期划分成A) 定义、开发、运行维护B) 设计阶段、编程阶段、测试阶段C) 总体设计、详细设计、编程调试D) 需求分析、功能定义、系统设计 正确答案:  A (7)

4、 在软件工程中，白箱测试法可用于测试程序的内部结构。此方法将程序看做是 A) 路径的集合      B) 循环的集合C) 目标的集合      D) 地址的集合 正确答案:  A (8) 在数据管理技术发展过程中，文件系统与数据库系统的主要区别是数据库系统具有A) 特定的数据模型    B) 数据无冗余C) 数据可共享     D) 专门的数据管理软件 正确答案:  A (9) 数据库设

5、计包括两个方面的设计内容，它们是A) 概念设计和逻辑设计   B) 模式设计和内模式设计C) 内模式设计和物理设计   D) 结构特性设计和行为特性设计 正确答案:  A (10) 实体是信息世界中广泛使用的一个术语，它用于表示A) 有生命的事物     B) 无生命的事物C) 实际存在的事物     D) 一切事物 正确答案:  C (11) 在Visual Basic中，被称为对象的是A) 窗体  &#

6、160;    B) 控件C) 控件和窗体     D) 窗体、控件和属性 正确答案:  C (12) Visual Basic标题栏上显示了应用程序的A) 大小       B) 状态C) 位置       D) 名称 正确答案:  D (13) 对下列程序段，说法正确的是Text1.Top=2000Text1.Left=800A) Text1对

7、象的左边界距窗体的左边界是800twip，上边界距窗体的上边界为2000twipB) Text1对象的左边界距屏幕的左边界为800twip，上边界距屏幕的上边界为2000twipC) Text1对象的宽度为2000twip，高度为800twipD) Text1对象的高度为800点，宽度为2000点 正确答案:  A (14) 用于显示输入输出文本的控件是A)   和       B)   和  C)   和     

8、  D)   和  正确答案:  A (15) 下列操作可以打开立即窗口的是A) Ctrl+D      B) Ctrl+FC) Ctrl+G      D) Ctrl+E 正确答案:  C  (16) 有变量定义语句Dim max, min As String，则可以知道max的类型是A) 变体类型      B) 单精度型C) 双精度

9、型      D) 字符串型 正确答案:  A (17) 表达式3 2 Mod 14 2 3的值是A) 1        B) 0C) 2        D) 3 正确答案:  B (18) 在窗体上有一个命令按钮，然后编写如下事件过程Private Sub Commandl_cickc()    a=InputBox("ent

10、er the first integer")    b=InputBox("enter the second integer")    Print b + aEnd Sub程序运行后，单击命令按钮，先后在两个输入框中分别输入"2"和"6"，则输出结果为A) 2        B) 62C) 8        D) 26 正确答案

11、:  B (19) 在属性窗口中设置何属性，可以把指定的图形放入当前对象中?A) CurrentY      B) PictureC) CurrentX      D) Stretch 正确答案:  B  (20) 在窗体上添加标签控件Label1之后，标签控件的默认的名称Name是A) Label       B) Label1C) Text   

12、;    D) Text1 正确答案:  B (21) 当组合框的Style属性设置为何值时，组合框称为下拉式列表框A) 0        B) 1C) 2        D) 3 正确答案:  C (22) 下列程序段的执行的结果是Dim a(10) , b(10) i=3For j=1 To 5   a(j) =j   b(i) =2

13、 i + jNext jPrint b(i) ; a(i) A) 113       B) 315C) 311       D) 153 正确答案:  A (23) 对窗体编写如下事件过程：Option Base 1Private Sub Form_KeyPress(KeyAscii As Integer)    arr=Array(12, 15, 18, 20, 24)    m1=arr(1) 

14、0;  m2=1   If KeyAscii=12 Then   For i=2 To 5      If arr(i) > m1 Then          m1=arr(i)           m2=i      End If  

15、0;  Next i   End If   Print m1   Print m2End Sub程序运行之后按回车键，输出结果为A) 12          1     B) 20   2C) 18          5     

16、  D) 24    12 正确答案:  A (24) 在以下事件过程中，可以在用户按下鼠标右键时，显示一个上边框，以鼠标当前位置为中心的弹出式菜单，而且这个弹出式菜单还可以识别右键对菜单命令的选择，相应的选项是A) Private Sub Form_MouseUp(Button As Integer, Shift As Integer, _         X As Single, Y As Single)     

17、; If Button=2 Then       PopupMenu mnuEdit, vbPopupMenuCenterAlign Or _          vbPopupMenuRightButton, X, Y, mnuEditOpen      End If   End SubB) Private Sub Form_MouseUp(Button As Integer,

18、 Shift As Integer, _         X As Single, Y As Single)        If Button=2 Then         PopupMenu mnuEdit,        End If  End SubC) Private Sub Form_MouseUp

19、(Button As Integer, Shift As Integer, _         X As Single, Y As Single)      PopupMenu mnuEdit, vbPopupMenuCenterAlign Or _       vbPopupMenuRightButton End SubD) Private Sub Form_MouseUp(Button As Integ

20、er , _         Shift As Integer, X As Single, Y As Single)    If Button=2 Then           PopupMenu mnuEdit, 2     End If   End Sub 正确答案:  A (25) 为了通过键盘访问主菜单项，可在菜单编辑器

21、的"标题"选项中的某个字母前插入何字符，建立热键字母?A) &        B) #C) *        D) $ 正确答案:  A (26) 下列程序段的执行结果为Dim t(10) For k=2 To 10   t(k) =11 - kNext kx=6Print t(2 + t(x) ) A) 2      

22、  B) 3C) 4        D) 5 正确答案:  C (27) 下列程序的执行结果为a=10b=20If a <> b Then a=a + b Else b=b - aPrint a, bA) 2020       B) 3020C) 3040       D) 1515 正确答案:  B (28) 对话框在关闭之

23、前，不能继续执行其他操作，这种对话框属于A) 输入对话框     B) 输出对话框C) 模式(模态) 对话框    D) 无模式对话框 正确答案:  C (29) 下面叙述不正确的是A) 对顺序文件中的数据操作只能按一定的顺序操作B) 顺序文件结构简单C) 顺序文件的数据以字符(ASCII码) 形式存储D) 能同时对顺序文件进行读写操作 正确答案:  D (30) 当双击窗体Form1时，要将窗体Form1隐藏起来、将窗体Form2以模式方式显示出来的事件过程，正确的是A) Priva

24、te Sub Form_DblClick()      Form1.Hide     Form2.Show 0  End SubB) Private Sub Form_DblClick()      Form1.Hide     Form2.Show 1   End SubC) Private Sub Form_Click()      Form1.Hide 

25、;    Form2.Show  End SubD) Private Sub Form_DblClick()      Form1.Enabled=False     Form2.Enabled=True  End Sub 正确答案:  B (31) 有如下函数过程：Function HFC(ByVal x As Integer, ByVal y As Integer) As Integer   Do While y <>

26、0     sic=x / y     x=y     y=sic   Loop   HFC=xEnd Function以下是该函数的调用过程，该程序的运行结果是Private Sub Command1_Click()    Dim a As Integer   Dim b As Integer   a=12   b=2   x=HFC(

27、a, b)    Print xEnd SubA) 0        B) 6C) 2        D) 80 正确答案:  B (32) 有如下事件过程：Sub ABD(x%, y%, z%)    z%=x% + y%End SubPrivate Sub Command1_Click()    a%=30: b%=40   Call ABD(

28、a%, b%, c%)    Print c%End Sub运行上面的程序，单击命令按钮，输出结果为A) 70       B) 70.0C) 7.0E+1      D) 显示错误信息 正确答案:  A (33) 如下事件过程：Function Feed(x)    If x < 10 Then     Feed=x   Else 

29、0;   Feed=10 + xEnd IfEnd FunctionPrivate Sub Command1_Click()    x=Val(InputBox("", , 0) )    pay=Feed(x)    Print payEnd Sub运行时在输入框内输入变量x的值为15，输出结果为A) 0        B) 15C) 25      &#

30、160;D) 30 正确答案:  C (34) 在窗体上画一个命令按钮，然后编写如下事件过程：Sub BTC(oldCopy() As Integer, newCopy() As Integer)    Dim i As Integer   For i=LBound(oldCopy() ) To UBound(oldCopy() )      newCopy(i) =oldCopy(i)    Next iEnd SubPrivate Sub Command1_Click() 

31、0;  Dim m(10) As Integer, n(10) As Integer   For i=1 To 10      m(i) =i i   Next i   Call BTC(m, n)    Print n(5) End Sub程序运行后，单击命令按钮输出结果为A) 0        B) 2C) 10     &

32、#160; D) 25 正确答案:  D (35) 在窗体上画一个命令按钮，然后写出如下事件过程：Private Sub Command1_Click()    s=1   Do      s=(s + 1) (s + 2)      Number=Number + 1   Loop Until s >=6   Print Number, sEnd Sub程序运行后，输出的结果是A) 23 

33、      B) 318C) 18       D) 1020 正确答案:  C 二 、填空题(1) 常用的黑箱测试有等价分类法、 【1】 、因果图法和错误推测法4种。正确答案:  1.(边值分析法) (2) 测试的目的是暴露错误，评价程序的可靠性；而 【2】 的目的是发现错误的位置并改正错误。正确答案:  1.(调试) (3) 软件维护活动包括以下几类：改正性维护、适应性维护、 【3】 维护和预防性维护。正确答案:  1.(

34、完善性) (4) 在面向对象的设计中，用来请求对象执行某一处理或回答某些信息的要求称为 【4】 。正确答案:  1.(消息) (5) 关键字ASC和DESC分别表示 【5】 的含义。 正确答案:  1.(升序排列和降序排列) (6) 下述语句段在运行时的显示结果是 【6】 。Clsx=10.34 + 8Print Len(x) 正确答案:  1.(5) (7) 窗体上有两个按钮，则执行程序后按键盘Cance1键的输出结果是 【7】 。Private Sub Command1_Click()    Print "北京"End

35、SubPrivate Sub Command2_Click()    Print "南京"End SubPrivate Sub Form_Load()    Command2.Cancel=True   Command1.Cancel=TrueEnd Sub 正确答案:  1.(北京) (8) 下列事件过程的功能是：通过Form_Load事件给数组赋初值为35、48、15、22、67，Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填入适当的内容，将程序补充完整。Dim Arr()

36、 Private Sub Form_Load()     【8】 End SubPrivate Sub Form_Click()    【9】      If Int(x / 3) =x / 3 Then        Print x     End If   Next xEnd Sub 正确答案:  1.(Arr = Array(35, 48, 15, 2

37、2, 67) 2.(For Each x In Arr) (9) 给定年份，下列程序用来判断该年是否是闰年，请填空。Sub YN()     Dim x As Integer    x=InputBox("请输入年号")     If (x Mod 4=0 【10】 x Mod 100 <> 0) 【11】 (x Mod 400=0) Then      Print "是闰年"Else 

38、0;   Print "不是闰年，是普通年份"   End IfEnd Sub 正确答案:  1.(And) 2.(Or) (10) 在E盘当前目录文件夹下建立一个名为"Student.txt"的顺序文件，要求用InputBox函数输入5个学生的姓名(StuName) 、年级(StuGrade) 和年龄(StuAge) 。 Private Sub Form_Click()     【12】    For i=1 To 5      StuName=InputBox("请输入姓名")       StuGrade=InputBox("请输入年级号")       StuAge=InputBox("请输入年龄"