第8章 模块与vba编程基础02.pptVIP

第八章02 8.3变量与常量 变量是指程序运行时值会发生变化的数据,变量名不能包含空格或除下划线字符(_)外的任何标点符号,长度不超过255个字符. 常量是在程序中可以直接引用的实际值,其值在程序运行中不变.VBA中有3种常量:直接常量、符号常量和系统常量. 一、变量的声明 变量声明就是定义变量的名称及类型,使系统为变量分配存储空间,VBA声明变量有两种:显式声明和隐含声明 1、显式声明 格式:dim …[asvartype] 如: dim newvar_1 as integer ‘newva为整型变量 dim newvar_2%,sum! ‘newvar_2为整型变量,sum为单精度型变量 dim newvar_2%,sum! 相当于dim newvar_2 as integer,sum as single 2、隐含声明 格式:dim… 默认为variant变体数据类型 如:dim m,n ‘m、n为变体variant变量 Newvar=528 ‘newvar 为variant类型变量,值是528 二、强制声明 模块设计窗口的顶部”通用-声明”区域中加入语句: Option explicit 强制要求所有变量必须定义才能使用. 工具?选项?要求变量声明. 三、变量的作用域 1、局部范围(local) 变量定义在模块的过程内部,过程代码执行时才可见,在子过程或函数过程中定义的或直接使用的变量作用范围都是局部的. 2、模块范围(module) 变量定义在模块的所有过程之外的起始位置,运行时在模块所包含的所有子过程和函数过程中可见. 3、全局范围(public) 变量定义在模块的所有过程之外的起始位置,运行时在所有类模块和标准模块的所有子程序与函数过程中可见. 四、数据库对象变量 ACCESS中窗体与报表对象的引用格式为: Forms!窗体名称!控件名称[.属性名称] 或reports!窗体名称!控件名称[.属性名称] 注:感叹号!分隔开对象名称和控件,属性名缺省则为控件基本属性. 例:含有学生编号信息的文本框操作: Forms!学生管理!编号=“980306” Forms!学生管理![编 号]=“980306” ‘对象名称含空格时用[] 例:dim txtname as control ‘定义控件类型变量 Set txtname=forms!学生管理!姓名 ‘指定引用窗体控件对象 Txtname=“冯伟” ‘操作对象变量 五、数组 定义数组格式: Dim 数组名([下标下限 to ] 下标上限) 例:dim newarray(10) as integer 定义11个整型数构成的数组,数组元素的个数从newarray(0) 至newarray(10) dim newarray(1 to 10) as integer 定义10个整型数构成的数组,数组元素的个数从newarray(1) 至newarray(10) 注:vb也支持多维数组可以在数组下标中加入多个数值,并用逗号分开 最多可定义60维 例:定义三维数组NEWARRAY Dim newarray(5,5,5) as integer ‘有6*6*6=216个元素 六、变量标识命名法则 七、符号常量 格式: const 符号常量名称=常量值 例: const pi=3.14159 定义符号常量PI 注:const 前加 global 或public 关键字可以限定符号常量含概全局或模块级的范围 global const pi=3.14159 八、系统常量 ACCESS系统内部包含有若干个启动时就自动建立的系统常量,有true,false,yes,no,on,off,null等 视图菜单?对象浏览器 可查看并直接使用 8.3.5常用标准函数 一、算术函数 1、绝对值函数: abs(表达式) 2、向下取整函数: int(表达式) 注:参数为负值时返回小于等于参数值的第一个负数 Sub proce1() Dim intcount intcount = -6.8 Debug.Print Int(intcount) End Sub 3、取整函数:fix(表达式) 返回数值表达式的整数部分,参数为负值时返回大于等于参数值的第一个负数 4、四舍五入函数:round(数值表达式[,表达式) 5、开平方函数:sqr(数值表达式) 6、产生随机数函数:rnd(数值表达式) 产生0-1之间的随机数 如:int(100*rnd) ‘产生[0,99]的随机整数 int(101*rnd) ‘产生[0,100]的随机整数 int(100*rnd+1) ‘产生[1,100]的随机整数 int(100+