一、填空题 
1．函数过程（Function  Pocedure）用来完成特定的功能并____。
2．子过程是____的函数。又常被称为Sub过程。在事件过程或其它子过程中可以____调用过程。
3．在事件过程或其它过程中可以____调用函数过程。
4．函数过程____返回一个值。
5．VB的代码存储在模块中。在VB中提供了三种类型的模块：____ 、____和____。
6．菜单控件只包一个事件____，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
7．使用菜单编辑器创建弹出菜单时，____为不可见，“Visible属性设置为False。
8．Sub过程与Function过程最根本的区别是____。
9．通用过程可以通过执行“工具”菜单中的____命令来建立。
10．使用Public Const语句声明一个全局的符号常量时，该语句应放在____ 。 
    二、判断正确与错误（正确标∨，错误标 x ）并写出正确答案。 
1．子过程不能接收参数。（    ）
2．函数过程不能接收参数。（    ）
3．子过程不返回与其特定子过程名相关联的值。（    ）
4．在定义了一个函数后，可以象调用任何一个VB内部函数一样使用它，即可以在任何表达式、语句或函数中引用它。（      ）
5．以下两个语句都调用了名为MgProc的Sub过程，A、B是参数。
          Call    My Proc   A、B
MyProc（A、B）
（    ）
6．以下两个语句都调了名为Year（Now）的函数
Call Year（Now）
Year Now
（    ）
7．标准模块是程序中的一个独立容器，包含全局变量、Function（函数）过程和Sub过程，包含对象或属性设置。（    ）
     三、问答题 
1．什么是工程？
2．什么是过程？
3．选中一个窗体，启动菜单编辑器的方法有哪三种？
4．什么是动态菜单？
5．已知弹出菜单的名是aa，填补弹出菜单的代码。
6．现使用菜单编辑器设计弹出菜单。菜单第一项（使顶级菜单项目）的Caption为“弹出菜单”，Name：“aa”，Visible没有选中，填补弹出菜单的代码。
四、编程题 
1．编写一个过程，以整型数作为形参，当该参数为奇数时输出False，而当该参数为偶数时输出True。
2．分析下面程序运行的结果。
Private Function Multiply (n as Integer) As Integer
            Multiply=1
            do While n>0
                   Multiply=Multiply*n
                   n=n-1
            Loop
End Function
  
Private Sub Form_Click()
            Dim Sum As Integer, I As Integer
            For I=5 to 1 Step-1
                   Sum=Sum+Multiply(I)
            Next
            Print "Sum=";Sum,
End Sub
3．分析下面程序运行的结果。
Private Function Multiply (ByVal n as Integer) As Integer
        Multiply=1
        do While n>0
               Multiply=Multiply*n
               n=n-1
        Loop
End Function
  
Private Sub Form_Click()
        Dim Sum As Integer, I As Integer
        For I=5 to 1 Step-1