2007年9月计算机等级二级VB考前密卷三及答案

(35) 阅读下列程序：
Private Sub Command1_Click()
   Dim i As Integer, k As Integer
   k=2
   For i=1 To 3
      Print H(k) ;
    Next i
End Sub
Function H(j As Integer)
   a=0
   Static b
   a=a + 1
   b=b + 1
   H=a*b + j
End Function
程序运行后，单击命令按钮输出结果是
  A) 2 3 4    
  B) 3 4 5
  C) 5 6 7    
  D) 3 5 6
填空题：
(1) 数据结构分为逻辑结构与存储结构，线性链表属于  【1】  。
(2) 在面向对象方法中，类之间共享属性和操作的机制称为 【2】 。
(3) 耦合和内聚是评价模块独立性的两个主要标准，其中  【3】  反映了模块内各成分之间的联系。
(4) 一个项目具有一个项目主管，一个项目主管可管理多个项目，则实体"项目主管"与实体"项目"的联系属于 【4】 的联系。
(5) 数据库设计分为以下6个设计阶段：需求分析阶段、 【5】 、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。
 (6) 新建一个工程，内有两个窗体，窗体Form1上有一个命令按钮Command1，单击该按钮，Form1窗体消失，显示Form2窗体，程序如下：
Private Sub Command1_Click()
     【6】
    Form2.  【7】
End Sub
试补充完整。
(7) 用户可以用  【8】 语句定义自己的数据类型。
(8) 在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
   x=0
   Do Until x=-1
     a=InputBox("请输入第一个数字a的值")
     a=Val(A)
     b=InputBox("请输入第二个数字b的值")
     b=Val(b)
     x=InputBox("请输入第三个数字x的值")
     x=Val(x)
     a=a + b + x
   Loop
   Print a
End Sub
在程序运行后，单击命令按钮，在对话框中分别输入5，4，8，5，8，-1，输出结果为 【9】 。
(9) 当对象得到焦点时，会触发 【10】 事件，当对象失去焦点时将触发 【11】 事件。
(10) 把窗体的KeyPreView属性设置为True，并编写如下两个事件过程：
 Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   Print KeyCode
 End Sub
 Private Sub Form_KeyPress(KeyAscii As Integer)
   Print KeyAscii
 End Sub
程序运行后，如果按下B键，则在窗体上输出的数值是 【12】 和 【13】 。
(11) 在文件对话框中，假定有一个名为"fc.exe"的文件，它位于"d:＼pp"目录下，则"FileName"属性的值为 【14】 ；FileTitle属性的值为 【15】 。
一、选择题：

01-05  B  A  B  D  D

06-10  D  D  A  B  C

11-15  A  A  B  C  C

16-20  A  D  D  C  C

21-25  A  C  B  A  B

26-30  D  A  B  C  B

31-35  D  A  C  A  B
二、填空题：
(1) 存储结构
(2) 继承
(3) 内聚
(4) 一对多(1∶N)
(5) 概念设计阶段
(6) Me.Hide
    show
(7) Type语句
(8) 12
(9) GotFocus
    LostFocus
(10) 66
     98
(11) d:＼pp\fc.exe
     fc.exe