06、07、08数据访问页、宏、模块

二维数组

Dim 数组名([下界1 to] 上界1， [下界2 to] 上界2）as 类型 Dim array (0 to 3, 0 to 4) as long Dim array (3, 4) as long

运算符、表达式

运算符（P208）

算术运算符 关系运算符 逻辑运算符 连接运算符


调用方法:

对象名.方法名 docmd.openform “学生窗体” docmd.openreport “学生报表” docmd.deleteobject actable, “学生表” docmd.close acquery, “学生查询”

E.g.


过程：是完成指定任务的一段程序命令代码， 可以通过调用的方式使用。包括函数和子程序。 函数：是具有返回值的过程。 子程序：是执行完成后不返回任何值的过程。

VBA程序结构

顺序结构 分支结构(条件结构) 循环结构
Private Sub prg9_14() Dim strMsg As String, strTitle As String Dim intStyle As Integer
例9-14
strMsg = "您必须输入一个介于2010-1-1和2010-6-1之 间的日期。"
网页地址由协议、服务器名、目录路径和网页文 件名几部分组成。 如：/xxgs/index.htm


HTML

HTML(HyperText Markup Language)：超 文本标记语言
静态HTML：数据不常更改，web应用程序 不需要窗体 动态HTML：数据经常更改，web应用程序 需要窗体来保存和获得数据


数据访问页

数据访问页是一种特殊的web页，它通过 internet或intranet来浏览、处理存储在 access数据库、microsoft SQL server数据 库或其他数据源中的数据。
通过数据访问页可使数据以网页形式来显示， 其内容可随着数据库中数据的变化而变化， 并可实现数据的更新和修改。
Dim b(5) as integer =>dim b(0 to 5) as integer
Option base 1 dim b(5) as integer=>dim b(1 to 5) as integer


引用形式：

数组名（下标） Dim a(1 to 3) as string a(3)=100


创建静态HTML页和数据访问页
编辑数据访问页
因特网与万维网

因特网（Internet）是全球最大的、有众多网 络相互连接而成的、开放的计算机网络。
万维网（World Wide Web，WWW）使得一 个站点可以建立包括文本、图片、声音甚至录 像的页面，这些页面用超文本标记语言 （Hyper Text Makeup Language，HTML） 写成。

表达式：由运算符、括号和运算对象等构成 的式子
函数

VBA提供了大量的函数，通过使用函数可 以避免重复性编程工作。 输入函数

InputBox(<提示信息>[,<对话框标题>[,<默 认内容>]]) InputBox(“请输入学生姓名”, “输入函 数应用”) InputBox(“请输入学生性别”, “输入 框”, “男”)

基本概念

对象

一组相关联的数据及与这些数据相关的操作 集合在一起,作为一个整体处理,称为对象
E.g.表,查询,窗体,控件等 一组相关的对象


集合


E.g.窗体集合(forms),报表集合(reports)

若要引用某窗体或报表

Forms![窗体名]
Reports![报表名]
Forms![窗体名]![控件名] Reports![报表名]![控件名]

若要引用某窗体或报表中的控件


E.g. Forms![学生]![成绩]

属性:

对象的物理特征
对象名.属性名=属性值 Forms![窗体1].caption=“成绩查询”

设置属性值:


E.g.


事件:

发生在一个对象上且能被该对象识别和响应 的行为或动作 click,dbclick
宏：操作的集合 宏组：宏的集合

宏与宏组

宏的创建和使用

宏设计窗口的组成

操作
备注
(宏名、条件） 操作参数具体的参数设置 操作参数说明区域
宏的创建

操作序列宏的创建

（例1：查看成绩、基本信息） 当条件结果为真时，执行这些操作
（例2：判断班级、是否党员）

条件操作宏的创建



使用向导创建数据访问页
使用“设计视图”创建数据访问页
编辑数据访问页

浏览静态网页和数据访问页

使用Web预览 直接打开

设置数据访问页的属性 使用主题
数据访问页的基本控件



添加标签 添加命令按钮 添加滚动文字

在数据访问页中创建显示数据的绑定滚动 文字 在数据访问页中创建未绑定滚动文字
intStyle = vbOKOnly
strTitle = "日期区间无数据" MsgBox strMsg, intStyle, strTitle End Sub
单分支结构

If 表达式 then 语句1
Private Sub prg9_15()
If Val(text1) > Val(text2) Then

VBE (visual basic editor)

VBE窗口组成

代码窗口

对象下拉列表框 过程/事件下拉列表框 代码框 过程视图

全模块视图
VBA编程基础

常量:

定义的内部符号常 量，主要作为docmd 直接常量:10,“student”,#07/03/10# 命令语句中的参数； 符号常量:const pi=3.1415926 以前缀ac开头

在程序中可以直接引用的实际值,在程序运行 VBA提供了一些预 过程中不改变
系统常量:true,false,yes,no,on,off, null,acform,actable,等

变量:

是内存中用于存储程序执行过程中产生的 中间结果,最终输出结果的临时存储区域, 其值在程序运行中可以改变
显式：Dim x as integer,sum as single 隐式：x=5 y=“China”
注:对象的事件 是由系统规定 好的,不能由用 户创建

E.g.


方法:

系统事先设计好的，可以完成一定操作的特 殊过程,是附属于对象的行为或动作 E.g：openform,openreport,close等


方法与事件的不同之处

同一事件可完成不同任务.e.g. click事件,用在 打开窗体的按钮和关闭窗体的按钮上,效果完 全不同 方法则是固定的.e.g. openforms,close
第9章
知识点

VBA简介 VBA编程基础 VBA结构控制语句

模块
VBA简介

VBA(visual basic for application)：是Access 内置的程序语言，建立在Basic基础上。

VBA的必要性（宏的局限性）

宏只能处理一些简单的操作，对于复杂条件和 循环等结构无能为力 宏对数据库对象的处理（如，表、查询）能力 也很弱
text3.Text = "text1>=text2" End If End Sub
双分支结构

若写成多行， If 表达式 then 语句1 else 语句2 Private Sub prg1() Dim a As Integer 结尾要加 end if
a = Val(InputBox("请输入一个整数", "判断奇偶数")) If a Mod 2 = 0 Then MsgBox "偶数" Else MsgBox "奇数" End Sub
多分支结构(1)
If <表达式1> then
语句块1 elseif <表达式2> then 语句块2 …… [else 语句块n] end if
数据访问页
第10章

在网络应用越来越普遍的今天，通过网络来 进行数据的存取显得越来越重要。Access生 成的数据访问页是一种独立于Access数据库 外的HTML文件，在这个网页上，用户能够 显示、新建、删除和修改数据库中的数据记 录，同时分析数据。
知识点

因特网与万维网 HTML和数据访问页

宏组的创建

引用宏组中的宏时，应用如下语法： 宏组名.宏名 （例3：宏组、登录）


注意：宏与控件事件的连接
宏的运行及调试


直接运行宏（测试）
事件触发宏（在窗体、报表或控件的事件中 运行宏或事件过程，需连接宏和控件事件） 运行宏组中的宏 自动运行宏（autoexec） 单步执行宏

VBA编程

变量的声明: