VBA语法 变量.doc

VBA语法2-1 变量变量是属性的值或计算结果，变量存于内存中，并且依附VBA程序运行，值是可以改变的量。2-1-1 visual Basic 变量命名规则自定义变量名称时有一定的规则：（1） 第一个字符必须使用英文字母。（2） 不能在名称中使用空白，句号，感叹号或#$&等字符。（3） 名称的长度不可以超过255个字符。（4） 通常，使用的名称不能与Visual Basic 本身的函数、表达式及方法得名称相同。也不能与程序语言的关键字相同。若使用内置函数、表达式或方法与所指定的名称冲突，则必须想法把它们区分出来。（5） 不能在相同层次范围中使用重复的名称。（6） Visual Basic 不区分大小写，但它会保留在表达式申明时所用的大小写字母。2-1-2 变量的赋值 给变量赋值其实就是将指定的数值、字符串、表达式等通过赋值符号“=”赋给指定的变量名。给变量赋值的格式：变量名= 表达式例如：使用“=”运算符将指定的信息赋值给相应的变量Legalperson = “华锋”Comyears = 6将变量写入指定单元格Cells(2,1) = legalpersonCells(3,5) = comyears2-1-3 使用MsgBox函数函数作用：弹出消息显示对话框，方便用户查看变量的值。例如：将指定单元格赋值给变量Compname1= cells(5,8) Compname2= cells(2,5)msgBox“第一个客户公司的名称为：”&compname1&Chr(10)&“第二个客户公司的名称为：”&compname22-1-4 使用Dim语句声明变量 Dim语句主要用于声明变量并分配储存空间。其主要目的是告知用户该变量为自定义变量，声明后程序会自动记录该变量的类型等信息。要注意的是如果程序中的变量没有用Dim语句来声明变量，则被称为隐式声明，这些变量会被自动分配一个数据类型Variant,它们可以保存数字、字符串和其他信息类型。Dim语句的语法格式：DimWithEvents varname(subscripts) As New type WithEvents varname(subscripts) As New type参数说明：WithEvents:可选参数，说明vaname参数是一个用来响应由ActiveX对象触发的事件的对象变量。只有在类模块中才是合法的。使用WithEvents,可以声明任意多个所需的单变量，但不能使用它创建数组。New和WithEvents不能一起使用。Varname:必选参数，是指定变量的名称需要遵守标准的变量命名约定。Subscripts:可选参数，表示数组变量的维数，最多可定义60维的多维数组。Subscripts参数的使用语法为Lower Toupper,lower To Upper,如果不显示指定Lower，则数组的下界由Option Base 语句控制。如果没有使用Option Base 语句，则下界为0。New,可选参数，可隐式地创建对象的关键字。如果使用New来声明对象变量，则在第一次引用该变量时将新建该对象的实例。因此不必使用set语句来给对象引用赋值。New关键字不能声明任何内部数据类型的变量，以及重属对象的实例，也不能与WithEvents一起使用。Type ：可选参数，表示变量数据类型。变量的类型可以是Byte,long,currency,single,double,date,shting,object,variant等数据类型。所声明的每个变量都有一个单独的As Type子句。例子：Dim compname As String 声明变量compname为字符串类型。Dim StartDate As Date 声明变量StartDate为日期型。2-1-5 使用Public语句声明公用变量函数作用：可以在多个模块或程序过程中调用同一个变量。语法格式：和Dim函数的语法格式相同。Public语句声明的变量在所有程序的所有没有使用Option Private Module 模块的任何过程中都可以使用，若该模块使用了Option Private Module，则该变量只是在其所属工程中公用。2-1-6 使用Private语句声明私有变量函数作用：有时用户需要让声明的变量在声明的模块或下级子过程中使用，这时就可以使用Private语句将其定义为私有变量。语法格式;和Dim函数的语法格式相同。2-1-7 变量类型的使用范围和有效期限表 2-1变量名语句使用范围有效期限变量Dim Static过程级别过程运行中私有变量Dim Private模块级别整个模块运行中公用变量Public程序级别整个程序运行中表2-2数据类型概要数值型一种数据类型，将整型变量作为2字节整数存储起来。范围是从-32768到32767之间的数字。Integer数据类型也可表示列举型。货币型可用这一数据类型来做财务运算和精确度要求高的运算。日期型将日期和时间作为实数来存储的数据类型。以64位（8个字节）数字来存储Date变量，小数点左边为日期，右边为时间。字符型字符串有两种，变长与定长字符串，变长字符串最多可包含大约20亿个（231）字符。定长字符串可包含1到大约64K（216）个字符。对象类型指应用程序通过自动化显露的对象的类型。如：Application.File.Range和Sheet.使用对象浏览器或引用应用程序的文档可得到这些对象的列表。自定义类型用Type语句定义的数据类型。用户定义的数据类型可包括一个或多个任意数据类型的元素。用Dim语句创建用户定义的数组和其他数据类型。用户定义类型可包括任何类型的数组。2-1-8 对象变量的定义与赋值对象类型变量是应用程序通过自动化显露的对象的类型。如：Application,File,Range和Sheet.使用对象浏览器或引用应用程序的文档可得到这些对象的列表。在为对象类型变量赋值时需要使用Set语句来实现，Set语句的功能是将对象引用赋值给指定的变量或属性。其语法格式为：Set objectvar = New objectexpression | Nothing参数说明：Objectvar : 必选参数，是指变量或属性的名称。New：可选参数，通常在声明时使用New，以便可以隐式创建对象。如果New与Set一起使用，则将创建该类的一个新实例。如果objectvar包含了一个对象引用，则在赋新值是释放该引用。不能使用New关键字来创建任何内部数据类型的新实例，也不能创建从属对象。Objectexpression:必选参数，由对象名、所声明的相同对象类型的其他变量，或返回相同对象类型的函数或方法所组成的表达式。Nothing: 可选参数，用于断绝objectvar与任何指定对象的关系。若没有其他变量指向objectvar原来所引用的对象，将其赋为Nothing会释放该对象所关系的所有系统及内存资源。例如：过程代码;Sub smpobject()Dim myrange As Range 声明变量myrange为对象变量将指定单元格区域A1：E1赋值给变量myrange.Set myrange = werksheets(“sheet1”).Range(“A1：E1”)Myrange.Font.Name=”华文楷体”Myrange.Font.Size= 20Myrange.Font.Bold=T