VB过程及其调用

其实就相当于在所有过程外面，窗体作用范围内， 通用声明里面！
感谢下载
14
3：全局变量
•全局变量：作用在整个工程是在窗体或者标准化模 块的顶部声明部分用public关键字声明的变量，全 局变量的定义格式为
public n as integer
同一工程中的其他窗体都可以使用！
感谢下载
15
sub过程的调用
public sub song（） dim liang as double '过程变量 （相当于方法体内部定义的变量）
end sub
感谢下载
13
2：模块级变量
模块级变量：通过Dim 关键字或者private关键字在 窗体模块或者标准模块的声明部分定义的变量称之 为模块级变量，定义格式为
dim a as double
过 程
感谢下载
1
百度文库程
VB程序是由过程组成的，每个过程是为了完 成一定的任务，由一组独立的程序代码组成。
VB分为两类过程
1：事件过程
2：通用过程
感谢下载
2
过
通用过程
程
事件过程
Function过程 sub过程
拓展：
Val函数 变量的作用域 模块的作用域
重点：能够自定义
sub过程和function过 程，能够根据需要自 由调用两个过程！
感谢下载
5
1:事件过程
注意事项：
（1） ：事件过程只能放在窗体模块中
（2）：<语句组>为处理事件而编写的程序过 程
（3）：可以通过双击对象，然后在代码视图 下选择相应的事件的方法来自动生成事件过 程。
感谢下载
6
通用过程
当多个不同的事件过程需要执行 一段相同的代码，为了避免代码 的重复，把这段代码独立出来， 作为一个过程，这样的过程称为 通用过程。可见，通用过程是多 个事件过程的，相同之处、公共 部分。
Print a End Sub
感谢下载
16
Function
function 可以返回一个值，可以像系统函数一样直 接用在表达式中！ 定义格式： public |private Function过程名（参数列）as 类型 <语句块> exit Function <语句块>过程名=.......'返回函数的值 End function
感谢下载
7
通用过程的主要类型
1：SUB过程（执行操作但并不 将值返回给调用代码）
2：fuction过程（将值返回给调 用代码）
感谢下载
8
2：自定义sub过程
定义格式如下： public|private sub 过程名（形式参数 a as integer） <语句块>> exit sub <语句块>
sub过程有两种等价的调用方式
1：call 过程名（参数） 声明：
2：过程名 （参数1，参数2，参数3）Public
不加括号也对，有call必须加！ Private Sub Form_Activate() printf1 3 '第一种调用方法
Sub printf1(a as double)
Call printf1(3)第二种调用方法 End Sub
eg:public sub printf1() print "hello vb" End sub
感谢下载
9
2：自定义sub过程
说明： （1）public和private表明SUB过程的有效范围， public的有效范围是整个工程，private的有效范围 是当前模块，默认为private
（2）过程必须以End SUB 结束
感谢下载
17
fuction过程的调用
function过程的调用和sub 过程类似
call +函数名（参数1，参数2） 函数名（参数1，参数2，参数3） 不加括号也对，有call必须加！
感谢下载
18
sub过程和function过程的区别
sub过程和function过程的 主要区别是：function过 程有返回值，有数据类型， 即返回值的类型，返回值 也可成为表达式的一部分！
感谢下载
3
事件过程
事件过程：事件过程为响应由
用户操作或程序中的引发的事件 而执行的SUB 过程，它附加在 窗体和事件上！
感谢下载
4
1：事件过程
事件过程的格式： private|public sub 控件名_事件名(参数列表) <语句组> End Sub
eg:private sub command_click()(点击事件） print "hello" End Sub
全局级过程又称工程级过程，是指在定义sub过程 和Function过程时选择Public关键字或缺省选择， 作用域为整个工程，可被该工程中的所有过程调用。
感谢下载
11
• 1：过程变量
变量的作用域
• 2：模块级变量
• 3：全局变量
感谢下载
12
1：过程变量
•过程变量也称为局部变量，过程变量在过程内部用 dim或者static关键字申明，只能在过程内部使用！
a=val("sdf23and34) 返回值是0
感谢下载
20
实例：
分别定义function过程和sub过程求 一个矩形的面积和周长！
感谢下载
21
求周长 private sub zc(lenth as double,width as double ) c=(lenth+width)*2 end sub 求面积 private function area(lenth as double,width as double) as double s=lenth*width end sub
感谢下载
19
VB进制与字符转换类函数（val）
Val函数：返回包含于字符串内的数字，字符
串中是一个适当类型的数值。
语法：Val(string）：必要的string参数可以 是任何有效的字符串表达式！
eg a=val("1234")
返回值是1234
a=val("2 34 7") 返回值是2347
a=val(" 24 and 57") 返回值是24
（3）exit sub可以强制退出过程
（4）VB 中所有过程都是并列关系，不允许在一个 过程内部定义 另外一个过程，即不能嵌套定义
感谢下载
10
过程的作用域
因为在VB中代码是模块化的，所以不同的模块就需 要不同的过程，过程是有作用域的。
模块级过程是在某个模块内定义的过程，在定义 sub过程和Function过程时选择Private关键字，该 过程仅限于本模块中调用。（窗体模块，类模块）