首    页

教学大纲

实施方案

教学辅导

实战练习

期末复习

信息资源

自我介绍

投稿信箱

返回主页

 

 实 战 练 习

               

                                 Visual Basic编程与应用作业3                    返回

    (本部分作业覆盖第六至八章的内容,要求第十四周以前完成。)

一、填空题

1.函数过程(Function  Pocedure)用来完成特定的功能并                   

2.子过程是                的函数。又常被称为Sub过程。在事件过程或其它子过程中可以            调用过程。

3.在事件过程或其它过程中可以           调用函数过程。

4.函数过程                 返回一个值。

5VB的代码存储在模块中。在VB中提供了三种类型的模块:              

                                 

6.菜单控件只包一个事件          ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。

    7.使用菜单编辑器创建弹出菜单时,             为不可见,“Visible属性设置为False

8Sub过程与Function过程最根本的区别是                                

9.通用过程可以通过执行“工具”菜单中的                命令来建立。

10.使用Public Const语句声明一个全局的符号常量时,该语句应放在              

    二、判断正确与错误(正确标∨,错误标 x )并写出正确答案。

1.子过程不能接收参数。(   

2.函数过程不能接收参数。(   

3.子过程不返回与其特定子过程名相关联的值。(   

4.在定义了一个函数后,可以象调用任何一个VB内部函数一样使用它,即可以在任何表达式、语句或函数中引用它。(     

5.以下两个语句都调用了名为MgProcSub过程,AB是参数。

          Call    My Proc   AB

MyProcAB

   

6.以下两个语句都调了名为YearNow)的函数

Call YearNow

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

               Sum=Sum+Multiply(I)

        Next

        Print "Sum=";Sum,

End Sub

4.用函数调用的方法计算∑n 

 

 
 

你好,我是水夜云轻  欢迎进入我的wl来作客
网站最后更新时间2004-2-22
建议用ie4.0以上,800*600分辨率全屏观看
 
飞鸿传情 myteatree@hotmail.com oicq : 199338899