第2章

第 7 章 宏 本 章 学 习 目 标 : 了 解 宏 的 概 念 作 用 和 类 型 掌 握 宏 的 设 计 方 法 掌 握 常 用 的 宏 操 作 命 令 掌 握 宏 的 应 用 宏 是 Access 数 据 库 的 对 象 之 一, 它 是 一 个 或 多 个 操 作 命 令 的 集 合, 其 中 每 个 操 作 都 能 够 实 现 特 定 的 功 能 Access 提 供 了 许 多 宏 操 作 命 令, 可 以 把 各 种 宏 操 作 命 令 依 次 定 义 在 宏 中, 运 行 宏 时, Access 就 会 按 照 所 定 义 的 顺 序 依 次 执 行 各 个 宏 操 作 宏 可 以 自 动 执 行 一 些 简 单 而 重 复 的 任 务, 通 过 宏 能 够 将 表 查 询 窗 体 报 表 等 有 机 地 联 系 起 来, 从 而 构 成 一 个 完 整 的 系 统 7.1 宏 概 述 宏 是 由 一 个 或 多 个 宏 操 作 命 令 组 成 的 集 合, 其 中 每 个 操 作 能 够 实 现 特 定 的 功 能, 例 如, 打 开 某 个 窗 体 或 打 印 某 个 报 表, 当 宏 由 多 个 操 作 组 成 时, 运 行 时 按 宏 命 令 的 排 列 顺 序 依 次 执 行 如 果 用 户 频 繁 地 重 复 一 系 列 操 作, 就 可 以 用 创 建 宏 的 方 式 来 执 行 这 些 操 作 7.1.1 宏 的 分 类 可 以 从 不 同 的 角 度, 对 宏 进 行 分 类 不 同 类 型 的 宏 反 映 了 设 计 宏 的 意 图 执 行 宏 的 方 式 以 及 组 织 宏 的 方 式 166

第 7 章 宏 1. 根 据 宏 所 依 附 的 位 置 来 分 类 根 据 宏 所 依 附 的 位 置, 宏 可 以 分 为 独 立 的 宏 嵌 入 的 宏 和 数 据 宏 (1) 独 立 的 宏 独 立 的 宏 对 象 将 显 示 在 导 航 窗 格 中 的 宏 下 宏 对 象 是 一 个 独 立 的 对 象, 窗 体 报 表 或 控 件 的 任 意 事 件 都 可 以 调 用 宏 对 象 中 的 宏 如 果 希 望 在 应 用 程 序 的 很 多 位 置 重 复 使 用 宏, 则 独 立 的 宏 是 非 常 有 用 的 通 过 从 其 他 宏 调 用 宏, 可 以 避 免 在 多 个 位 置 重 复 相 同 的 代 码 (2) 嵌 入 的 宏 嵌 入 在 对 象 的 事 件 属 性 中 的 宏 称 为 嵌 入 的 宏 嵌 入 的 宏 与 独 立 的 宏 的 区 别 在 于 嵌 入 的 宏 在 导 航 窗 格 中 不 可 见, 它 成 为 了 窗 体 报 表 或 控 件 的 一 部 分 宏 对 象 可 以 被 多 个 对 象 以 及 不 同 的 事 件 引 用, 而 嵌 入 的 宏 只 作 用 于 特 定 的 对 象 (3) 数 据 宏 数 据 宏 是 Access 2010 中 新 增 的 一 项 功 能, 该 功 能 允 许 在 插 入 更 新 或 删 除 表 中 的 数 据 时 执 行 某 些 操 作, 从 而 验 证 和 确 保 表 数 据 的 准 确 性 数 据 宏 也 不 显 示 在 导 航 窗 格 的 宏 下 2. 根 据 宏 中 宏 操 作 命 令 的 组 织 方 式 来 分 类 根 据 宏 中 宏 操 作 命 令 的 组 织 方 式, 宏 可 以 分 为 操 作 序 列 宏 子 宏 宏 组 和 条 件 操 作 宏 (1) 操 作 序 列 宏 操 作 序 列 宏 是 指 组 成 宏 的 操 作 命 令 按 照 顺 序 关 系 依 次 排 列, 运 行 时 按 顺 序 从 第 一 个 宏 操 作 依 次 往 下 执 行 如 果 用 户 频 繁 地 重 复 一 系 列 操 作, 就 可 以 用 创 建 操 作 序 列 宏 的 方 式 来 执 行 这 些 操 作 (2) 子 宏 完 成 相 对 独 立 功 能 的 宏 操 作 命 令 可 以 定 义 成 子 宏, 子 宏 可 以 通 过 其 名 称 来 调 用 每 个 宏 可 以 167

Access 2010 数 据 库 应 用 技 术 包 含 多 个 子 宏 (3) 宏 组 宏 组 是 将 相 关 操 作 分 为 一 组, 并 为 该 组 指 定 一 个 名 称, 从 而 提 高 宏 的 可 读 性 分 组 不 会 影 响 宏 操 作 的 执 行 方 式, 组 不 能 单 独 调 用 或 运 行 分 组 的 主 要 目 的 是 标 识 一 组 操 作, 帮 助 一 目 了 然 地 了 解 宏 的 功 能 此 外, 在 编 辑 大 型 宏 时, 可 将 每 个 分 组 块 向 下 折 叠 为 单 行, 从 而 减 少 必 须 进 行 的 滚 动 操 作 (4) 条 件 操 作 宏 条 件 操 作 宏 就 是 在 宏 中 设 置 条 件, 用 来 判 断 是 否 要 执 行 某 些 宏 操 作 只 有 当 条 件 成 立 时, 宏 操 作 才 会 被 执 行, 这 样 可 以 增 强 宏 的 功 能, 也 使 宏 的 应 用 更 加 广 泛 利 用 条 件 操 作 宏 可 以 根 据 不 同 的 条 件 执 行 不 同 的 宏 操 作 例 如, 如 果 在 某 个 窗 体 中 使 用 宏 来 校 验 数 据, 可 能 要 用 某 些 信 息 来 响 应 记 录 的 某 些 输 入 值, 而 用 另 一 些 信 息 来 响 应 其 他 不 同 的 值, 此 时 可 以 使 用 条 件 来 控 制 宏 的 执 行 7.1.2 宏 的 操 作 界 面 在 创 建 选 项 卡 的 宏 与 代 码 命 令 组 中, 单 击 宏 命 令 按 钮, 将 进 入 宏 的 操 作 界 面, 其 中 包 括 宏 工 具 / 设 计 选 项 卡 操 作 目 录 窗 格 和 宏 设 计 窗 口 3 个 部 分 宏 的 操 作 就 是 通 过 这 些 操 作 界 面 来 实 现 的 1. 宏 工 具 / 设 计 选 项 卡 宏 工 具 / 设 计 选 项 卡 有 3 个 命 令 组, 分 别 是 工 具 折 叠 / 展 开 和 显 示 / 隐 藏, 如 图 7-1 所 示 168

