posts - 5, comments - 2, trackbacks - 0, articles - 0
  C++博客 :: 首页 :: 新随笔 :: 联系 :: 聚合  :: 管理

VBA语法(上)

Posted on 2007-07-21 19:46 Eagle 阅读(1018) 评论(1)  编辑 收藏 引用
- - - - - - - - - - - - - - - - - -
VBA语法基础(上)
- - - - - - - - - - - - - - - - - -
数据类型
“数据类型”是指如何将数据存储在内存中。
(1)Boolean
表示逻辑数据,可以是True或False中的任一个值。占用2字节的存储空间,取值范围为True或False,缺省值为False。
(2)Byte
只能表示正数。占用1字节的存储空间,取值范围为0-255,缺省值为0。
(3)Currency
一种保存货币值数据的特殊数字格式。占用8字节的存储空间,取值范围为-922337203685477.5808-922337203685477.5807,缺省值为0。
(4)Date
一种用于表示日期或时间的专用格式。占用8字节的存储空间,取值范围为100年1月1日——9999年12月31日,缺省值为00:00:00。(有关在VBA中使用日期和时间的详细介绍请见后面的一系列文章。)
(5)Decimal
一种包含以10的幂为刻度的十进制数的变体子类型,只能通过CDec转换函数创建,不是一种独立的数据类型。占用14字节的存储空间,取值范围为±79228162514264337593543950335(不带小数点)或±7.9228162514264337593543950335(带28位小数点),缺省值为0。
(Decimal数据类型是在Excel 2000中引入的,在以前的版本中不能使用这种数据类型。该数据类型非常特殊,因为不能实际声明它,它是Variant的子类型,必须使用CDec函数将一个变量转换为Decimal数据类型)
(6)Double
存储双精度浮点数,占用8字节的存储空间,取值范围为负值:-1.79769313486232E308——4.94065645841247E-324,正值:1.79769313486232E308——4.94065645841247E-324,缺省值为0。
(7)Integer
表示从-32768-32767之间的整数,其中一位表示符号,占用2字节的存储空间,缺省值为0。
(8)Long
表示存储为4个字节空间的带符号的数,其中一位表示符号,取值范围为-2147483648-2147483647,缺省值为0。
(9)Object
包含对某个对象的引用(地址),占用4字节的存储空间,可对任何对象引用,缺省值为Nothing。
(10)Single
表示分数、带小数位或指数的数值等单精度数,占用4字节的存储空间,取值范围为负值:-3.402823E38——1.401298E-45,正值:1.401298E-45——3.402823E38,缺省值为0。
(11)String
可声明定长和变长的String数据类型。其中,定长的String数据类型占用的存储空间为字符串的长度,取值范围为1——65400个字符,缺省值等于该字符串长度的空格数。变长的String数据类型能动态地加长或缩短以存储要求的字符串数,占用的存储空间为10字节加上字符串的长度,取值范围为0——20亿个字符,缺省值为零长字符串(“”)。(有关String数据类型及处理和操作字符串数据的VBA内置函数的详细介绍请见后面的一系列文章。)
(12)Variant
Variant字符串类型的存储空间为22字节加上字符串的长度,其取值范围与变长字符串数据类型的取值范围相同,缺省值为Empty。
Variant数字型的存储空间为16字节,其取值范围与Double数据类型的取值范围相同,缺省值为Empty。
(有关Variant数据类型的进一步介绍见后面的一系列文章。)
(13)用户自定义类型
允许用户创建一种特殊的数据类型,这种数据类型由VBA的内部数据类型、数组、对象或其他用户定义类型组成,其存储空间为各个组成部分的存储空间的总和,取值范围与各个组成部分的数据类型的取值范围一致,缺省值为各个组成部分的缺省值。(有关用户自定义类型的进一步介绍请见后面的一系列文章。)
各数据类型之间也可以相互转换。(有关数据类型转换的详细介绍请见后面的一系列文章)
(有关数字数据类型(Byte、Integer、Long、Single、Double、Currency、Decimal、Variant)及相应的VBA内置函数的详细介绍请见后面的一系列文章。)
- - - - - - - - - - - - - - - - - -
常量(数)
常量即在程序执行过程中不发生改变的值或字符串。
使用Const语句声明常量。如:
Const Rate=0.25
Const NumMonths As Integer=12
Public Const myName As String=”BabyPig”
而最后一个语句声明了一个公共常量,应放在模块中所有过程之前声明。
VBA自身包含有许多内置常数,它们的值都是VBA预先定义好的,使用内部常数时无需定义这些常数的值。
■ 几个特殊的常数
由于有好几种不相同的“无效值”常数,VBA语言提供了好几种方法,以检验某个变量是否为empty或null值,或者设置某个变量为empty或null值。
(1) vbNull
和VarType函数一起使用,用于确定变量是否包含null。
(2) vbNullChar
赋值或检测null字符,null字符的值为Chr(0),即vbNullChar常数相当于将变量赋值为Chr(0),可用于检测变量,确定它的值是否是一个null字符。
(3) vbNullString
赋值或检测零长(空)字符串。
(4) Null关键字
将null值赋给variant变量后,可以通过调用IsNull函数来检测变量是否是Null值。
(5) vbEmpty
检测某个variant变量是否初始化。
(6) Nothing关键字
只能和对象变量一起使用,以确定变量是否具有有效的对象引用,此外,Nothing关键字还可以用于销毁当前的对象引用。
(关于常量的介绍还可见《ExcelVBA编程系列之数据类型(1):常量》)
- - - - - - - - - - - - - - - - - -
变量
变量的主要作用是存取数据、提供了数据存放信息的容器。根据变量的作用域不同,可分为局部变量、全局变量,见后面的变量(常量)作用域和生存期介绍。
变量命名要注意以下几点:
1、有效性。变量以字母开头,中间可以出现数字和一些标点符号,除下划线( _ )作为连字符外,变量名称不能有空格、加号(+)、减号(-)、逗号(,)、句点(.)等符号。
2、VBA不区分大小写。但在变量命名时,最好体现该变量的作用
3、不能使用VBA中的关键字作为变量。
4、变量名称中不能有特殊类型的声明字符(#、$、%、&或!)。
5、变量名称最多可以包含254个字符。
(有关VBA的命名规则的详细介绍请见后面的一系列文章)
- - - - - - - - - - - - - - - - - -
声明变量
其语法为:
Dim <变量名> As <数据类型>
或:Private <变量名> As <数据类型>
或:Public <变量名> As <数据类型>
可以在一行中声明多个变量,每个变量之间用逗号分隔开。
还有一种声明变量的方法是,将一个字符加在变量名称后面,从而声明变量的数据类型。如
Dim MyVar%
表示将变量MyVar声明为整型。一些类型声明符为:
数据类型        类型声明字符
Integer            %
Long               &
Single             !
Double           #
Currency       @
String             $
在模块前加入Option Explicit语句,将强制声明所使用的所有变量。
- - - - - - - - - - - - - - - - - -
对象变量
在使用对象模型的属性、方法和事件之前,必须创建一个对包含所需属性、方法和事件的类的引用。可以先声明一个局部对象变量以存储该对象引用,然后把对象引用赋给该局部变量。
声明对象变量的方法和声明其他类型的变量基本上一样。有三种声明对象变量的方法:
(1) Dim myObject As <库名>.<类名>
此方法指向类的类型库,但没有给该变量赋予任何类的实例。此时,变量myObject被赋值为Nothing。若要用这种方式引用类,就必须利用“引用”对话框向工程添加一个对类模块的引用。若要将类的实例引用赋予该变量,必须在使用该变量之前用Set语句赋值。如:
Set myObject=<库名>.<类名>
(2) Dim myObject As New <库名>.<类名>
此方法将类的新实例引用赋给Object变量。同样,要用这种方式引用类,必须先利用“引用”对话框向工程添加一个对类模块的引用。
(3) Dim myObject As Object
此方法将myObject变量声明为一般的Object数据类型,这在不能预先知道要创建的对象的数据类型时十分有用。此时,Object变量被赋值为Nothing。若要将对象引用赋值给该变量,必须使用CreateObject函数或GetObject函数。
可以用Private或Public语句替换Dim语句,且对象变量的作用域规则和其他类型的变量一样。
声明对象变量可以显著地简化代码且加快代码的执行速度。
有关对象模型的基础知识见ExcelVBA编程系列之对象模型(2):初步理解和使用Excel对象模型一文。
- - - - - - - - - - - - - - - - - -
集合(Collection)对象
集合对象是其他对象的一个容器。
一般有四个方法:
(1) Add方法
添加一项到集合中。除了可以指定数据外还可以指定键值,通过键值可以访问集合中的成员。
(2) Count方法
返回集合中的项的个数。
(3) Item方法
通过集合中的索引(即集合中项的序号)或键(假设该项添加到集合时指定了)检索集合中的成员。
(4) Remove方法
通过集合中的索引或键删除集合中的成员。
可以使用With…End With构造和For Each … Next构造很方便地处理对象和集合,其介绍可参见ExcelVBA编程系列之对象模型(2):初步理解和使用Excel对象模型一文。
- - - - - - - - - - - - - - - - - -
运算符
运算符是用于完成操作的一系列符号,包括算术运算符、比较运算符、逻辑运算符、字符串运算符等。可用于连接一个或多个语言元素,或者完成一些运算以形成一个表达式。
- - - - - - - - - - - - - - - - - -
表达式
表达式就是变量、常量、运算符的集合,可分为算术表达式、字符串表达式、赋值表达式、布尔表达式等
详细的内容请见VBA编程系列:运算符和表达式
- - - - - - - - - - - - - - - - - -
数组
数组是一组拥有相同名称同类元素。定义数组后,即创建了数组。数组中单个的数据项称为数组元素,用于访问数组元素的编号称为数组索引号,最小索引号和最大索引号称为边界。
在VBA中,根据数组元素是否变化,分为固定大小的数组和动态数组,根据数组的维数又可分为一维数组和多维数组。
1、创建数组
用Dim语句来定义固定大小的数组,即声明一个数组。如
Dim myArray(9) As Integer
上面的代码创建一个名为myArray含有10个数组元素的一维数组。注意,所有VBA数组的下界均从0开始,因此上面的代码所创建的数组元素从myArray(0)到myArray(9)。
在Dim语句中不指明数组元素的个数来声明动态数组,如
Dim myDynamicArray() As Integer
使用ReDim关键字重新定义数组的大小:
ReDim myDynamicArray(10)
也可以用ReDim关键字同时声明一个动态数组并指定该数组的元素个数:
ReDim myDynamicArray(5) As Integer
VBA没有限制重新定义动态数组大小的次数,但在重新定义数组大小时,原有的数组数据就会丢失。如果需要保留原来的数据,可以使用Preserve关键字:
ReDim Preserve myDynamicArray(5)
需要注意的是,如果重新定义数组时减小了数组的大小,则会丢失被缩减了的那部分元素的数据。
当然,与声明变量一样,也可以用Public语句声明公共数组。
2、确定数组的边界
可以使用UBound函数和LBound函数分别获取数组的最大边界和最小边界。
默认情况下,VBA的数组的下界是从0开始的,可以在模块的声明部分使用Option Base语句来改变模块中数组的起始边界。如
Option Base 1
该语句使数组元素的索引号从1开始。
也可以在定义数组时指定数组的上界和下界,如
Dim <数组名> (<下界> to <上界>) As <数据类型>
3、多维数组
多维数组可以在每个数组元素中存储一组数据,因此,多维数组的每个数组元素都包含一个数组。与一维数组相同,可以使用下面的两种方法创建多维数组:
(1)Dim <数组名> (<数组元素数1>,<数组元素数2>,……) As <数据类型>
(2)Dim <数组名>(<下界> to <上界>,<下界> to <上界>,……) As <数据类型>
与一维数组相似,多维数组也可以是动态的。
4、引用数组中的元素
可以使用数组名称和一个索引号来引用数组中的某个特定的元素。
(有关数组的进一步介绍及其应用请见后面的一系列文章)
- - - - - - - - - - - - - - - - - -
内置函数
VBA中包含各种内置函数,可以简化计算和操作。在VBA表达式中使用函数的方式与使用工作表公式中函数的方式相同。
在VBA代码中,也可以使用很多Excel工作表函数,即使用WorksheetFunction对象调用工作表函数。但是不能使用具有与VBA内置函数功能相同的工作表函数。

Feedback

# re: VBA语法(上)  回复  更多评论   

2007-08-24 10:13 by 淡泊江湖
这么好的文章,当然要顶一下

只有注册用户登录后才能发表评论。
网站导航: 博客园   IT新闻   BlogJava   博问   Chat2DB   管理