




如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
基本语法 1、标识符:字母开都,字母、数字和下划线组成。如A5678_9876HJ,小于40个字符,Excel2002以上中文版等,可以用汉字且长度可达254个字符。 2、运算符: (1)赋值运算符= (2)数学运算符:&、+(字符连接符)、+(加)、-(减)、*(乘)、/(除)、Mod(取余)、\(整除)、-(负号)、^(指数) (3)逻辑运算符:Not(非)、And(与)、Or(或)、Xor(异或)、Eqv(相等)、Imp(隐含) (4)关系运算符:=(相等)、<>(不等)、>(大于)、<(小于)、>=(不小于)、<=(不大于)、Like、Is (5)位运算符Not(逻辑非)、And(逻辑与)、Or(逻辑或)、Xor(逻辑异或)、Eqv(逻辑等)、Imp(隐含) 3、数据类型: 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@8小数点型Decimal无14变体型Variant无以上任意类型,可变对象型Object无4 4、变量与常量 (1)VBA允许使用未定义的变量,默认是变体变量Variant。 (2)在模块通用说明部份,加入OptionExplicit语句可以强迫用户进行变量定义。 (3)变量定义语句及变量作用域 Dim变量as类型'定义为局部变量如DimxyzasintegerPrivate变量as类型'定义为私有变量如PrivatexyzasbytePublic变量as类型'定义为公有变量如PublicxyzassingleGlobal变量as类型'定义为全局变量如GloblalxyzasdateStatic变量as类型'定义为静态变量如Staticxyzasdouble 一般变量作用域的原则是,那部份定义就在那部份起作用,模块中定义则在该模块那作用。 (4)常量为变量的一种特例,用Const定义,且定义时赋值,程序中不能改变值,作用域也如同变量作用域。 如下定义:ConstPi=3.1415926assingle 5、数组 在内存中表现为一个连续的内存块,必须用Global或Dim语句来定义。定义规则如下: Dim数组名([lowerto]upper[,[lowerto]upper,….])astype;Lower缺省值为0。二维数组是按行列排列,如XYZ(行,列)。 除了以上固定数组外,VBA还有一种功能强大的动态数组,定义时无大小维数声明;在程序中再利用Redim语句来重新改变数组大小,原来数组内容可以通过加preserve关键字来保留。如下例:Dimarray1()asdouble:Redimarray1(5):array1(3)=250:Redimpreservearray1(5,10) 6、注释 注释语句是用来说明程序中某些语句的功能和作用;VBA中有两种方法标识为注释语句。单引号’;如:’定义全局变量;可以位于别的语句之尾,也可单独一行Rem;如:Rem定义全局变量;只能单独一行。 7、书写规范 (1)VBA不区分标识符的字母大小写,一律认为是小写字母; (2)一行可以书写多条语句,各语句之间以冒号:分开; (3)一条语句可以多行书写,以空格加下划线_来标识下行为续行; (4)标识符最好能简洁明了,不造成歧义。 语句 1、判断语句 (1)If…Then…Else语句 IfconditionThen[statements][Elseelsestatements] If<条件>Then<条件满足时的执行语句> If…Then语句有几种形式分别用于不同的情况: ①当只有一个条件时,可使用下面的结构: If<条件>Then<条件满足时的执行语句>[Else<条件不满足时的执行语句>] 其中,Else子句可选。如果该语句不在同一行中,则应在后面加上EndIf语句,即: If<条件>Then [指令] EndIf 或: If<条件>Then [指令] Else [指令] EndIf 当条件为真时,执行Then后面的语句并结束If…Then语句的执行,否则执行Else后面的语句或结束If…Then语句的执行。 ②当有两个或多个条件时,可使用嵌套的If…Then结构: If<条件>Then [指令] ElseIf<条件1>Then [指令] [Else] [指令] EndIf 上面只是两层嵌套,可以根据情况使用多层嵌套。当条件为真时,执行Then后面的语句并结束If…Then

ys****39
实名认证
内容提供者


最近下载