第 7 章 宏 图 7-1 宏 工 具 / 设 计 选 项 卡 各 命 令 组 的 作 用 如 下 1 工 具 命 令 组 包 括 运 行 调 试 宏 以 及 将 宏 转 换 为 Visual Basic 代 码 3 个 操 作 2 折 叠 / 展 开 命 令 组 提 供 浏 览 宏 代 码 的 几 种 方 式 : 展 开 操 作 折 叠 操 作 全 部 展 开 和 全 部 折 叠 展 开 操 作 可 以 详 细 地 阅 读 每 个 操 作 的 细 节, 包 括 每 个 参 数 的 具 体 内 容 折 叠 操 作 可 以 把 宏 操 作 收 缩 起 来, 不 显 示 操 作 的 参 数, 只 显 示 操 作 的 名 称 3 显 示 / 隐 藏 组 主 要 是 用 于 对 操 作 目 录 窗 格 的 隐 藏 和 显 示 2. 操 作 目 录 窗 格 为 了 方 便 用 户 操 作,Access 2010 用 操 作 目 录 窗 格 分 类 列 出 了 所 有 宏 操 作 命 令, 用 户 可 以 根 据 需 要 从 中 选 择 当 选 择 一 个 宏 操 作 命 令 后, 在 窗 格 下 半 部 分 会 显 示 相 应 命 令 的 说 明 信 息 操 作 目 录 窗 格 由 3 部 分 组 成, 分 别 是 程 序 流 程 控 制 宏 操 作 命 令 和 在 此 数 据 库 中 包 含 的 宏 对 象, 如 图 7-2 所 示 各 部 分 的 作 用 如 下 1 程 序 流 程 包 括 Comment( 注 释 ) Group( 组 ) If( 条 件 ) 和 Submacro( 子 宏 ) 等 选 项 其 中,Comment 用 于 给 宏 命 令 添 加 注 释 说 明, 以 提 高 宏 程 序 代 码 的 可 读 性 ;Group 允 许 对 宏 命 令 进 行 分 组, 以 使 宏 的 结 构 更 清 晰 可 读 性 更 强 ;If 通 过 条 件 表 达 式 的 值 来 控 制 宏 操 作 的 执 行 ; Submacro 用 于 在 宏 内 创 建 子 宏 2 操 作 部 分 把 宏 操 作 按 操 作 性 质 分 成 8 组, 分 别 是 窗 口 管 理 宏 命 令 筛 选 / 查 询 / 搜 索 数 据 导 入 / 导 出 数 据 库 对 象 数 据 输 入 操 作 系 统 命 令 用 户 界 面 命 令, 一 共 是 66 个 操 作 Access 2010 以 这 种 方 式 管 理 宏, 使 得 用 户 创 建 宏 更 为 方 便 和 容 易 169

Access 2010 数 据 库 应 用 技 术 3 在 此 数 据 库 中 部 分 列 出 了 当 前 数 据 库 中 的 所 有 宏, 以 便 用 户 可 以 重 复 使 用 所 创 建 的 宏 和 事 件 过 程 代 码 展 开 在 此 数 据 库 中 通 常 显 示 下 一 级 列 表 报 表 窗 体 和 宏, 进 一 步 展 开 报 表 窗 体 和 宏 后, 显 示 出 在 报 表 窗 体 和 宏 中 的 事 件 过 程 或 宏 3. 宏 设 计 窗 口 Access 2010 重 新 设 计 了 宏 设 计 窗 口, 使 得 开 发 宏 更 为 方 便 当 创 建 一 个 宏 后, 在 宏 设 计 窗 口 中, 出 现 一 个 组 合 框, 在 其 中 可 以 添 加 宏 操 作 并 设 置 操 作 参 数, 如 图 7-3 所 示 添 加 新 的 宏 操 作 有 3 种 方 式 1 直 接 在 添 加 新 操 作 组 合 框 中 输 入 宏 操 作 名 称 2 单 击 添 加 新 操 作 组 合 框 的 向 下 箭 头, 在 打 开 的 列 表 中 选 择 相 应 的 宏 操 作 3 从 操 作 目 录 窗 格 中 把 某 个 宏 操 作 拖 曳 到 组 合 框 中 或 双 击 某 个 宏 操 作 例 如, 双 击 操 作 目 录 窗 格 中 数 据 库 对 象 中 的 OpenForm 命 令 后, 在 宏 设 计 窗 口 中 添 加 了 OpenForm 操 作, 并 在 操 作 名 称 下 方 出 现 6 个 参 数, 供 用 户 根 据 需 要 来 设 置 当 光 标 指 向 某 个 参 数 时, 系 统 会 显 示 相 应 的 说 明 信 息 在 操 作 名 称 前 的 - 号 用 于 折 叠 或 展 开 参 数 设 置 提 示, 而 操 作 名 称 最 右 边 的 按 钮 用 于 删 除 该 操 作, 如 图 7-4 所 示 图 7-3 宏 设 计 窗 口 图 7-4 在 宏 设 计 窗 口 添 加 宏 操 作 命 令 7.1.3 常 用 的 宏 操 作 命 令 Access 2010 提 供 了 66 种 基 本 的 宏 操 作 命 令, 在 操 作 目 录 窗 格 的 操 作 列 表 项 中 会 显 示 所 有 170

第 7 章 宏 的 宏 操 作 命 令 在 宏 设 计 窗 口 中, 可 以 调 用 这 些 基 本 的 宏 操 作 命 令, 并 配 置 相 应 的 操 作 参 数, 自 动 完 成 对 数 据 库 的 各 种 操 作 根 据 宏 操 作 命 令 的 用 途 来 分 类, 下 面 列 出 了 常 用 的 宏 操 作 命 令 1. 打 开 或 关 闭 数 据 库 对 象 常 用 的 宏 命 令 有 : 1 OpenForm: 打 开 窗 体 2 OpenQuery: 打 开 查 询 3 OpenReport: 打 印 报 表 4 OpenTable: 打 开 表 5 CloseDatabase: 关 闭 当 前 数 据 库 2. 查 找 记 录 常 用 的 宏 命 令 有 : 1 FindNextRecord: 查 找 符 合 指 定 条 件 的 下 一 条 记 录 2 FindRecord: 查 找 符 合 条 件 的 第 一 条 记 录 3 GoToRecord: 指 定 当 前 记 录 3. 用 户 界 面 常 用 的 宏 命 令 有 AddMenu, 用 于 创 建 菜 单 栏 4. 运 行 和 控 制 流 程 常 用 的 宏 命 令 有 : 1 RunMacro: 执 行 一 个 宏 2 StopAllMacros: 终 止 当 前 所 有 宏 的 运 行 171

Access 2010 数 据 库 应 用 技 术 3 StopMacro: 终 止 当 前 正 在 运 行 的 宏 4 QuitAccess: 退 出 Access 5. 窗 口 控 制 常 用 的 宏 命 令 有 : 1 MaximizeWindow: 将 窗 口 最 大 化 2 MinimizeWindow: 将 窗 口 最 小 化 3 RestoreWindow: 将 窗 口 恢 复 为 原 来 大 小 4 CloseWindow: 关 闭 指 定 或 活 动 窗 口 6. 通 知 或 警 告 常 用 的 宏 命 令 有 : 1 Beep: 通 过 计 算 机 的 扬 声 器 发 出 嘟 嘟 声 2 MessageBox: 显 示 消 息 框 7.2 宏 的 创 建 宏 的 创 建 方 法 与 其 他 对 象 的 创 建 方 法 稍 有 不 同, 其 他 对 象 的 创 建 既 可 以 通 过 自 动 方 式 手 动 方 式 向 导 创 建, 也 可 以 通 过 设 计 视 图 创 建, 但 宏 只 能 通 过 设 计 视 图 创 建 7.2.1 创 建 独 立 的 宏 要 创 建 宏, 需 在 宏 设 计 窗 口 中 添 加 宏 操 作 命 令 提 供 注 释 说 明 及 设 置 操 作 参 数 选 定 一 个 操 作 后, 在 宏 设 计 窗 口 的 操 作 参 数 设 置 区 会 出 现 与 该 操 作 对 应 的 操 作 参 数 设 置 表 通 常 情 况 下, 当 单 击 操 作 参 数 列 表 框 时, 会 在 列 表 框 的 右 侧 出 现 一 个 向 下 箭 头, 单 击 该 向 下 箭 头, 可 在 弹 出 的 下 172

