第7章 模块与VBA程序设计2.pptxVIP

第7章 模块与VBA程序设计;7.1 模块的基本概念; Public Sub sum() Dim s As Integer s = (1 + 100) * 50 MsgBox s End Sub Public Sub 乘法() 1~6相乘 Dim p As Integer p = 1 * 2 * 3 * 4 * 5 * 6 MsgBox p End Sub;7.2 VBA编程基础; 2．变量 1) 变量的本质含义 变量表示内存的存储单元，即由一个或几个连续字节组成的区域。在程序中，使用变量名对其值进行操作──向存储单元中存入数据，或从存储单元中取出数据。 X=2 :y=15 :x2=56 : x_5=89 立即窗口 n = 1 Print n n = n + 2 Print n %表示整型，表示长整型，!表示单精度型，#表示双精度型， @表示货币型，$表示字符串型 ; 2) 变量名 由字母、汉字、数字和下划线组成的字符序列，但不能以数字和下划线开头。变量名长度不能超过255个字符，不能使用系统定义的保留字（即有特殊含义的单词）作变量名。变量名中的字母大小写不加区分。 3) 定义变量的方法 ? 使用Dim定义变量，一般格式是： Dim 变量名表列 [As 类型名] Dim s As Integer Dim s, y As Integer 或 Dim 变量名[类型符] Dim s% 变量名[类型符] = 值 S%=10 ? 定义变体类型变量 Dim a As Variant Dim a 使用类型名Variant定义变量，或者定义时缺少“As 类型名”或“类型符”，则为变体类型变量。 ;12:46:07;12:46:07;7.2.2 运算符与表达式 1．运算符 在VBA中，对数据进行操作是通过运算符来实现的。共有5类运算符，按优先级由高到低依次是： 1) 算术运算符，8个。p212 2) 连接运算符，2个。 ,+  3) 关系运算符，6个。 4) 逻辑运算符 5) 赋值运算符，同等号，但意义不同。 2．表达式 ;12:46:07;12:46:07; 3．数组 所谓数组，是指多个同类型变量的集合，其中的每个变量叫做数组元素。 1) 一维数组  一维数组用来描述一行数据或一列数据，如一个学生的20科成绩，50个学生的单科成绩。 一维数组的定义格式为： Dim 数组名([下界 to] 上界) [As 类型名]或  Dim 数组名[类型符]([下界 to] 上界) Dim a(10) As Single A(0),a(1),a(2),......,a(10) Dim b(1 to 10 ) as Single B(1),b(2),......,b(10) Dim a!(10) Dim a(3, 4) As Integer Dim a(0 to 3,0 to 4 ) as integer Dim a%(3, 4) 。;12:46:13;12:46:13;7.2.3 常用函数 p213 函数是一种对应关系：对于自变量的一个值或一组值有唯一确定的函数值（常叫返回值）与它对应。函数能实现运算符难以完成的操作。 1．数学函数 1) Abs(x)，求x的绝对值。 2) Int(x)，求不大于x的最大整数。 3) Sqr(x)，求x的平方根。 4) Round(x [,n])，按指定的小数位数n（省略为0）对x进行四舍五入。 5) Rnd()或Rnd，它产生大于等于0，但小于1的随机数。 如: Int(Rnd*100) 表示: [0,100)整数 2．字符串函数 1) Tab(n)，从第n列开始输出数据，它与其后的数据用分号间隔。 例如:print tab(5),-100 -100 print -100 -100 2) Space(n)，此函数产生n个空格，它与其后的数据用分号间隔。; 3) InStr(s,t)，从主串s的第一个字符开始，查找子串t在s中首次出现的位置。 3．转换函数 1) Val(s)，将数值字符串s转换成能计算的数值。 2) Str(x)，将数值x转换成字符串，正数前保留一个空格，负数