VBA编程基础-常量、变量、运算符和表达式

《VBA编程基础-常量、变量、运算符和表达式》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、全国计算机等级考试Access数据库程序设计（二级）万红波烟台大学VBA编程基础常量、变量、运算符和表达式；流程控制语句；过程调用和参数传递；常用操作的实现方法；VBA的数据库编程；1.1数据类型程序的主要目的是处理各种数据，现实存在的数据是各种各样的，比如有整数、文本数据等等；在表的创建过程中，涉及到字段的数据类型，字段的数据类型决定了字段可以存储什么样的数据；字段的数据类型是Access内部的数据类型；VBA中也定义了各种数据类型，用来在程序中存放不同的数据；1.1数据类型数据类型类型标识类型说明符号数据库字段类型字节Byte字节整数Integer%字节/整数/是/否长

2、整数Long&长整数/自动编号单精度数Single!单精度数双精度数Double#双精度数货币Currency@货币字符串String$文本布尔型Boolean是/否日期型Date日期/时间变体类型Variant任何1.1数据类型-变体数据类型变体类型－除了定长字符串类型、用户自定义类型外，可以包含其他任何类型的数据；如果没有显式声明，变量的默认类型是变体类型；1.2变量变量就是存放数据的容器，在程序运行中存放数据，并且数据可以发生变化；变量的名字由字符、数字、下划线(_)构成，变量命名大小写不“敏感”；1.2变量－显式定义变量显式变量：先定义变量，后使用Dim[变量名]A

3、s[变量类型]DimiiAsInteger‘定义ii为整型变量DimsAsString*10‘定义s为定长字符串Dimt‘没有As部分，默认为Variant类型可以加入OptionExplicit语句，强制要求所有变量必须先定义后使用；1.2变量－隐式变量变量没有直接定义，借助将一个值指定给变量名的方式来建立变量；MyVar=532‘默认是Variant类型，值为532可以使用类型说明字符来指明隐含变量的类型MyVar%=23MyDouble#=23.341.2变量作用域－局部范围变量定义在模块的过程的内部PrivateSubOK_Click()DimiAsIntegeri

4、=9MsgBox"i="&iEndSub1.2变量作用域－模块范围变量定义在模块的所有过程之外的起始位置，模块的所有子过程和函数都可以使用；DimiAsIntegerPrivateSubOK_Click()i=9MsgBox"i="&iEndSub1.2变量作用域－全局范围变量定义在标准模块的所有过程之外的起始位置，用Public...As定义的变量属于全局范围；PubliciAsInteger全局范围的变量，在类模块和标准模块中都可以访问；在类模块中访问标准模块中的全局变量[标准模块名].[全局变量名]1.3数据类型之间的转换把数据转换成特定的类型函数目标类型

5、函数目标类

6、型CBoolBoolean

7、CDateDateCByteByte

8、CDblDoubleCVarVariant

9、CStrStringCIntInteger

10、CLngLongCCurCurrency

11、CSngSingleDimbbAsBooleanbb=CBool("true")1.4用户自定义数据类型可以建立包含一个或多个VBA标准数据类型的用户自定义数据类型用户自定义类型的声明，必须放在标准模块中Type[数据类型名]<域名>As<数据类型><域名>As<数据类型>........EndType1.4用户自定义数据类型－例子‘在标准模块asd中，声明用户自定义类型Publi

12、cTypeStudenttxtNoAsString*7txtNameAsStringtxtSexAsString*1txtAgeAsIntegerEndType‘在类模块中，定义用户自定义类型变量PrivateSubOK_Click()DimstuAsasd.Studentstu.txtNo="2929333"stu.txtName="张三"stu.txtSex="男"stu.txtAge=20MsgBox"stu.txtName"&stu.txtNameEndSub1.4用户自定义数据类型－例子‘在类模块中，定义用户自定义类型变量PrivateSubOK_Click()D

13、imstuAsasd.StudentWithstu.txtNo="2929333".txtName="张三".txtSex="男".txtAge=20EndWithMsgBox"stu.txtName"&stu.txtNameEndSub1.5数组数组：包含一种数据类型的一组数据Dim数组名([下标下限]to下标上限)缺省情况下，数组下标下限为0，可以使用“OptionBase1”将数组的默认下标下限由0改为1DimNewArray(10)AsIntegerNewArray(0)......NewArray(10)