第 7 章 宏 拉 列 表 中 选 择 操 作 参 数 1. 创 建 操 作 序 列 宏 创 建 操 作 序 列 宏 是 最 基 本 的 创 建 宏 的 方 法, 下 面 通 过 例 子 说 明 操 作 步 骤 例 7-1 创 建 宏, 其 功 能 是 打 开 学 生 表 和 学 生 选 课 成 绩 查 询, 然 后 先 关 闭 查 询, 再 关 闭 表, 关 闭 前 用 消 息 框 提 示 操 作 操 作 步 骤 如 下 : 1 要 创 建 宏, 首 先 要 打 开 一 个 数 据 库, 然 后 单 击 创 建 选 项 卡, 在 宏 与 代 码 命 令 组 中 单 击 宏 命 令 按 钮, 打 开 宏 设 计 窗 口 新 建 一 个 宏, 进 入 宏 设 计 窗 口 2 在 操 作 目 录 窗 格 中 把 程 序 流 程 中 的 注 释 Comment 拖 到 添 加 新 操 作 组 合 框 中 或 双 击 Comment, 在 宏 设 计 器 中 出 现 相 应 的 注 释 行, 在 其 中 输 入 打 开 学 生 表 把 光 标 定 在 添 加 新 操 作 的 组 合 框 中, 单 击 右 侧 的 向 下 箭 头, 在 打 开 的 下 拉 列 表 中 选 择 OpenTable 命 令, 单 击 表 名 称 参 数 组 合 框 右 侧 的 向 下 箭 头, 选 择 学 生 表, 其 他 参 数 取 默 认 值, 如 图 7-5 所 示 单 击 宏 操 作 命 令 右 侧 的 上 移 下 移 箭 头 按 钮 可 以 改 变 宏 操 作 的 顺 序, 单 击 右 侧 的 删 除 按 钮 可 以 删 除 宏 操 作 3 将 Comment 拖 到 添 加 新 操 作 组 合 框 中, 在 注 释 中 输 入 打 开 学 生 选 课 成 绩 查 询 在 添 加 新 操 作 组 合 框 中 选 择 OpenQuery 命 令, 设 置 查 询 名 称 的 参 数 为 学 生 选 课 成 绩 查 询, 其 他 参 数 取 默 认 值 4 将 Comment 拖 到 添 加 新 操 作 组 合 框 中, 在 注 释 中 输 入 提 示 信 息 在 添 加 新 操 作 组 合 框 中 选 择 MessageBox 命 令, 在 消 息 参 数 中 输 入 关 闭 查 询 吗?, 在 标 题 中 输 入 提 示 信 息!, 其 他 参 数 取 默 认 值 173

Access 2010 数 据 库 应 用 技 术 5 将 Comment 拖 到 添 加 新 操 作 组 合 框 中, 在 注 释 中 输 入 关 闭 查 询 在 添 加 新 操 作 组 合 框 中 选 择 CloseWindow 命 令, 在 对 象 类 型 参 数 的 下 拉 列 表 中 选 择 查 询 选 项, 在 对 象 名 称 参 数 的 下 拉 列 表 中 选 择 学 生 选 课 成 绩 查 询, 其 他 参 数 取 默 认 值 6 用 类 似 的 操 作 方 法 再 加 入 MessageBox 命 令 和 CloseWindow 命 令, 注 意 选 择 不 同 的 操 作 参 数 7 以 操 作 序 列 宏 为 名 保 存 设 计 好 的 宏 8 在 宏 工 具 / 设 计 选 项 卡 的 工 具 命 令 组 中 单 击 运 行 命 令 按 钮, 运 行 设 计 好 的 宏, 将 按 顺 序 执 行 宏 中 的 操 作 宏 是 按 宏 名 进 行 调 用 的 命 名 为 AutoExec 的 宏 将 在 打 开 该 数 据 库 时 自 动 运 行, 如 果 要 取 消 自 动 运 行, 则 在 打 开 数 据 库 时 按 住 Shift 键 即 可 2. 创 建 子 宏 创 建 子 宏 通 过 操 作 目 录 窗 格 中 程 序 流 程 下 的 Submacro 来 实 现 可 通 过 与 添 加 宏 操 作 相 同 的 方 式 将 Submacro 块 添 加 到 宏, 然 后, 将 宏 操 作 添 加 到 该 块 中, 并 给 不 同 的 块 加 上 不 同 的 名 字 也 可 以 选 择 一 个 或 多 个 操 作, 鼠 标 右 键 单 击 它 们, 然 后 选 择 生 成 子 宏 程 序 块 命 令, 直 接 创 建 子 宏 子 宏 必 须 始 终 是 宏 中 最 后 的 块, 不 能 在 子 宏 下 添 加 任 何 操 作 ( 除 非 有 更 多 子 宏 ) 例 7-2 创 建 子 宏, 其 功 能 是 将 例 7-1 中 的 6 个 操 作 分 成 两 个 宏, 打 开 和 关 闭 学 生 表 是 第 1 个 宏, 打 开 和 关 闭 学 生 选 课 成 绩 查 询 是 第 2 个 宏, 关 闭 前 都 用 消 息 框 提 示 操 作 操 作 步 骤 如 下 : 1 打 开 例 7-1 中 创 建 的 操 作 序 列 宏, 进 入 宏 设 计 窗 口 174

第 7 章 宏 2 在 操 作 目 录 窗 格 中, 把 程 序 流 程 中 的 子 宏 Submacro 拖 到 添 加 新 操 作 组 合 框 中, 在 子 宏 名 称 文 本 框 中, 默 认 名 称 为 Sub1, 把 该 名 称 修 改 为 宏 1 在 添 加 新 操 作 组 合 框 中, 选 择 OpenTable 命 令, 设 置 表 名 称 为 学 生 表 继 续 在 添 加 新 操 作 组 合 框 中 选 择 MessageBox 和 CloseWindow 命 令, 设 置 如 图 7-6 所 示 图 7-5 操 作 序 列 宏 的 设 置 图 7-6 子 宏 设 置 3 按 照 上 面 的 方 法 设 置 宏 2 4 以 宏 名 子 宏 保 存 宏 如 果 运 行 的 宏 仅 包 含 多 个 子 宏, 但 没 有 专 门 指 定 要 运 行 的 子 宏, 则 只 会 运 行 第 一 个 子 宏 在 导 航 窗 格 中 的 宏 名 称 列 表 中 将 显 示 宏 的 名 称 如 果 要 引 用 宏 中 的 子 宏, 其 引 用 格 式 是 宏 名. 子 宏 名 例 如, 直 接 运 行 子 宏 则 自 动 运 行 宏 1, 要 运 行 宏 2, 可 以 单 击 数 据 库 工 具 选 项 卡, 再 在 宏 命 令 组 中 单 击 运 行 宏 命 令 按 钮, 在 出 现 的 执 行 宏 对 话 框 中 输 入 子 宏. 宏 2, 如 图 7-7 所 示 当 然, 子 宏 也 可 以 在 事 件 属 性 中, 或 使 用 RunMacro 操 作 或 OnError 操 作 来 执 行 要 将 一 个 操 作 或 操 作 集 合 指 派 给 某 个 特 定 的 按 键, 可 以 创 建 一 个 名 为 AutoKeys 的 宏 组, 在 按 下 特 定 的 按 键 时,Access 就 会 执 行 相 应 的 操 作 创 建 AutoKeys 宏, 要 在 子 宏 名 称 文 本 框 中 输 入 特 定 的 按 键, 表 7-1 中 列 出 了 能 够 在 AutoKeys 宏 中 作 为 宏 名 的 按 键 表 7-1 AutoKeys 宏 中 作 为 宏 名 的 按 键 175

Access 2010 数 据 库 应 用 技 术 按 键 名 说 明 ^A 或 ^1 {F1} ^{F1} +{F1} {Insert} ^{Insert} +{Insert} {Delete} 或 {Del} ^{Delete} 或 ^{Del} +{Delete} 或 +{Del} Ctrl+ 任 何 字 母 或 数 字 键 任 何 功 能 键 Ctrl+ 任 何 功 能 键 Shift+ 任 何 功 能 键 Ins Ctrl+Ins Shift+Ins Del Ctrl+Del Shift+Del 例 7-3 建 立 一 个 AutoKeys 宏, 当 按 下 Ctrl+O 组 合 键 时 打 开 学 生 表, 当 按 下 F5 功 能 键 时 打 开 学 生 选 课 成 绩 查 询 操 作 步 骤 如 下 : 1 打 开 宏 设 计 窗 口 2 在 操 作 目 录 窗 格 中, 把 程 序 流 程 中 的 子 宏 Submacro 拖 到 添 加 新 操 作 组 合 框 中, 在 子 宏 名 称 文 本 框 中, 默 认 名 称 为 Sub1, 把 该 名 称 修 改 为 ^O 在 添 加 新 操 作 组 合 框 中, 选 择 OpenTable 命 令, 设 置 表 名 称 为 学 生 表 3 把 程 序 流 程 中 的 子 宏 Submacro 拖 到 添 加 新 操 作 组 合 框 中, 把 名 称 修 改 为 {F5}, 在 添 加 新 操 作 列 中 选 择 OpenQuery 命 令, 设 置 查 询 名 称 为 学 生 选 课 成 绩 4 以 AutoKeys 为 名 称 保 存 宏, 设 置 结 果 如 图 7-8 所 示 此 后, 只 要 教 学 管 理 数 据 库 是 打 开 的, 在 任 何 情 况 下 按 下 Ctrl+O 组 合 键 时, 都 将 执 行 打 开 学 生 表 操 作, 按 下 F5 功 能 键, 都 将 执 行 查 询 学 生 选 课 成 绩 操 作 176

第 7 章 宏 3. 创 建 宏 组 创 建 宏 组 通 过 操 作 目 录 窗 格 中 程 序 流 程 下 的 Group 来 实 现 首 先 将 Group 块 添 加 到 宏 设 计 窗 口 中, 在 Group 块 顶 部 的 框 中, 输 入 宏 组 的 名 称, 然 后 将 宏 操 作 添 加 到 Group 块 中 如 果 要 分 组 的 操 作 已 在 宏 中, 可 以 选 择 要 分 组 的 宏 操 作, 右 键 单 击 所 选 的 操 作, 然 后 选 择 生 成 分 组 程 序 块 命 令, 并 在 Group 块 顶 部 的 框 中, 输 入 宏 组 的 名 称 Group 块 不 会 影 响 宏 操 作 的 执 行 方 式, 组 不 能 单 独 调 用 或 运 行 此 外, Group 块 可 以 包 含 其 他 Group 块, 最 多 可 以 嵌 套 9 级 例 7-4 将 例 7-2 中 的 子 宏 改 为 宏 组, 再 执 行 宏 组 操 作 步 骤 如 下 : 1 先 将 子 宏 另 存 为 宏 组, 并 打 开 宏 组 2 添 加 Group 块, 并 输 入 名 称 组 1 3 利 用 宏 操 作 命 令 右 侧 的 上 移 下 移 箭 头 按 钮, 将 原 来 宏 1 中 的 操 作 移 入 组 1, 最 后 利 用 子 宏 : 宏 1 右 侧 的 删 除 按 钮 删 除 Submacro 块 4 用 同 样 的 方 法, 修 改 添 加 组 2 5 存 盘, 设 计 的 宏 组 如 图 7-9 所 示 6 运 行 宏 组 将 依 次 执 行 组 1 和 组 2 中 的 操 作, 所 以 分 组 只 是 宏 的 一 种 组 织 方 式, 它 不 改 变 宏 的 执 行 方 式, 组 不 能 单 独 运 行 4. 创 建 条 件 操 作 宏 如 果 希 望 当 满 足 指 定 条 件 时 才 执 行 宏 的 一 个 或 多 个 操 作, 可 以 使 用 操 作 目 录 窗 格 中 的 If 流 程 控 制, 通 过 设 置 条 件 来 控 制 宏 的 执 行 流 程, 形 成 条 件 操 作 宏 177

Access 2010 数 据 库 应 用 技 术 这 里 的 条 件 是 一 个 逻 辑 表 达 式, 返 回 值 是 真 (True) 或 假 (False) 运 行 时 将 根 据 条 件 的 结 果, 决 定 是 否 执 行 对 应 的 操 作 如 果 条 件 结 果 为 True, 则 执 行 此 行 中 的 操 作 ; 若 条 件 结 果 为 False, 则 忽 略 其 后 的 操 作 在 输 入 条 件 表 达 式 时, 可 能 会 引 用 窗 体 或 报 表 上 的 控 件 值, 引 用 格 式 为 Forms![ 窗 体 名 ]![ 控 件 名 ] 或 [Forms]![ 窗 体 名 ]![ 控 件 名 ] Reports![ 报 表 名 ]![ 控 件 名 ] 或 [Reports]![ 报 表 名 ]![ 控 件 名 ] 例 7-5 创 建 一 个 条 件 操 作 宏 并 在 窗 体 中 调 用 它, 用 于 判 断 数 据 的 奇 偶 性, 如 图 7-10 所 示 图 7-9 宏 组 设 置 图 7-10 判 断 数 据 的 奇 偶 性 窗 体 操 作 步 骤 如 下 : 1 创 建 一 个 窗 体, 其 中 包 含 一 个 标 签 和 一 个 文 本 框 ( 名 称 为 Text1 ), 并 设 置 窗 体 和 控 件 的 其 他 属 性 2 打 开 宏 设 计 窗 口, 把 程 序 流 程 中 的 If 操 作 拖 入 添 加 新 操 作 组 合 框 中, 单 击 条 件 表 达 式 178

