好的网站具备条件,百合居装饰公司官网,众创空间那个网站做的好,手机手机网站制作数据类型 “数据类型”是指如何将数据存储在内存中。 (1)Boolean 表示逻辑数据#xff0c;可以是True或False中的任一个值。占用2字节的存储空间#xff0c;取值范围为True或False#xff0c;缺省值为False。 (2)Byte 只能表示正数。占用1字节的存储空间#xff0c;取值范围… 数据类型 “数据类型”是指如何将数据存储在内存中。 (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日缺省值为000000。(有关在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 Rate0.25 Const NumMonths As Integer12 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内置函数功能相同的工作表函数。 基本语句 1、控制程序流程语句 (1) GoTo语句 该语句将执行的程序转到指定的标签所在的语句指令但不能转移到过程之外的指令。例如在进行错误捕捉时发生错误后程序转移至标签所在处执行。 (2) If…Then语句 这种类型的语句用于条件判断中当满足条件时执行相应的语句当条件不满足时执行其它的操作。 基本语法为 If 条件 Then 条件满足时的执行语句 If … Then语句有几种形式分别用于不同的情况 ①当只有一个条件时可使用下面的结构 If 条件 Then 条件满足时的执行语句 [Else 条件不满足时的执行语句] 其中Else子句可选。如果该语句不在同一行中则应在后面加上End If语句即 If 条件 Then [指令] End If 或 If 条件 Then [指令] Else [指令] End If 当条件为真时执行Then后面的语句并结束If…Then语句的执行否则执行Else后面的语句或结束If…Then语句的执行。 ②当有两个或多个条件时可使用嵌套的If … Then 结构 If 条件 Then [指令] ElseIf 条件1 Then [指令] [Else] [指令] End If 上面只是两层嵌套可以根据情况使用多层嵌套。当条件为真时执行Then后面的语句并结束If…Then语句的执行否则判断条件1当条件1为真时执行Then后面的语句并结束If…Then语句的执行否则执行Else后面的指令。 (3) Select Case语句 当需要作出三种或三种以上的条件判断时最后使用Select Case语句。其基本语法为 Select Case 测试表达式 [Case 条件表达式1] [指令] [Case 条件表达式2] [指令] …… [Case Else] [指令] End Select 当某个条件表达式与测试表达式相匹配时则执行其后的指令否则执行Else(如果有的话)后的指令然后结束Select Case块的执行。 此外Select Case语句还可以嵌套。 (有关程序控制语句的进一步介绍和示例请见后面的一系列文章) 2、循环语句 循环即重复执行某段代码。在VBA中有多种可以构成循环的语句结构。 (1) For … Next 循环 其语法如下 For 计数器开始数 To 结束数 [step 步长] [指令] [Exit For] [指令] Next [计数器] 从开始到结束反复执行For和Next之间的指令块除非遇到Exit For语句将提前跳出循环。其中步长和Exit For语句以及Next后的计数器均为可选项。 For…Next循环中可以再包含For…Next循环即For…Next循环可以嵌套使用。 (2) Do While循环 只有在满足指定的条件时才执行Do While循环。有两种形式 ■ 第一种形式 Do [While 条件] [指令] [Exit Do] [指令] Loop 当条件满足时执行指令。 ■ 第二种形式 Do [指令] [Exit Do] [指令] Loop [While 条件] 先执行指令然后再判断条件如果条件满足则再次执行指令。 其中Exit Do语句表示提前退出指令块。 (3) Do Until循环 与Do While循环一样也有两种形式 ■ 第一种形式 Do [Until 条件] [指令] [Exit Do] [指令] Loop ■ 第二种形式 Do [指令] [Exit Do] [指令] Loop [Until 条件] 执行指令直到条件满足时退出循环。 (4) While … Wend循环 其语法为 While 条件 [指令] Wend 当条件满足时则执行指令。 (有关循环语句的进一步介绍和示例请见后面的一系列文章) - - - - - - - - - - - - - - - - - - - - 过程 过程由一组完成所要求操作任务的VBA语句组成。子过程不返回值因此不能作为参数的组成部分。 其语法为 [Private|Public] [Static] Sub 过程名 ([参数]) [指令] [Exit Sub] [指令] End Sub 说明 (1) Private为可选。如果使用Private声明过程则该过程只能被同一个模块中的其它过程访问。 (2) Public为可选。如果使用Public声明过程则表明该过程可以被工作簿中的所有其它过程访问。但是如果用在包含Option Private Module语句的模块中则该过程只能用于所在工程中的其它过程。 (3) Static为可选。如果使用Static声明过程则该过程中的所有变量为静态变量其值将保存。 (4) Sub为必需。表示过程开始。 (5) 过程名为必需。可以使用任意有效的过程名称其命名规则通常与变量的命名规则相同。 (6) 参数为可选。代表一系列变量并用逗号分隔这些变量接受传递到过程中的参数值。如果没有参数则为空括号。 (7) Exit Sub为可选。表示在过程结束之前提前退出过程。 (8) End Sub为必需。表示过程结束。 如果在类模块中编写子过程并把它声明为Public它将成为该类的方法。 (关于过程的详细介绍和示例见后面的一系列文章) - - - - - - - - - - - - - - - - - - - - 函数 函数(function)是能完成特定任务的相关语句和表达式的集合。当函数执行完毕时它会向调用它的语句返回一个值。如果不显示指定函数的返回值类型就返回缺省的数据类型值。 声明函数的语法为 [Private|Public] [Static] Function 函数名 ([参数]) [As 类型] [指令] [函数名表达式] [Exit Function] [指令] [函数名表达式] End Function 说明 (1) Private为可选。如果使用Private声明函数则该函数只能被同一个模块中的其它过程访问。 (2) Public为可选。如果使用Public声明函数则表明该函数可以被所有Excel VBA工程中的所有其它过程访问。不声明函数过程的作用域时默认的作用域为Public。 (3) Static为可选。如果使用Static声明函数则在调用时该函数过程中的所有变量均保持不变。 (4) Function为必需。表示函数过程开始。 (5) 函数名为必需。可以使用任意有效的函数名称其命名规则与变量的命名规则相同。 (6) 参数为可选。代表一系列变量并用逗号分隔这些变量是传递给函数过程的参数值。参数必须用括号括起来。 (7) 类型为可选。指定函数过程返回的数据类型。 (8) Exit Function为可选。表示在函数过程结束之前提前退出过程。 (9) End Function为必需。表示函数过程结束。 通常在函数过程执行结束前给函数名赋值。 函数可以作为参数的组成部分。但是函数只返回一个值它不能执行与对象有关的动作。 如果在类模块中编写自定义函数并将该函数的作用域声明为Public这个函数将成为该类的方法。 (关于Function过程的详细介绍和示例见后面的一系列文章) - - - - - - - - - - - - - - - - - - - - 事件处理过程 要对一个控件事件编写事件处理程序应先打开窗体的代码窗口并从可用对象的下拉列表中选择所需的控件。然后从该控件的可用事件下拉列表中选择所用的事件。此时对事件处理程序的定义语句就会自动出现在代码窗口中就可以直接编写事件处理程序了。 在Excel中有下面几类事件即Excel应用程序事件、工作簿事件、工作表事件、图表事件、用户窗体事件等。 (关于Excel中事件处理的介绍请见后面的一系列文章) - - - - - - - - - - - - - - - - - - - - 类模块 类模块是存放共享变量以及共享代码的存储库。创建一个类模块实际上也是在创建一个COM(组件对象模型)接口。因此类模块允许通过一个由属性、方法和事件组成的可编程接口向外界描述应用程序同时保证保留对应用程序的控制权。也就是说类模块能够让程序实现“封装”这样在其它工程中可以直接使用某类模块而不需要访问源代码。此外可以使用类来创建自已的库如果要使用的话只需要在任何新的工程中添加一个对该类的引用就行了。并且如果要改变程序只需对类模块改动就行了而不需要在程序的每个部分都作改动。 (有关类模块知识的详细介绍请见后面的一系列文章) - - - - - - - - - - - - - - - - - - - - 属性过程 属性过程(property procedure)是特殊的过程用于赋予和获取自定义属性的值。属性过程只能在对象模块如窗体或类模块中使用。 有三种属性过程 Property Let 给属性赋值 Property Get 获取属性的值 Property Set 将对象引用赋给属性引用 - - - - - - - - - - - - - - - - - - - - 调用子过程和函数过程 子过程可以用下面三种方法调用。第一种使用Call语句 Call DoSomething(参数1参数2……) 如果使用Call语句就必须用小括号将参数列表括起来。 第二种是直接利用过程名 DoSomething 参数1参数2…… 此时不用在参数列表两边加上括号。 如果不想使用函数的返回值可以用上述任一种方法调用函数。否则可以用函数名作为表达式的组成部分如 If GetFunctionResult(parameter)1 Then 如果用函数调用作为表达式的一部分参数列表必须放在小括号中。 第三种是使用Run方法。 (关于过程调用更详细的介绍和示例请见后面的一系列文章) - - - - - - - - - - - - - - - - - - - - 在过程间传递参数 在很多情况下需要在子过程或函数中调用另一个自定义函数或子过程这时在被调用过程中就要用到在调用过程中使用的某个变量。因此可把该变量作为参数传递给被调用过程。不管被调用过程是在同一模块、同一工程中的过程还是在远程服务器上的类中的一个方法从一个过程向另一个过程传递变量的原理都是一样的。 被调用过程(而不是调用过程)决定了变量如何从调用过程传递到被调用过程。 1、VBA允许用两种不同的方式在过程和组件之间传递参数。在子过程或函数的定义部分可以指定参数列表中的变量的传递方式ByRef(按引用)或者ByVal(按值)。 (1) ByRef 这是VBA中在过程间传递变量的默认方法。ByRef是指按引用传递变量即传递给被调用过程的是原变量的引用。因此如果改变了被调用过程中的变量值其变化就会反映到调用过程中的那个变量因为它们实际上是同一个变量。 (2) ByVal 如果使用ByVal关键字传递变量被调用过程获得的就是该变量的独立副本。因此改变被庙用过程中该变量的值不会影响调用过程中该变量原来的值。 2、Optional参数 Optional关键字用来指定某个特定的参数并不一定要传递即为可选参数。但是该参数必须放在最后。 3、ParamArray 使用ParamArray关键字能够使过程按受一组数目可变的参数。ParamArray参数必须是参数列表中的最后一个参数而且不能在使用了Optional关键字的参数列表中使用ParamArray参数。 - - - - - - - - - - - - - - - - - - - - 变量(常量)作用域和生存期 有时需要在工程内的所有过程中使用某个变量而有时某些变量又只需要在某些特定的过程中用到变量的这种可见性称为变量作用域。 变量存在和作用的时间称为变量的生存期。 变量或常数在程序中声明的位置决定了变量的作用域和生存期。 总的说来在模块的声明部分用Private关键字声明的变量可以被模块中的所有过程使用在模块的声明部分用Public关键字声明的变量可以被整个工程使用若某个对象引用指向某类模块则在该类模块的声明部分用Public关键字声明的变量可以被整个工程使用在子过程或函数中用Dim语句声明的变量只能被声明这些变量的过程使用。 (1) 过程级作用域 在一个过程(即子过程或函数)内声明的变量只能在该过程内使用其生存期在执行了End Sub或End Function语句后结束。因此可以在不同的过程中定义具有相同名称的不同变量。声明过程级作用域的变量在过程中用Dim语句声明变量。 此外还有一种具有过程级作用域的特殊变量称为静态变量。静态变量是在过程中定义的尽管这种变量也具有过程级作用域但是它具有模块级的生存期。这意味着只能在定义静态变量的过程内使用这些变量但是变量的值在两次过程调用之间是保持不变的。用Static关键字声明静态变量 Static lngExcuted As Long 还可以声明一个过程为静态过程在这种情况下在过程中声明的所有变量都被认为是静态变量而且它们的值在两次过程调用之间都会保持不变如 Static Procedure MyProcedure() Dim iCtr As Integer (2) 模块级或私有作用域 具有模块级作用域的变量可以被某个模块内的所有子过程和函数使用也可以在模块级生存期内保存在内存中。 在模块的声明部分(即任何子过程或函数外)用Dim语句或Private语句声明变量来创建一个具有模块级作用域的变量。 (3) Friend作用域 Friend关键字只能用于在对象模块(如类模块或窗体模块)中的变量和过程的声明。用Friend声明的变量允许工程中的其他对象模块访问原模块中的变量或方法但是不需要用Public语句声明这些变量或方法。 (4) 公共作用域 在过程外使用Public语句声明的变量可以被当前工程中的所有模块使用。 - - - - - - - - - - - - - - - - - - - - 注释 “注释”就是嵌入在代码中的描述性文本VBA完全忽略注释中的文本。 要在代码中插入注释只需在前面加上单引号即在一行中以单引号(‘)开始。 注释应该表达有用的信息。 转载于:https://blog.51cto.com/xiweicheng/674138
