Access2010 第八章.ppt

8.1 面向对象程序设计的基本概念 1. 集合和对象 2．对象的属性和属性值 3．事件和事件过程 4．方法 5． Docmd对象 8.2 VBA的编程环境 VBE(Visual Basic Editor)是编辑VBA代码时使用的界面。在VBA编辑器中可编写VBA函数和过程。Access数据库的VBE窗口如图所示。使用Alt＋F11组合键，可以方便地在数据库窗口和VBE间进行切换。 8.3 VBA模块介绍 8.7.2 输入和输出操作 8.4.5 常用标准函数 1．数学函数 　　1) 绝对值函数：Abs(表达式) 　　2) 向下取整函数：Int(数值表达式) 　　3) 取整函数：Fix(数值表达式) 　　4)自然指数函数：Exp(数值表达式) 　　5)自然对数函数：Log(数值表达式) 　　6) 开平方函数：Sqr(数值表达式) 　　7) 三角函数 　　8) 产生随机数函数：Rnd(数值表达式) 8.4.5 常用标准函数 2．字符串函数 　　1) 字符串检索函数：InStr([Start,]Str1,Str2[,Compare]) 　　2) 字符串长度检测函数：Len(字符串表达式或变量名) 　　3) 字符串截取函数 　　4) 生成空格字符函数：Space(数值表达式) 　　5) 大小写转换函数 　　6) 删除空格函数 8.4.5 常用标准函数 3．日期/时间函数 　　1) 系统日期和时间函数 　　2) 截取日期分量函数 3) 截取时间分量函数 8.4.5 常用标准函数 4．类型转换函数 　　1) 字符串转换字符代码函数 　　2) 字符串代码转换字符函数 　　3) 数字转换成字符串函数 　　4) 字符串转换成数字函数 8.5 VBA流程控制语句 赋值语言 条件语句 循环语句 标点和Goto语句 8.5.1 赋值语句 　　赋值语句用于指定一个值或表达式给变量或常量。使用格式为： [Let] 变量名＝ 值或表达式 其中，Let为可选项，在使用赋值语句时一般都省略。 8.5.2 条件语句 1．If条件语句 　　1) 单分支结构语句 　　单分支结构语句格式为： If 条件表达式 Then 语句 或 If 条件表达式 Then 语句块 End If 功能：当条件表达式为真时，执行Then后面的语句块或语句，否则不做任何操作。 说明：语句块可以是一条或多条语句。在使用上面的单行简单格式时，Then后只能是一条语句，或者是多条语句用冒号分隔，但必须与If语句在一行上。 8.5.2 条件语句 　　2) 双分支结构语句 　　双分支结构语句格式为： f 条件表达式 Then 语句1 Else 语句2 或 If 条件表达式 Then 语句块1 Else 语句块2 End If 功能：当条件表达式为真时，执行Then后面的语句1或语句块1，否则执行Else后面的语句2或语句块2。 8.5.2 条件语句 3．多分支Select Case语句 　　当条件选项较多时，使用If语句嵌套来实现，程序的结构会变得很复杂，不利于程序的阅读与调试。此时，用Select Case语句会使程序结构更清晰。 　　Select Case语句格式为： Select Case 变量或表达式 Case 表达式1 语句块1 Case 表达式2 语句块2 [Case Else 语句块n＋1] End Select 　　功能：Select语句首先计算Select Case后变量或表达式的值，然后依次计算每个Case子句中表达式的值，如果变量或表达式的值满足某个Case值，则执行相应的语句块，如果当前Case值不满足，则进行下一个Case语句的判断。当所有Case语句都不满足时，执行Case Else子句。如果条件表达式满足多个Case语句，则只有第一个Case语句被执行。 8.5.4 循环语句 循环结构允许重复执行一行或数行程序代码。在VBA中提供了两种循环结构，即 DO循环和FOR循环。 1. Do While…Loop循环语句 语法格式为： Do While 条件表达式 循环体 [Exit Do] 语句块 Loop 功能：当条件表达式结果为真时，执行循环体，直到条件表达式结果为假或执行到Exit Do语句而退出循环体。 8.5.4 循环语句 2. Do Until…Loop循环语句 语法格式为： Do Until 条件表达式