第 7 章 宏 文 本 框 右 侧 的 按 钮, 如 图 7-11 所 示 3 打 开 表 达 式 生 成 器 对 话 框, 在 表 达 式 元 素 窗 格 中, 展 开 教 学 管 理.accdb/Forms/ 所 有 窗 体, 选 中 判 断 数 据 的 奇 偶 性 窗 体 在 表 达 式 类 别 窗 格 中, 双 击 Text1, 在 表 达 式 中 输 入 Mod 2=0, 如 图 7-12 所 示 单 击 确 定 按 钮, 返 回 到 宏 设 计 窗 口 中 图 7-11 If 条 件 设 置 图 7-12 在 表 达 式 生 成 器 设 置 宏 操 作 条 件 4 在 添 加 新 操 作 组 合 框 中 单 击 向 下 箭 头, 在 打 开 的 列 表 中 选 择 MessageBox 命 令, 在 消 息 参 数 中 输 入 该 数 为 偶 数!, 在 标 题 参 数 中 输 入 判 断 结 果, 其 他 参 数 取 默 认 值, 设 置 结 果 如 图 7-13 所 示 5 重 复 步 骤 2 3 和 4, 设 置 第 2 个 If 操 作, 在 If 的 条 件 表 达 式 中 输 入 条 件 :[Forms]![ 判 断 数 据 的 奇 偶 性 ]![Text1] Mod 2=1, 在 添 加 新 操 作 组 合 框 中, 选 择 MessageBox 命 令, 在 消 息 参 数 中 输 入 该 数 为 奇 数!, 在 标 题 参 数 中 输 入 判 断 结 果, 其 他 参 数 取 默 认 值 6 重 复 步 骤 2 步 骤 3 和 步 骤 4, 设 置 第 3 个 If 操 作, 在 If 的 条 件 表 达 式 中 输 入 条 件 : IsNull([Text1]), 在 添 加 新 操 作 组 合 框 中, 选 择 MessageBox 命 令, 在 消 息 参 数 中 输 入 没 有 输 入 内 容!, 在 标 题 参 数 中 输 入 警 告 7 将 宏 保 存 为 条 件 操 作 宏 8 在 设 计 视 图 中 打 开 判 断 数 据 的 奇 偶 性 窗 体, 在 Text1 属 性 表 对 话 框 的 事 件 标 签 中 将 179

Access 2010 数 据 库 应 用 技 术 文 本 框 Text1 的 更 新 后 事 件 属 性 为 条 件 操 作 宏 也 可 以 单 击 更 新 后 事 件 属 性 右 边 的 省 略 号 按 钮, 进 入 宏 设 计 窗 口, 完 成 宏 的 设 计 9 在 窗 体 视 图 中 打 开 判 断 数 据 的 奇 偶 性 窗 体, 在 文 本 框 中 输 入 数 据 并 按 Enter 键 后, 会 出 现 判 断 结 果 7.2.2 创 建 嵌 入 的 宏 嵌 入 的 宏 与 独 立 的 宏 的 不 同 之 处 在 于, 嵌 入 的 宏 存 储 在 窗 体 报 表 或 控 件 的 事 件 属 性 中 它 们 并 不 作 为 对 象 显 示 在 导 航 窗 格 中 的 宏 对 象 下 面, 而 成 为 窗 体 报 表 或 控 件 的 一 部 分 创 建 嵌 入 的 宏 与 宏 对 象 的 方 法 略 有 不 同 嵌 入 的 宏 必 须 先 选 择 要 嵌 入 的 事 件, 然 后 再 编 辑 嵌 入 的 宏 使 用 控 件 向 导 在 窗 体 中 添 加 命 令 按 钮, 也 会 自 动 在 按 钮 单 击 事 件 中 生 成 嵌 入 的 宏 例 7-6 在 学 生 窗 体 的 加 载 事 件 中 创 建 嵌 入 的 宏, 用 于 显 示 打 开 学 生 窗 体 的 提 示 信 息 操 作 步 骤 如 下 : 1 打 开 教 学 管 理 数 据 库, 打 开 学 生 窗 体, 切 换 到 设 计 视 图 或 布 局 视 图, 打 开 属 性 表 对 话 框, 在 对 象 列 表 中 选 择 窗 体 2 在 窗 体 属 性 表 中, 单 击 事 件 选 项 卡, 选 择 加 载 事 件 属 性, 并 单 击 框 旁 边 的 省 略 号 按 钮, 在 选 择 生 成 器 对 话 框 中, 选 择 宏 生 成 器 选 项, 然 后 单 击 确 定 按 钮 3 这 时 进 入 宏 设 计 窗 口, 添 加 MessageBox 操 作, 消 息 参 数 填 打 开 学 生 窗 体, 标 题 参 数 填 提 示 4 保 存 窗 体, 退 出 宏 设 计 窗 口 5 进 入 窗 体 视 图 或 布 局 视 图, 该 宏 将 在 学 生 窗 体 加 载 时 触 发 运 行, 弹 出 一 个 提 示 消 息 框 180

第 7 章 宏 7.2.3 创 建 数 据 宏 在 数 据 表 视 图 中 查 看 表 时, 可 从 表 格 工 具 / 表 选 项 卡 管 理 数 据 宏 根 据 数 据 宏 的 触 发 时 机, 数 据 宏 包 括 5 种 : 更 改 前 删 除 前 插 入 后 更 新 后 删 除 后 每 当 在 表 中 添 加 更 新 或 删 除 数 据 时, 都 会 发 生 表 事 件 可 以 编 写 一 个 数 据 宏, 使 其 在 发 生 这 3 种 事 件 中 的 任 一 种 事 件 之 后, 或 发 生 删 除 或 更 改 事 件 之 前 立 即 运 行 例 7-7 创 建 数 据 宏, 当 输 入 学 生 表 的 性 别 字 段 时 在 修 改 前 进 行 数 据 验 证, 并 给 出 错 误 提 示 操 作 步 骤 如 下 : 1 在 导 航 窗 格 中, 双 击 要 向 其 中 添 加 数 据 宏 的 学 生 表 2 单 击 表 格 工 具 / 表 选 项 卡, 在 前 期 事 件 命 令 组 中 单 击 更 改 前 命 令 按 钮, 打 开 宏 设 计 窗 口 3 在 宏 设 计 窗 口 添 加 需 要 宏 执 行 的 操 作, 如 图 7-14 所 示 4 保 存 并 关 闭 宏 5 在 表 中 输 入 数 据 验 证, 当 输 入 性 别 不 是 男, 也 不 是 女 时, 给 出 提 示 信 息, 如 图 7-15 所 示 图 7-14 数 据 宏 的 设 置 图 7-15 数 据 宏 的 运 行 导 航 窗 格 的 宏 对 象 下 不 显 示 数 据 宏, 而 必 须 使 用 表 的 数 据 表 视 图 或 设 计 视 图 中 的 功 能 区 命 181

Access 2010 数 据 库 应 用 技 术 令, 才 能 创 建 编 辑 重 命 名 和 删 除 数 据 宏 在 导 航 窗 格 中, 双 击 其 中 包 含 要 编 辑 的 数 据 宏 的 表, 在 表 格 工 具 / 表 选 项 卡 的 前 期 事 件 组 或 后 期 事 件 命 令 组 中, 单 击 要 编 辑 的 宏 的 事 件 例 如, 要 编 辑 在 删 除 表 记 录 后 运 行 的 数 据 宏, 则 单 击 删 除 后 命 令 按 钮,Access 打 开 宏 设 计 窗 口, 随 后 可 开 始 编 辑 宏 7.3 宏 的 运 行 与 调 试 设 计 完 成 一 个 宏 对 象 或 嵌 入 的 宏 后 即 可 运 行 调 试 其 中 的 各 个 操 作 Access 2010 提 供 了 OnError 和 ClearMacroError 宏 操 作, 可 以 在 宏 运 行 过 程 中 出 错 时 执 行 特 定 操 作 另 外,SingleStep 宏 操 作 允 许 在 宏 执 行 过 程 中 进 入 单 步 执 行 模 式, 可 以 通 过 每 次 执 行 一 个 操 作 来 了 解 宏 的 工 作 状 态 7.3.1 宏 的 运 行 运 行 宏 时,Access 将 从 宏 的 起 始 点 启 动, 并 执 行 宏 中 所 有 操 作, 直 到 另 一 个 宏 ( 如 果 宏 在 宏 组 ) 或 宏 的 结 束 点 在 Access 中, 可 以 直 接 运 行 某 个 宏, 也 从 其 他 宏 中 执 行 宏, 还 可 以 通 过 响 应 窗 体 报 表 或 控 件 的 事 件 来 运 行 宏 1. 直 接 运 行 宏 直 接 运 行 宏 主 要 是 为 了 对 创 建 的 宏 进 行 调 试, 以 测 试 宏 的 正 确 性 直 接 运 行 宏 有 以 下 3 种 方 法 1 在 导 航 窗 格 中 选 择 宏 对 象, 然 后 双 击 宏 名 2 在 数 据 库 工 具 选 项 卡 的 宏 命 令 组 中 单 击 运 行 宏 命 令 按 钮, 弹 出 执 行 宏 对 话 框, 如 图 7-16 所 示 在 宏 名 称 下 拉 列 表 中 选 择 要 执 行 的 宏, 然 后 单 击 确 定 按 钮 3 在 宏 的 设 计 视 图 中, 单 击 宏 工 具 / 设 计 选 项 卡, 在 工 具 命 令 组 中 单 击 运 行 命 令 按 钮 182

第 7 章 宏 2. 从 其 他 宏 中 执 行 宏 如 果 要 从 其 他 的 宏 中 运 行 另 一 个 宏, 必 须 在 宏 设 计 视 图 中 使 用 RunMacro 宏 操 作 命 令, 要 运 行 的 另 一 个 宏 的 宏 名 作 为 操 作 参 数 3. 自 动 执 行 宏 将 宏 的 名 字 设 为 AutoExec, 则 在 每 次 打 开 数 据 库 时, 将 自 动 执 行 该 宏, 可 以 在 该 宏 中 设 置 数 据 库 初 始 化 的 相 关 操 作 4. 通 过 响 应 事 件 运 行 宏 在 实 际 的 应 用 系 统 中, 设 计 好 的 宏 更 多 的 是 通 过 窗 体 报 表 或 或 控 件 上 发 生 的 事 件 触 发 相 应 的 宏 或 事 件 过 程, 使 之 投 入 运 行 例 7-5 即 是 通 过 文 本 框 的 更 新 后 事 件 属 性 来 执 行 宏 下 面 再 看 一 个 以 事 件 响 应 方 式 执 行 宏 的 例 子 例 7-8 在 窗 体 中 显 示 要 打 开 或 关 闭 的 表, 在 窗 体 命 令 按 钮 单 击 事 件 中 加 入 宏 来 控 制 打 开 或 关 闭 所 选 定 的 表 操 作 步 骤 如 下 : 1 创 建 如 图 7-17 所 示 的 数 据 表 选 择 窗 体, 其 中 包 含 一 个 标 签 一 个 组 合 框 ( 名 称 为 Frame1, 其 中 包 含 3 个 选 项 按 钮 及 派 生 的 标 签 ) 和 两 个 命 令 按 钮 ( 名 称 为 Command1 和 Command2), 并 设 置 窗 体 和 控 件 的 其 他 属 性 2 创 建 图 7-18 所 示 的 打 开 报 表 宏, 其 中 包 含 打 开 和 关 闭 两 个 宏, 设 置 相 关 操 作 参 数 183

Access 2010 数 据 库 应 用 技 术 图 7-17 数 据 表 选 择 窗 体 图 7-18 打 开 报 表 宏 的 设 置 3 设 置 数 据 表 选 择 窗 体 中 命 令 按 钮 Command1 的 单 击 事 件 属 性 为 打 开 报 表 宏. 打 开, 设 置 命 令 按 钮 Command 2 的 单 击 事 件 属 性 为 打 开 报 表 宏. 关 闭 4 在 窗 体 视 图 中 打 开 数 据 表 选 择 窗 体, 在 单 击 命 令 按 钮 后, 会 自 动 运 行 设 置 的 宏 来 打 开 相 应 的 表 7.3.2 宏 的 调 试 Access 提 供 了 单 步 执 行 的 宏 调 试 工 具 使 用 单 步 跟 踪 执 行, 可 以 观 察 宏 的 执 行 流 程 和 每 一 步 操 作 的 结 果, 便 于 分 析 和 修 改 宏 中 的 错 误 例 7-9 利 用 单 步 执 行, 观 察 例 7-1 中 创 建 的 操 作 序 列 宏 的 执 行 流 程 操 作 步 骤 如 下 : 1 在 导 航 窗 格 中 选 择 宏 对 象, 打 开 操 作 序 列 宏 宏 的 设 计 视 图 2 在 宏 工 具 / 设 计 选 项 卡 的 工 具 命 令 组 中, 选 中 单 步 按 钮, 然 后 单 击 运 行 命 令 按 钮, 系 统 将 出 现 单 步 执 行 宏 对 话 框, 如 图 7-19 所 示 此 对 话 框 显 示 与 宏 及 宏 操 作 有 关 的 信 息 以 及 错 误 号 错 误 号 框 中 如 果 为 零, 则 表 示 未 发 生 错 误 184

第 7 章 宏 图 7-19 单 步 执 行 宏 对 话 框 3 在 单 步 执 行 宏 对 话 框 中 可 以 观 察 宏 的 执 行 过 程, 并 对 宏 的 执 行 进 行 干 预 单 击 单 步 执 行 按 钮, 执 行 其 中 的 操 作 ; 单 击 停 止 所 有 宏 按 钮, 停 止 宏 的 执 行 并 关 闭 对 话 框 ; 单 击 继 续 按 钮, 关 闭 单 步 执 行 方 式, 并 执 行 宏 的 未 完 成 部 分 如 果 要 在 宏 执 行 过 程 中 暂 停 宏 的 执 行, 可 按 Ctrl+Break 组 合 键 7.4 宏 的 应 用 宏 可 以 加 载 到 窗 体 及 控 件 的 各 个 事 件 中, 利 用 宏 可 以 实 现 经 常 要 重 复 的 操 作, 如 打 开 窗 体 关 闭 窗 体 跳 转 到 某 条 记 录 等 本 节 介 绍 宏 的 几 种 典 型 应 用 7.4.1 创 建 登 录 窗 体 登 录 窗 体 是 数 据 库 应 用 系 统 中 必 须 有 的 窗 体, 用 于 验 证 用 户 身 份, 只 有 拥 有 合 法 用 户 名 和 密 码 的 用 户 才 能 进 入 系 统 操 作 例 7-10 创 建 一 个 系 统 登 录 窗 体, 要 求 从 登 录 窗 体 输 入 用 户 名 和 密 码, 当 输 入 正 确 时, 弹 出 欢 迎 使 用 系 统! 的 消 息 框, 然 后 关 闭 登 录 窗 体, 打 开 学 生 成 绩 窗 体 ; 当 输 入 不 正 确 时, 弹 出 用 户 名 或 密 码 不 正 确, 请 重 新 输 入! 的 消 息 框, 并 关 闭 登 录 窗 体 操 作 步 骤 如 下 : 185

