VB过程及其调用ppt课件.pptx

过程 过程 VB程序是由过程组成的 每个过程是为了完成一定的任务 由一组独立的程序代码组成 VB分为两类过程1 事件过程2 通用过程 过程 通用过程 事件过程 Function过程 sub过程 拓展 Val函数 变量的作用域模块的作用域 重点 能够自定义sub过程和function过程 能够根据需要自由调用两个过程 事件过程 事件过程 事件过程为响应由用户操作或程序中的引发的事件而执行的SUB过程 它附加在窗体和事件上 1 事件过程 事件过程的格式 private publicsub控件名 事件名 参数列表 EndSubeg privatesubcommand click 点击事件 print hello EndSub 1 事件过程 注意事项 1 事件过程只能放在窗体模块中 2 为处理事件而编写的程序过程 3 可以通过双击对象 然后在代码视图下选择相应的事件的方法来自动生成事件过程 通用过程 当多个不同的事件过程需要执行一段相同的代码 为了避免代码的重复 把这段代码独立出来 作为一个过程 这样的过程称为通用过程 可见 通用过程是多个事件过程的 相同之处 公共部分 通用过程的主要类型 1 SUB过程 执行操作但并不将值返回给调用代码 2 fuction过程 将值返回给调用代码 2 自定义sub过程 定义格式如下 public privatesub过程名 形式参数aasinteger exitsubeg publicsubprintf1 print hellovb Endsub 2 自定义sub过程 说明 1 public和private表明SUB过程的有效范围 public的有效范围是整个工程 private的有效范围是当前模块 默认为private 2 过程必须以EndSUB结束 3 exitsub可以强制退出过程 4 VB中所有过程都是并列关系 不允许在一个过程内部定义另外一个过程 即不能嵌套定义 过程的作用域 因为在VB中代码是模块化的 所以不同的模块就需要不同的过程 过程是有作用域的 模块级过程是在某个模块内定义的过程 在定义sub过程和Function过程时选择Private关键字 该过程仅限于本模块中调用 窗体模块 类模块 全局级过程又称工程级过程 是指在定义sub过程和Function过程时选择Public关键字或缺省选择 作用域为整个工程 可被该工程中的所有过程调用 变量的作用域 1 过程变量2 模块级变量3 全局变量 1 过程变量 过程变量也称为局部变量 过程变量在过程内部用dim或者static关键字申明 只能在过程内部使用 publicsubsong dimliangasdouble 过程变量 相当于方法体内部定义的变量 endsub 2 模块级变量 模块级变量 通过Dim关键字或者private关键字在窗体模块或者标准模块的声明部分定义的变量称之为模块级变量 定义格式为dimaasdouble其实就相当于在所有过程外面 窗体作用范围内 通用声明里面 3 全局变量 全局变量 作用在整个工程是在窗体或者标准化模块的顶部声明部分用public关键字声明的变量 全局变量的定义格式为publicnasinteger同一工程中的其他窗体都可以使用 sub过程的调用 sub过程有两种等价的调用方式1 call过程名 参数 声明 2 过程名 参数1 参数2 参数3 不加括号也对 有call必须加 PrivateSubForm Activate printf13 第一种调用方法Callprintf1 3 第二种调用方法EndSub PublicSubprintf1 aasdouble PrintaEndSub Function function可以返回一个值 可以像系统函数一样直接用在表达式中 定义格式 public privateFunction过程名 参数列 as类型exitFunction过程名 返回函数的值Endfunction fuction过程的调用 function过程的调用和sub过程类似call 函数名 参数1 参数2 函数名 参数1 参数2 参数3 不加括号也对 有call必须加 sub过程和function过程的区别 sub过程和function过程的主要区别是 function过程有返回值 有数据类型 即返回值的类型 返回值也可成为表达式的一部分 VB进制与字符转换类函数 val Val函数 返回包含于字符串内的数字 字符串中是一个适当类型的数值 语法 Val string 必要的string参数可以是任何有效的字符串表达式 ega val 1234 返回值是1234a val 2347 返回值是2347a val 24and57 返回值是24a val sdf23and34 返回值是0 实例 分别定义function过程和sub过程求一个矩形的面积和周长 求周长privatesubzc lenthasdouble widthasdouble c lenth width 2endsub求面积privatefunctionarea lenthasdouble widthasdouble asdoubles lenth widthendsub 总结 过程 通用过程 事件