VBA语言基础简介（VisualBasicApplication）这里只做一些vba最基本的介绍，很多函数，过程的具体使用不可能一一说明，同学们参考vba函数速查手册第一节标识符一．定义标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号，利用它可以完成对变量、常量、过程、函数、类等的引用。二．命名规则1）字母打头，由字母、数字和下划线组成，如A987b_23Abc2）字符长度小于403）不能与VB保留字重名，如public,private,dim,goto,next,with，integer,single等第二节运算符定义:运算符是代表VB某种运算功能的符号。1）赋值运算符=2）数学运算符&、+（字符连接符）、+（加）、_（减）、Mod（取余）、\（整除）、*（乘）、/（除）、一（负号）、人（指数）3）逻辑运算符Not（非）、And（与）、Or（或）、Xor（异或）、Eqv（相等）、Imp（隐含）4）关系运算符=（相同）、〈〉（不等）、〉（大于）、〈（小于）、>=（不小于）、<=（不大于）、Like、Is5）位运算符（暂时可不看位运算）Not（逻辑非）、And（逻辑与）、Or（逻辑或）、Xor（逻辑异或）、Eqv（逻辑等）、Imp（隐含）第三节数据类型VBA共有12种数据类型，具体见下表，此外用户还可以根据以下类型用Type自定义数据类型。数据类型类型标识符字节字符串型String$字符长度（0—65400）字节型Byte无1布尔型Boolean无2整数型Integer%2长整数型Long&4单精度型Single!4双精度型Double#8日期型Date无8公元100/1/1-9999/12/31货币型Currency@8Dim变量as类型Private变量as类型Public变量as类型Global变量as类型Static变量as类型小数点型Decimal无14变体型Variant无以上任意类型，可变对象型Object无4第四节变量与常量1)VBA允许使用未定义的变量，默认是变体变量。2)在模块通用说明部份，加入OptionExplicit语句可以强迫用户进行变量定义3)变量定义语句及变量作用域'定义为局部变量，如Dimxyzasinteger'定义为私有变量，如Privatexyzasbyte'定义为公有变量,如Publicxyzassingle'定义为全局变量，如Globlalxyzasdate'定义为静态变量,如Staticxyzasdouble一般变量作用域的原则是，那部份定义就在那部份起作用，模块中定义则在该模块那作用。4)常量为变量的一种特例，用Const定义，且定义时赋值，程序中不能改变值，作用域也如同变量作用域.如下定义:ConstPi=3。1415926assingle第五节数组数组是包含相同数据类型的一组变量的集合，对数组中的单个变量引用通过数组索引下标进行。在内存中表现为一个连续的内存块，必须用Global或Dim语句来定义。定义规则如下：Dim数组名[lowerto]upper[，[lowerto]upper，…。)astype;Lower缺省值为0.二维数组是按行列排列，如DimX(9)asString声明了一个10个元素的数组,X(0)〜X(9)，如果没有指定lower，则默认lower=0.再例如DimMyArray(10,10)AsInteger,是个11*11整数数组除了以上固定数组外，VBA还有一种功能强大的动态数组，定义时无大小维数声明;在程序中再利用Redim语句来重新改变数组大小，原来数组内容可以通过加preserve关键字来保留。如下例：Dimarray1()asdouble：Redimarray1(5)：array1(3)=250：Redimpreservearray1(5,10)第六节注释和赋值语句1)注释语句是用来说明程序中某些语句的功能和作用，注释语句不会被执行；VBA中有两种方法标识为注释语句.✓单引号'；如：'定义全局变量;可以位于别的语句之尾,也可单独一行✓Rem;如：Rem定义全局变量;只能单独一行2)赋值语句是进行对变量或对象属性赋值的语句，采用赋值号=，如X=123：Form1°caption=”我的窗口”对对象的赋值采用：setmyobject=object或myobject:=object第七节书写规范1)VBA不区分标识符的字母大小写，一律认为是小写字母；2)最好以行只写一条语句。一行可以书写多条语句，各语句之间以冒号：分开;3)一条语句可以多行书写,以空格加下划线_来标识下行为续行;4)标识符最好能简洁明了，不造成歧义.第八节判断语句1)If...Then...Else语句IfconditionThen[statements][Elseelsestatements]condition是个判断条件，当condition为真True,就执行Then后面的statements那些语句,如果为假False，执行elsestatements语句如1：IfA〉BAndC〈DThenA=...