Access 2010 数 据 库 应 用 技 术 1 利 用 窗 体 设 计 视 图, 在 窗 体 上 添 加 两 个 文 本 框, 用 来 输 入 用 户 名 和 密 码, 名 称 分 别 为 username password, password 文 本 框 的 输 入 掩 码 属 性 设 置 为 密 码 ; 两 个 文 本 框 附 加 标 签 的 标 题 属 性 分 别 设 置 为 用 户 名 密 码 再 添 加 两 个 命 令 按 钮, 名 称 分 别 为 cmdok cmdcancel, 标 题 属 性 分 别 为 确 定 取 消 将 窗 体 存 盘, 创 建 好 的 窗 体 如 图 7-20 所 示 2 双 击 确 定 按 钮, 弹 出 属 性 表 对 话 框, 在 事 件 选 项 卡 中 选 择 单 击 事 件, 单 击 其 右 边 的 省 略 号 按 钮, 弹 出 选 择 生 成 器 对 话 框, 选 择 宏 生 成 器 选 项, 然 后 单 击 确 定 按 钮, 启 动 宏 设 计 器 窗 口 3 添 加 If 操 作, 在 条 件 表 达 式 框 中 输 入 [Forms]![ 系 统 登 录 ]![username] = "jasmine" And [Forms]![ 系 统 登 录 ]![password] = "123456", 在 此 将 用 户 名 设 为 jasmine, 密 码 设 为 123456, 即 当 在 窗 体 中 输 入 的 用 户 名 和 密 码 都 正 确 时, 关 闭 该 登 录 窗 体, 弹 出 下 一 个 对 话 框 4 添 加 CloseWindow 操 作, 在 其 对 象 类 型 参 数 中 选 择 窗 体, 对 象 名 称 中 选 择 系 统 登 录, 表 示 用 来 关 闭 系 统 登 录 窗 体 添 加 MessageBox 操 作, 在 消 息 参 数 中 输 入 欢 迎 使 用 系 统!, 在 标 题 参 数 中 输 入 欢 迎, 表 示 在 登 录 窗 体 关 闭 后 弹 出 欢 迎 对 话 框 添 加 OpenForm 操 作, 在 窗 体 名 称 参 数 中 选 择 学 生 成 绩 窗 体, 即 打 开 学 生 成 绩 窗 体 5 添 加 Else 操 作, 并 添 加 MessageBox 操 作, 在 消 息 参 数 中 输 入 用 户 名 或 密 码 不 正 确, 请 重 新 输 入!, 在 标 题 参 数 中 输 入 提 示 6 添 加 SetProperty 操 作, 控 件 名 称 设 置 为 username, 属 性 设 置 为 值 其 作 用 是 将 用 户 名 文 本 框 中 的 值 设 置 为 空 再 添 加 SetProperty 操 作, 控 件 名 称 设 置 为 password, 属 性 设 置 为 值 其 作 用 是 将 密 码 文 本 框 中 的 值 设 置 为 空 宏 的 设 置 如 图 7-21 所 示 186

第 7 章 宏 图 7-21 确 定 按 钮 宏 的 设 置 7 接 下 来 创 建 取 消 按 钮 的 宏 双 击 取 消 按 钮, 弹 出 属 性 表 对 话 框, 在 事 件 选 项 卡 中 选 择 单 击 事 件, 单 击 其 右 边 的 省 略 号 按 钮, 弹 出 选 择 生 成 器 对 话 框, 选 择 宏 生 成 器 选 项, 然 后 单 击 确 定 按 钮, 启 动 宏 设 计 器 窗 口 8 添 加 CloseWindow 操 作, 在 其 对 象 类 型 参 数 中 选 择 窗 体, 对 象 名 称 中 选 择 系 统 登 录, 表 示 用 来 关 闭 系 统 登 录 窗 体 宏 的 设 置 如 图 7-22 所 示 9 返 回 系 统 登 录 窗 体 的 设 计 视 图 界 面, 选 择 窗 体 视 图 按 钮, 出 现 图 7-23 所 示 的 登 录 界 面, 输 入 不 同 的 用 户 名 和 密 码 实 现 不 同 的 操 作 图 7-22 取 消 按 钮 宏 的 设 置 图 7-23 系 统 登 录 窗 体 运 行 界 面 7.4.2 用 宏 控 制 窗 体 宏 可 以 对 窗 体 进 行 很 多 操 作, 包 括 打 开 关 闭 最 大 化 最 小 化 等, 下 面 通 过 建 立 一 个 AutoExec 宏 来 说 明 用 宏 控 制 窗 体 的 操 作 AutoExec 宏 会 在 打 开 数 据 库 时 触 发, 可 以 利 用 该 宏 启 动 登 录 对 话 框 窗 体 187

Access 2010 数 据 库 应 用 技 术 例 7-11 利 用 AutoExec 宏 自 动 启 动 系 统 登 录 窗 体 操 作 步 骤 如 下 : 1 打 开 教 学 管 理 数 据 库, 单 击 创 建 选 项 卡, 在 宏 与 代 码 命 令 组 中 单 击 宏 命 令 按 钮, 打 开 宏 设 计 窗 口 2 添 加 OpenForm 操 作, 窗 体 名 称 参 数 选 择 系 统 登 录, 窗 口 模 式 选 择 普 通 3 添 加 MoveAndSizeWindow 操 作, 参 数 设 置 为 右 100, 向 下 100, 宽 度 8000, 高 度 5000, 如 图 7-24 所 示 4 以 名 AutoExec 保 存 宏 5 关 闭 数 据 库, 重 新 打 开 数 据 库, 会 自 动 打 开 系 统 登 录 窗 体, 并 自 动 调 整 窗 体 的 大 小 和 位 置 7.4.3 利 用 宏 创 建 自 定 义 菜 单 和 快 捷 菜 单 在 Access 2010 中 利 用 宏 可 以 为 窗 体 报 表 创 建 自 定 义 菜 单, 也 可 以 创 建 快 捷 菜 单, 下 面 以 实 例 说 明 自 定 义 菜 单 的 创 建 方 法 例 7-12 利 用 宏 创 建 如 表 7-2 所 示 的 三 级 菜 单, 一 级 菜 单 包 括 文 件 编 辑 和 退 出 3 个 菜 单 项, 其 中 文 件 菜 单 包 括 打 开 窗 体 打 印 预 览 两 个 二 级 菜 单, 这 两 个 二 级 菜 单 又 分 别 包 含 3 个 三 级 菜 单, 编 辑 菜 单 包 含 3 个 二 级 菜 单, 退 出 菜 单 包 含 两 个 二 级 菜 单 表 7-2 各 级 菜 单 表 一 级 菜 单 二 级 菜 单 三 级 菜 单 文 件 打 开 窗 体 学 生 信 息 课 程 信 息 188

