VBA—程序设计基础.pptx

VBA程序设计 程序设计基础（数据类型、常量、变量、分支、循环） VBA也有语法 什么是语法？ 语文老师说： “ 语法就是说话的方法， 正确表达应该遵循的法则。” 语法告诉我们： 是妈妈煎鸡蛋 ， 不是鸡蛋煎妈妈。 鸡蛋不能说两片， 应说两个。 你会打酱油吗？ 选不对容器， 打不回酱油。 菜篮子装不了酱油：花椒油瓶装不下一斤酱油 ： 水桶很大 ， 能装酱油，但杀鸡却派上了牛刀… 小A来到商店 ， “老板 ， 打一斤酱油。” 老板． “......你拿菜篮子打酱油？ ” 寓家不远 ， 五分言中后。“老板 ． 打酱油。” “拿个小小的花椒油瓶 ， 你真有才。 ” 第三次，提了水桶…. Excel里面的数据 VBA的数据类型 数据类型 存储空间（字节） 范围 Byte 1 0~255 Boolean 2 True或False Integer 2 ‘-32768～32767’ Long 4 -2147483648～2147483647 Single 4 Double 8 Currency 8 Decimal 14 Date 8 100-1-1～9999-12-31；0:00:00～23:59:59 String 数据类型是告诉VBA如何存储一个变量 案例 存储数据的容器：常量和变量 常量和变量是VBA存储数据的两种容器。 一个酱油瓶可以打多次酱油， 第一斤酱油用完了，拿到小买部满满的一瓶又提着回来。 变量就像酱油瓶， 可以随时随地把里面原甸的格油倒掉， 再装入新的酱油。 而常量就像袋装酱油的包装袋，一旦往里面装入酱油， 就不能更换其他的酱油。 因此， 无论存储什么类型的数据，变量都可以更换内容，重复修改的， 而常量不可以修改。这是变量和常量的区别。两者都是酱油都是可以使用的。 变量的使用 Dim 变量名 As 数据类型 如： Dim Str As String 声明多个变量 Dim Str As String，nu As Integer 或者 Dim Str As String Dim nu As Integer 给变量赋予值 Str=“我们一起学习VBA” nu=100 练习：给下列属性声明变量并存储值 名称 说明 举例 职工编号 三位数字 5 职工姓名 职工的姓名 张一平 出生日期 1978/9/1 基本工资 员工基本工资，500~3000之间 2532.5 交通补贴 员工交通补贴0~200 125 加班天数 一个月的加班天数 8 声明变量 给变量赋值 Dim zgbh As String zgbh=005 Dim zgxm As String zgxm=“张一平” Dim csrq As Date csrq=#1978-9-1# Dim jbgz As Double jbgz=2532.5 Dim jbbt As Integer jbbt=125 Dim jbts As Byte jbts=8 使用常量 常量通常用来存储一些固定的、 不会被修改的值， 如圆周率、个人所得税的税率等。常量也需要声明， 声明常量不但要指定常量的名称及数据类型， 还要在声明的同时给常量赋值 ， 并且赋值后的常重不能再重新赋值。 Const 常量名称 As 数据类型=数值 如 Const Pi As Double =3.14 常量和变量的区别，一次定义，不能修改 数组 数组的元素 数组的特征 数组共享同一个名字， 即数组名； 数组由多个同种类型的变量组成： 数组中的元素按次序存储在数组中， 通过索引号进行区分： 数组也是变量。 数组有大小。 数组的声明 Dim 数组名（a to b) As 数据类型 Dim Name(1 To 50) As String Dim Name(49) As String【默认序号为0~49】 给数组赋值 如要把 “ 孔丽 ” 这个字符串赋给一’维数组a汀中的第20个元素， 代码为： Arr(20) =“孔丽 “ 给数组赋值时，要分别给数组里的每个元素赋值，赋值的方法与给变量赋值的方法相同； 如： Dim Name(1 To 50) As String Name(1)=“张军” Name(2)=“邓成” Name(3)=“郭军” 练习 基础工资=2500+工龄*50【工龄工资为常量 const glgz As integer = 50】 根据下表建立数组存储姓名和工龄信息 新建一个sheet，并将形成下表的数据 姓名 工龄 基础工资 张三 2 2600 李四 3 2650 王二 5 2750 田六 1 2550 Sheets.Add After:=ActiveSheet 创建sheet 并命名 Sheets(Sheet1).Select Sheets(Sheet1).N