一、填空题 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