第 7 章 宏 学 生 选 课 成 绩 学 生 信 息 打 印 预 览 课 程 信 息 学 生 选 课 成 绩 学 生 表 编 辑 课 程 表 选 课 表 退 出 关 闭 退 出 操 作 步 骤 如 下 : 1 首 先 创 建 一 个 名 为 窗 体 菜 单 的 空 白 窗 体 2 创 建 一 个 生 成 一 级 菜 单 的 宏, 宏 名 为 菜 单 宏, 利 用 AddMenu 操 作 生 成 菜 单, 如 图 7-25 所 示 此 处 操 作 参 数 区 域 中 的 菜 单 名 称 表 示 生 成 一 级 菜 单 的 名 称, 菜 单 宏 名 称 表 示 该 菜 单 所 对 应 的 宏 名 称, 菜 单 宏 名 称 最 好 与 菜 单 名 称 相 同, 以 便 于 记 忆, 状 态 栏 文 字 参 数 可 省 3 创 建 一 个 名 为 文 件 的 宏, 利 用 AddMenu 操 作 生 成 两 个 子 菜 单, 如 图 7-26 所 示 图 7-25 菜 单 宏 设 置 图 7-26 文 件 菜 单 设 置 4 创 建 一 个 名 为 打 开 窗 体 的 宏, 其 界 面 如 图 7-27 所 示 其 中, 在 宏 名 后 加 上 圆 括 号, 圆 括 号 里 写 上 & 与 相 应 的 字 母, 是 为 菜 单 命 令 创 建 键 盘 访 问 键, 189

Access 2010 数 据 库 应 用 技 术 例 如 学 生 信 息 (&S) 表 示 可 以 通 过 S 键 来 选 择 该 菜 单 命 令 5 创 建 一 个 名 为 打 印 预 览 的 宏, 当 然 需 要 先 建 立 相 应 的 报 表, 其 界 面 如 图 7-28 所 示 图 7-27 打 开 窗 体 宏 设 置 图 7-28 打 印 预 览 宏 界 面 在 OpenReport 的 视 图 参 数 中 选 择 打 印 预 览 这 样 文 件 菜 单 下 的 各 级 子 菜 单 制 作 完 成 6 创 建 一 个 名 为 编 辑 的 宏, 如 图 7-29 所 示 7 制 作 一 个 名 为 退 出 的 宏, 界 面 如 图 7-30 所 示 图 7-29 编 辑 宏 设 置 图 7-30 退 出 宏 设 置 8 返 回 窗 体 菜 单 的 设 计 视 图 界 面, 把 菜 单 附 加 到 主 窗 体 上, 在 窗 体 上 添 加 一 个 标 题 如 学 生 成 绩 管 理 系 统 9 设 置 窗 体 的 属 性, 在 属 性 表 对 话 框 所 选 内 容 的 类 型 下 拉 列 表 中 选 中 窗 体, 单 击 其 他 190

第 7 章 宏 选 项 卡, 在 菜 单 栏 属 性 中 输 入 建 立 的 菜 单 宏 名 称, 如 图 7-31 所 示 对 所 建 的 宏 与 窗 体 及 时 保 存, 关 闭 各 设 计 视 图 界 面, 在 导 航 窗 格 的 窗 体 选 项 卡 中 双 击 窗 体 菜 单 对 象, 可 以 得 到 窗 体 界 面 在 该 界 面 中, 单 击 加 载 项 选 项 卡, 得 到 图 7-32 所 示 窗 体 界 面 图 7-31 窗 体 属 性 设 置 图 7-32 窗 体 菜 单 界 面 在 上 面 这 个 例 子 中, 是 给 窗 体 添 加 自 定 义 菜 单, 给 窗 体 添 加 快 捷 菜 单 的 基 本 步 骤 是 一 样 的, 只 是 菜 单 宏 添 加 的 位 置 不 一 样, 在 窗 体 属 性 表 对 话 框 的 其 他 选 项 卡 上 的 快 捷 菜 单 栏 属 性 框 中, 输 入 创 建 的 菜 单 宏, 则 菜 单 宏 中 的 菜 单 会 显 示 在 窗 体 运 行 视 图 的 右 键 快 捷 菜 单 中 要 添 加 全 局 快 捷 菜 单, 也 可 以 选 择 文 件 选 项 命 令, 在 Access 选 项 对 话 框 中, 单 击 当 前 数 据 库 选 项, 在 功 能 区 和 工 具 栏 选 项 下 的 快 捷 菜 单 栏 框 中, 输 入 菜 单 宏, 重 新 打 开 数 据 库, 会 在 所 有 对 象 中 显 示 创 建 的 右 键 快 捷 菜 单 7.4.4 使 用 宏 取 消 打 印 不 包 含 任 何 记 录 的 报 表 当 报 表 不 包 含 任 何 记 录 时, 打 印 该 报 表 就 没 有 意 义 在 Access 2007 中 可 向 报 表 的 无 数 据 事 件 过 程 中 添 加 宏 只 要 运 行 没 有 任 何 记 录 的 报 表, 就 会 触 发 无 数 据 事 件 当 打 开 报 表 不 包 含 任 何 数 据 时, 发 出 警 告 信 息, 单 击 确 定 关 闭 警 告 消 息 时, 宏 也 会 关 闭 空 报 表 例 7-13 使 用 宏 取 消 打 印 不 包 含 任 何 记 录 的 报 表 操 作 步 骤 如 下 : 191

Access 2010 数 据 库 应 用 技 术 1 打 开 教 学 管 理 数 据 库, 在 设 计 视 图 中 打 开 要 设 置 打 印 的 报 表 2 单 击 报 表 设 计 工 具 / 设 计 选 项 卡, 在 工 具 命 令 组 中 单 击 属 性 表 命 令 按 钮, 打 开 属 性 表 对 话 框 3 在 属 性 表 对 话 框 中 选 中 报 表 对 象, 并 单 击 事 件 选 项 卡, 然 后 在 无 数 据 属 性 框 中, 单 击 省 略 号 按 钮, 将 出 现 选 择 生 成 器 对 话 框, 单 击 宏 生 成 器 选 项, 然 后 单 击 确 定 按 钮, 打 开 宏 设 计 窗 口 4 添 加 MessageBox 操 作, 在 消 息 框 中 输 入 警 告 消 息 : 没 有 要 生 成 报 表 的 记 录!, 在 类 型 列 表 中, 选 择 警 告!, 在 标 题 框 中, 输 入 警 告 消 息 的 标 题 : 无 记 录 5 添 加 操 作, 选 择 CancelEvent 操 作 6 关 闭 并 保 存 宏, 再 关 闭 并 保 存 报 表 7 在 导 航 窗 格 中, 右 键 单 击 包 含 该 宏 的 报 表, 然 后 单 击 打 印 命 令 如 果 没 有 数 据 会 弹 出 警 告 消 息 单 击 确 定 关 闭 消 息 时,CancelEvent 操 作 会 停 止 打 印 操 作 192