VB程序设计教案(详细).pdf

1、1 珙 职 高 教 案第 1章 Visual Basic 6.0 概 述课 程 引 入 ：先 用 教 师 机 播 放 VB教 学 实 例 程 序 演 示 系 统 软 件 ， 将 几 个 用 VB编 写 的 、 有趣 的 典 型 应 用 程 序 实 例 ， 例 如 ： 倒 计 时 、 滚 动 字 幕 、 学 生 学 籍 管 理 、 自 制 IE浏 览器 等 演 示 给 学 生 ， 引 入 本 课 程 ， 以 提 高 学 生 的 感 性 认 识 及 学 习 兴 趣 。课 堂 提 问 及 讨 论 ：有 哪 些 同 学 见 过 或 使 用 过 VB应 用 程 序 ？ 试 举 例 说 明 。知 识 点

2、讲 解 ： 1.1 程 序 设 计 基 础一 、 程 序 设 计 几 个 概 念1、 程 序 ： 是 为 解 决 某 一 问 题 而 编 写 的 语 句 集 合 ， 是 将 一 个 实 际 问 题 的 具 体操 作 用 某 种 程 序 设 计 语 言 描 述 出 来 的 指 令 序 列 。2、 程 序 设 计 ： 是 分 析 问 题 、 编 写 程 序 、 调 试 程 序 的 过 程 。3、 程 序 设 计 语 言 ： 是 人 们 根 据 描 述 问 题 的 需 要 而 设 计 的 ， 有 固 定 的 符 号 和语 法 规 则 、 是 计 算 机 能 够 识 别 的 人 机 交 流 所 使 用

3、 的 语 言 。二 、 程 序 设 计 语 言 的 发 展 概 况1、 机 器 语 言2、 汇 编 语 言3、 高 级 语 言 1.2 Visual Basic 6.0 简 介一 、 Visual Basic 6.0简 介1、 概 念 ： Visual Basic 6.0 简 称 VB, 是 Windows 环 境 下 可 视 化 的 、 面 向 对象 的 程 序 设 计 开 发 工 具 。其 中 ： Visual英 文 原 意 是 “ 可 视 的 ” 、 “ 视 觉 的 ” 。 6.0是 版 本 号 。2、 VB 功 能 ： 用 它 可 以 开 发 数 学 计 算 、 数 据 库 管 理 、

4、 客 户 /服 务 器 软 件 、 通讯 软 件 、 多 媒 体 及 Internet/Intranet 软 件 等 。 其 功 能 之 强 大 绝 非 是 早 期 Basic所 能 比 拟 的 ， 其 直 观 、 通 俗 易 懂 ， 特 别 适 合 于 初 学 者 。3、 VB 发 展 过 程 ： 美 国 微 软 公 司 于 1991 年 推 出 VB1.0 版 至 今 已 经 历 了 6 个2 珙 职 高 教 案版 本 。4、 VB中 常 用 的 几 个 基 本 概 念 ：面 向 对 象 ： 面 向 对 象 编 程 是 建 立 在 类 的 基 础 上 的 ， 其 通 过 类 的 封 装 而

5、 使 源 程序 更 加 便 于 维 护 。事 件 驱 动 ： 在 事 件 驱 动 模 式 下 ， 程 序 的 执 行 是 依 靠 系 统 能 够 被 识 别 的 触 发 事件 启 动 的 。5、 VB 的 版 本 ：VB6.0 是 Microsoft Visual Studio 开 发 工 具 组 件 中 的 一 员 ， 它 共 有 3 个 版本 ： 标 准 版 、 专 业 版 、 企 业 版 。 教 学 中 采 用 企 业 版 。6、 运 行 环 境操 作 系 统 ： NT Server 4.0、 Windows 98， 或 更 高 版 本 。CPU： 486DX/66 MHz 或 更 高

6、的 处 理 器 。内 存 ： Windows 95 98 下 要 求 16MB 以 上 的 内 存 ， Windows NT 下 要 求 32MB以 上 。磁 盘 空 间 ： 对 于 标 准 版 或 专 业 版 ， 典 型 安 装 48MB， 完 全 安 装 80MB。 对 于 企业 版 ， 典 型 安 装 128MB， 完 全 安 装 147MB。其 他 设 备 ： CD-ROM 驱 动 器 ， 鼠 标 。7 、 VB特 点 ： 具 有 面 向 对 象 的 可 视 化 设 计 工 具 ； 事 件 驱 动 的 程 序 运 行 机 制 ； 提 供 了 易 学 易 用 的 应 用 程 序 集 成

7、开 发 环 境 。 结 构 化 的 程 序 设 计 语 言 ； 支 持 多 种 数 据 库 系 统 的 访 问 ； 支 持 动 态 数 据 交 换 、 动 态 链 接 库 和 对 象 嵌 入 技 术 ； 完 备 的 联 机 帮 助 功 能 。8、 VB 安 装 （ 略 ） 、 帮 助 系 统 的 使 用 （ 略 ）二 、 Visual Basic 6.0启 动 、 退 出1、 VB 的 启 动3 珙 职 高 教 案双 击 桌 面 上 的 VB快 捷 方 式 图 标 ， 或 单 击 桌 面 上 “ 开 始 ” 按 钮 “ 程 序 ” Microsoft Visual Basic 6.0 中 文

8、版 Microsoft Visual Basic 6.0 中 文 版 ，都 可 以 启 动 VB6.0。2、 VB的 退 出单 击 关 闭 按 钮 、 ALT+F4 快 捷 键 、 或 通 过 菜 单 命 令 “ 文 件 退 出 ” 均 可 关 闭 并退 出 VB集 成 环 境 。课 堂 练 习 ：1、 课 后 习 题 1： 。2、 预 习 本 章 后 面 内 容 ， 思 考 课 后 习 题 1： 3、 6。答 疑 ： 针 对 学 生 提 出 的 问 题 答 疑 。小 结 ： 本 节 主 要 讲 解 Visual Basic 6.0 可 视 化 编 程 的 基 本 概 念 、 发 展 过 程

9、、特 点 及 其 启 动 、 退 出 的 方 法 。 要 求 掌 握 全 部 知 识 点 。作 业 ： 上 机 熟 悉 Visual Basic 6.0的 启 动 、 退 出 及 界 面 组 成 。预 习 第 2 章 内 容 。4 珙 职 高 教 案 1. 3 VB 的 可 视 化 开 发 环 境复 习 ： 以 提 问 的 方 式 ， 复 习 上 节 所 讲 知 识 ， 检 查 学 生 掌 握 情 况 。引 入 ： 启 动 VB后 ， 同 学 们 见 到 的 VB开 发 环 境 由 哪 几 部 分 组 成 ？ 这 个 问 题 即 是本 节 要 讲 的 内 容 。知 识 点 讲 解 ：一 、 V

10、B 的 界 面 组 成VB的 界 面 由 标 题 栏 、 菜 单 栏 、 工 具 栏 、 控 件 箱 、 窗 体 编 辑 窗 口 、 工 程 资 源 管理 窗 口 、 属 性 窗 口 、 窗 体 布 局 窗 口 等 组 成 。 （ 如 教 材 图 2-2所 示 ）二 、 VB 各 部 分 功 能 简 介1、 菜 单 栏 ： 是 在 集 成 开 发 环 境 下 发 布 命 令 的 最 基 本 手 段 。 Visual Basic 顶级 菜 单 有 ： 文 件 、 编 辑 、 视 图 、 工 程 、 格 式 、 运 行 、 查 询 、 图 表 、 工 具 、 外 接 程序 、 窗 口 、 帮 助

11、， 但 菜 单 命 令 是 通 过 子 菜 单 中 的 子 菜 单 项 发 出 的 。文 件 菜 单 ： 主 要 用 于 建 立 、 打 开 、 添 加 、 移 去 、 保 存 工 程 和 文 件 ， 包 括 ： 新建 工 程 、 打 开 工 程 、 添 加 工 程 、 移 除 工 程 、 保 存 工 程 、 工 程 另 存 为 、 保 存文 件 、 文 件 另 存 为 、 打 印 、 打 印 设 置 等 子 菜 单 项 。编 辑 菜 单 ： 在 对 工 程 进 行 修 改 时 ， 编 辑 菜 单 用 于 各 种 编 辑 操 作 。 包 括 ： 撤 消 、重 复 、 剪 切 、 复 制 、 粘

12、 贴 、 粘 贴 链 接 、 删 除 、 全 选 、 查 找 、 缩 进 、 凸 出 、 插 入 文件 、 属 性 方 法 列 表 、 快 速 信 息 、 参 数 信 息 书 签 等 子 菜 单 项 。视 图 菜 单 ： 视 图 菜 单 用 于 显 示 各 种 窗 口 及 和 窗 口 有 关 的 操 作 。 包 括 ： 代 码 窗口 、 对 象 窗 口 、 定 义 、 最 后 位 置 、 对 象 浏 览 器 、 立 即 窗 口 、 本 地 窗 口 、 监 视 窗 口 、调 用 堆 栈 、 工 程 资 源 管 理 器 、 属 性 窗 口 、 窗 体 布 局 窗 口 、 属 性 页 、 表 、 缩

13、 放 、 显示 窗 格 、 工 具 箱 、 调 色 板 、 工 具 栏 等 子 菜 单 项 。工 程 菜 单 ： 用 于 为 当 前 工 程 创 建 模 块 、 作 对 象 引 用 或 提 供 各 种 设 计 器 。 包 括 ：添 加 窗 体 、 添 加 MDI 窗 体 、 添 加 模 块 、 添 加 用 户 控 件 、 添 加 属 性 页 、 添 加 用 户文 档 、 添 加 设 计 器 、 添 加 文 件 、 移 除 、 引 用 、 部 件 、 工 程 属 性 等 子 菜 单 项 。格 式 菜 单 ： 用 于 界 面 设 计 ， 能 使 界 面 中 的 控 件 按 规 范 排 列 。 包

14、括 ： 对 齐 、 统一 尺 寸 、 按 网 格 调 整 大 小 、 水 平 间 距 、 垂 直 间 距 、 锁 定 控 件 等 子 菜 单 项 。5 珙 职 高 教 案调 试 菜 单 ： 用 于 调 试 、 监 视 程 序 。 包 括 ： 逐 语 句 、 逐 过 程 、 跳 出 、 运 行 到 光标 处 、 添 加 监 视 、 编 辑 监 视 、 快 速 监 视 、 切 换 断 点 、 清 除 所 有 断 点 等 子 菜 单 项 。查 询 菜 单 ： 各 条 命 令 用 于 数 据 库 表 的 查 询 及 相 关 操 作 。 所 提 供 的 各 种 查 询 设计 工 具 ， 使 用 户 能

15、够 通 过 可 视 化 工 具 创 建 SQL 语 句 ， 实 现 对 数 据 库 的 查 询 、 修 改 。运 行 菜 单 ： 用 于 执 行 程 序 。 包 括 ： 启 动 、 全 编 译 执 行 、 中 断 、 结 束 、 重 新 启动 等 子 菜 单 项 。工 具 菜 单 包 括 ： 添 加 过 程 、 过 程 属 性 、 菜 单 编 辑 器 、 选 项 、 发 布 等 子 菜 单 项 。外 接 程 序 菜 单 用 于 为 当 前 工 程 创 建 含 有 ： 可 视 化 数 据 管 理 器 、 外 接 程 序 管 理器 等 子 菜 单 项 。窗 口 菜 单 ： 用 于 调 整 已 打

16、开 窗 口 的 排 列 方 式 。 包 括 ： 拆 分 、 水 平 平 辅 、 垂 直平 铺 、 层 叠 、 排 列 图 标 等 子 菜 单 项 。帮 助 菜 单 ： 用 于 给 用 户 提 供 各 种 方 式 的 帮 助 。 包 括 ： 内 容 、 索 引 、 搜 索 、 技术 支 持 等 子 菜 单 项 。课 堂 练 习 1：提 问 ： 若 将 界 面 上 的 某 窗 口 误 操 作 关 闭 ， 如 何 通 过 菜 单 将 其 重 新 打 开 ？2、 Visual Basic 6.0 工 具 栏工 具 栏 的 作 用 是 可 以 通 过 单 击 其 上 面 的 图 标 按 钮 执 行 菜

17、单 命 令 ， 由 此 加 快 操作 速 度 。Visual Basic 能 提 供 “ 编 辑 ” 、 “ 标 准 ” 、 “ 窗 体 编 辑 器 ” 、 “ 调 试 ” 等 几 个 工 具栏 ， 用 户 也 可 以 按 自 己 的 需 要 ， 通 过 “ 视 图 工 具 栏 ” 菜 单 来 选 取 “ 自 定 义 ” 工具 栏 。3、 Visual Basic 6.0 控 件 箱 （ 又 称 工 具 箱 ）控 件 箱 是 VisualBasic为 程 序 界 面 开 发 而 提 供 控 件 的 面 板 。 默 认 为 内 置 控 件 。除 了 Visual Basic 内 置 控 件 之

18、外 ， 用 户 还 可 以 通 过 菜 单 “ 工 程 部 件 ” 打开 “ 部 件 ” 对 话 框 ， 从 中 能 添 加 控 件 、 设 计 器 或 可 插 入 对 象 到 工 具 箱 中 ， 也 可 以引 用 已 加 载 的 控 件 工 程 。4、 工 程 管 理 器 窗 口工 程 管 理 器 又 称 工 程 资 源 管 理 器 ， 它 以 层 次 列 表 的 方 式 管 理 当 前 工 程 文 件 或6 珙 职 高 教 案工 程 组 文 件 中 所 包 含 的 窗 体 文 件 、 模 块 文 件 、 类 模 块 文 件 等 3 种 类 型 的 文 件 。5、 属 性 窗 口属 性 窗

19、口 用 于 显 示 和 设 置 窗 体 或 控 件 的 所 有 属 性 。 它 由 3 部 分 组 成 ： 对 象 列表 框 、 属 性 列 表 框 、 属 性 含 义 说 明 。6、 窗 体 布 局 窗 口窗 体 布 局 窗 口 用 于 确 定 程 序 运 行 时 窗 体 在 屏 幕 上 的 初 始 位 置 。除 了 以 上 基 本 部 分 外 ， 在 VB程 序 设 计 中 还 有 一 个 重 要 的 窗 口 ， 即 代 码 编 辑窗 口 。课 堂 练 习 2：试 设 置 默 认 窗 体 的 背 景 颜 色 为 红 色 ， 字 体 的 颜 色 为 黄 色 ， 试 着 在 它 上 面 “ 画

20、 ”几 个 控 件 。答 疑 ： 针 对 学 生 提 出 的 问 题 答 疑 。小 结 本 章 节 主 要 讲 Visual Basic 6.0 集 成 开 发 环 境 界 面 组 成 。 本 节 内 容 可 作为 “ 字 典 ” 备 查 ， 不 需 全 部 掌 握 ， 编 程 用 到 时 ， 再 返 回 本 节 查 看 。 重 点 掌 握 ： 文件 、 运 行 菜 单 ； 控 件 箱 、 属 性 窗 口 的 使 用 即 可 。作 业 上 机 熟 悉 Visual Basic 6.0 的 启 动 、 退 出 及 界 面 组 成 ， 控 件 箱 、 属 性 窗口 的 使 用 。7 珙 职 高 教

21、 案 1.4 VB可 视 化 编 程 概 念 1.5 可 视 化 编 程 初 识复 习 ： 上 节 所 讲 Visual Basic 6.0集 成 开 发 环 境 界 面 组 成 。实 例 引 入 ： VB 的 第 一 个 实 例 “ 欢 迎 进 入 奇 妙 的 VB 世 界 ” 。 先 演 示 此 例 的运 行 结 果 ， 用 以 引 入 本 节 内 容 。知 识 点 讲 解 ：一 、 VB 编 程 中 用 到 的 几 个 概 念1、 对 象 ： （ object） 是 代 码 和 数 据 的 集 合 ， 在 VB环 境 中 ， 常 用 的 对 象 有 工 具箱 中 的 控 件 、 窗 体

22、、 菜 单 、 应 用 程 序 的 部 件 ， 以 及 数 据 库 等 。对 象 有 三 个 特 征 ： 属 性 、 事 件 和 方 法 。对 象 的 属 性 ： VB中 每 个 对 象 都 有 一 组 特 征 ， 这 组 特 征 称 为 属 性 。属 性 设 置 方 法 ： 先 选 定 对 象 ， 然 后 在 属 性 窗 口 中 找 到 相 应 属 性 直 接 设 置 ； 或编 程 在 代 码 中 设 置 ， 格 式 为 ： 对 象 名 属 性 名 =属 性 值 。2、 事 件 ： 对 象 的 事 件 （ Event） 就 是 对 象 上 所 发 生 的 事 情 。 VB中 事 件 是 预

23、先定 义 好 的 ， 能 够 被 对 象 是 别 的 动 作 ， 如 ： 单 击 事 件 （ Click） 、 双 击 事 件 （ Dblclick） 、装 载 事 件 （ Load） 、 鼠 标 移 动 事 件 （ MouseMove） 等 。 对 象 的 事 件 是 固 定 的 ， 用 户不 能 建 立 新 的 事 件 ， 程 序 员 只 需 编 写 必 须 相 应 的 事 件 过 程 即 可 。事 件 过 程 的 一 般 编 写 格 式 为 ：Sub 程 序 代 码 End sub3、 方 法 ： 事 件 的 方 法 与 事 件 过 程 类 似 ， 它 可 能 函 数 或 过 程 ， 用

24、 于 完 成 某 种 特定 功 能 ， 而 不 能 相 应 某 个 事 件 。 如 ： 对 象 打 印 方 法 （ Print） 、 窗 体 显 示 方 法 （ Show） 、移 动 方 法 （ Move） 等 。 可 用 以 下 格 式 调 用 对 象 方 法 ： 对 象 名 方 法 名 。 例 如 ：Form1 Show8 珙 职 高 教 案二 、 VB 可 视 化 编 程 的 步 骤一 般 步 骤 为 ： 打 开 VB 新 建 工 程 添 加 控 件 、 设 计 应 用 程 序 界 面 设 置 属 性 编 写 代 码 运 行 工 程 修 改 工 程 保 存 工 程 。1、 新 建 工 程

25、 ：步 骤 ： 启 动 VB 新 建 工 程 ， 标 准 EXE。 或 者 文 件 菜 单 新 建 工 程 标 准 EXE。2、 添 加 控 件 、 设 计 应 用 程 序 界 面 ：方 法 ： 单 击 工 具 箱 中 的 某 控 件 图 标 ， 鼠 标 变 成 “ +” 指 针 ， 然 后 在 窗 体 工 作区 按 住 鼠 标 左 键 拖 动 鼠 标 ， 松 开 即 可 在 窗 体 上 画 出 对 应 控 件 。3、 属 性 设 置 ： 先 选 定 对 象 ， 然 后 在 属 性 窗 口 中 找 到 相 应 属 性 直 接 设 置 ； 或编 程 在 代 码 中 设 置 ， 格 式 为 ： 对

26、 象 名 属 性 名 =属 性 值 。4、 编 写 代 码 ： 打 开 代 码 编 辑 器 ， 单 击 “ 对 象 ” 下 拉 列 表 框 ， 从 中 选 取 相 应对 象 ， 单 击 “ 过 程 ” 下 拉 列 表 框 ， 从 中 选 取 相 应 事 件 ， 然 后 编 写 代 码 。5、 运 行 工 程 ： 单 击 工 具 栏 上 的 “ 运 行 ” 按 钮 或 按 F5 键 ， 即 可 运 行 工 程 。 单击 “ 退 出 ” 按 钮 或 标 题 栏 上 的 “ 关 闭 ” 按 钮 ， 即 可 结 束 工 程 运 行 。6、 保 存 工 程 ： 单 击 “ 文 件 ” 菜 单 “ 保 存

27、 工 程 ” 或 “ 工 程 另 存 为 ” 或 单 击工 具 栏 上 的 “ 保 存 工 程 ” ， 即 可 保 存 工 程 。三 、 实 例 ：实 例 1： VB 的 第 一 个 实 例 “ 欢 迎 进 入 奇 妙 的 VB世 界 ” 。 运 行 结 果 如 图2-8所 示 。 程 序 界 面 由 一 个 文 本 框 和 一 个 命 令 按 钮 组 成 ， 单 击 命 令 按 钮 时 ， 文本 框 会 出 现 “ 欢 迎 进 入 奇 妙 的 VB世 界 ” 字 样 。 详 见 教 材 P10-12。具 体 操 作 步 骤 如 下 ：1、 设 计 界 面 ：在 窗 体 上 画 一 个 一 个

28、 文 本 框 和 一 个 命 令 按 钮 。2、 设 置 属 性 ：按 表 2-1 设 置 各 对 象 的 属 性 ：控 件 名 属 性 名 属 性 设 置 值窗 体 Form1 caption 欢 迎 进 入 奇 妙 的9 珙 职 高 教 案VB世 界文 本 框 Text1 text命 令 按 钮 Command1 caption 确 定3、 编 写 代 码 ：命 令 按 钮 Command1的 click 事 件 过 程 代 码 为 ：text1.text=” 欢 迎 进 入 奇 妙 的 VB世 界 ”4、 运 行 应 用 程 序 ：选 择 “ 运 行 |启 动 ” 、 F5键 、 单 击

29、 工 具 栏 上 “ 启 动 ” 按 钮 都 可 以 运 行 该 示 例程 序 。5、 保 存 工 程 ：单 击 工 具 栏 上 的 “ 保 存 ” 按 钮 即 可 保 存 该 工 程 和 窗 体 文 件 。（ 详 细 讲 解 并 演 示 以 上 几 个 步 骤 的 制 作 过 程 ）课 堂 练 习 ： 上 机 实 现 以 上 实 例 。答 疑 ： 针 对 学 生 提 出 的 问 题 答 疑 。小 结 可 视 化 编 程 的 概 念 、 程 序 调 试 步 骤 。习 题 1：思 考 ： 习 题 2、 3、 5、 6、 7；上 机 ： 熟 悉 VB的 界 面 ， 编 程 并 上 机 实 现 ：

30、习 题 7。10 珙 职 高 教 案 1.5 可 视 化 编 程 初 识复 习 及 作 业 讲 解 ：1、 复 习 VB应 用 程 序 调 试 的 全 过 程 。2、 讲 解 作 业 7题 ， 并 以 此 引 入 “ 工 程 ” 的 概 念 。知 识 点 讲 解 ：一 、 VB 的 开 发 模 式VB 提 供 了 3 种 开 发 模 式 ： 设 计 模 式 、 运 行 模 式 和 中 断 模 式 。二 、 VB 工 程 概 述1、 工 程 文 件 (.vbp)： VB使 用 了 称 为 “ 工 程 ” 的 特 殊 文 件 来 管 理 应 用 程 序 中 所有 不 同 的 文 件 。 它 提 供

31、 了 与 该 工 程 有 关 的 全 部 文 件 和 对 象 的 清 单 ， 每 当 保 存 工 程时 ， VB 都 要 更 新 工 程 文 件 。 一 个 完 整 的 工 程 中 的 文 件 包 括 ： 跟 踪 所 有 部 件 的 工 程 文 件 （ .vbp） ； 窗 体 文 件 （ .frm） ； 窗 体 所 对 应 二 进 制 数 据 文 件 （ .frx） ； 标 准 模 块 文 件 （ .bas） 。2、 工 程 管 理（ 1） 新 建 工 程 ： “ 文 件 |新 建 工 程 ” 、 选 择 类 型 后 “ 确 定 ” 。（ 2） 打 开 工 程 ： “ 文 件 |打 开 工 程

32、 ” 。（ 3） 保 存 工 程 ： 两 种 方 法 ： 直 接 保 存 和 工 程 另 存 为 。（ 4） 向 工 程 中 添 加 文 件 ： “ 工 程 |添 加 文 件 ” 将 现 存 的 文 件 添 加 到 当 前 的 工程 文 件 中 。（ 5） 从 工 程 中 删 除 文 件 ： 在 工 程 资 源 管 理 器 中 先 选 定 要 删 除 的 文 件 ， 然 后再 选 择 “ 工 程 |移 除 文 件 ” 移 除 。3、 启 动 窗 体 的 设 置 ：可 以 将 工 程 中 的 任 一 个 窗 体 设 置 为 启 动 窗 体 ， 方 法 是 ： “ 工 程 |xxx属 性 ” ，其

33、 中 xxx 为 当 前 工 程 的 名 称 。课 堂 练 习 ： 查 看 上 节 实 例 （ 第 1 个 VB 实 例 ） 所 生 成 的 工 程 文 件 及 其 他 文 件 ，注 意 其 扩 展 名 。11 珙 职 高 教 案答 疑 ： 针 对 学 生 提 出 的 问 题 答 疑 。小 结 ： 本 节 主 要 讲 解 工 程 的 概 念 、 工 程 文 件 的 组 成 、 工 程 的 管 理 等 。 要 求 了解 工 程 文 件 的 组 成 ， 掌 握 工 程 文 件 的 保 存 、 打 开 方 法 。作 业 ： P18， 习 题 2。笔 答 ： 习 题 1、 2、 3、 4、 6、 10

34、；上 机 ： 熟 悉 VB的 工 程 ， 编 程 并 上 机 实 现 ： 习 题 13。拓 展 与 提 高 ： 试 将 习 题 13贴 上 一 幅 自 己 喜 欢 的 图 片 。12 珙 职 高 教 案第 3 章 VB简 单 应 用 程 序 的 设 计复 习 、 提 问 ： 以 提 问 方 式 复 习 上 节 所 讲 Visual Basic 6.0工 程 知 识 。实 例 演 示 、 引 入 ： 前 面 章 节 实 例 中 用 到 的 命 令 按 钮 、 文 本 框 等 统 称 为 控 件 。在 窗 体 上 任 意 画 若 干 个 控 件 ， 演 示 其 常 见 属 性 的 设 置 ， 大

35、小 、 位 置 的 调 整 。 用 以引 入 本 节 内 容 。知 识 点 讲 解 ： 3.1 控 件 概 述一 、 控 件 概 述1、 控 件 ： 是 建 立 VB 应 用 程 序 的 基 本 元 素 。 可 视 化 程 序 设 计 就 是 通 过 控 件 实现 的 。2、 VB的 控 件 分 类 ： 分 为 三 大 类 ： 内 部 固 有 控 件 、 ActiveX 控 件 、 可 插 入 的 对象 。 用 户 可 以 通 过 “ 工 具 箱 ” 获 取 各 种 内 部 控 件 。内 部 控 件 是 包 含 在 Visual Basic 系 统 内 ， 可 以 直 接 使 用 的 控 件

36、； 因 此 具 有 相对 较 好 的 运 行 性 能 。3、 常 用 的 内 部 控 件 有 ： 命 令 按 钮 、 文 本 框 、 标 签 、 框 架 、 列 表 框 、 组 合 框 、复 选 框 、 选 项 按 钮 、 图 片 框 、 定 时 器 、 数 据 控 件 等 。 3.2 控 件 的 常 用 属 性1、 属 性 的 设 置 方 法 ：有 两 种 方 法 ： 一 种 是 通 过 属 性 窗 口 来 直 接 设 置 ， 另 一 种 是 在 代 码 中 设 置 。 即 ：对 象 名 称 属 性 名 称 =设 置 值例 如 ： Command1 Caption=“ 确 定 ”用 代 码

37、设 置 的 方 法 常 用 于 动 态 地 修 改 控 件 的 有 关 属 性 。2、 控 件 的 常 用 属 性Caption属 性 ： 也 称 标 题 属 性 ， 用 于 设 置 在 控 件 上 显 示 的 文 本 内 容 。Name属 性 ： 对 象 在 创 建 时 所 取 的 名 字 。 编 代 码 引 用 该 对 象 时 使 用 ， 这 个 名 字不 会 出 现 在 窗 体 上 ， 且 每 个 对 象 都 有 。Enabled属 性 ： 决 定 了 对 象 在 运 行 时 是 否 允 许 用 户 操 作 。13 珙 职 高 教 案Font属 性 ： 用 于 设 置 字 符 的 格 式

38、 ， 如 字 体 、 字 号 、 字 形 等 。Height、 Width、 Top、 Left 属 性 ： 决 定 控 件 的 大 小 、 位 置 。ForeColor、 BackColor： 分 别 设 置 对 象 的 背 景 色 、 前 景 色 。 3.3 控 件 的 格 式 化1、 控 件 的 添 加 /删 除 ：两 种 方 法 ： 单 击 拖 动 、 双 击 再 移 动 。2、 控 件 的 大 小 与 位 置 ：控 件 的 位 置 调 整 有 两 种 方 法 ： 一 是 用 鼠 标 拖 动 对 象 ， 二 是 使 用 Ctrl+方 向 键 。3、 窗 体 与 控 件 的 布 局 调

39、整 ：两 种 方 法 ： 一 是 通 过 “ 格 式 ” 菜 单 ， 二 是 通 过 “ 窗 体 编 辑 器 ” 。课 堂 练 习 ： 上 机 练 习 ： 在 窗 体 上 任 意 画 若 干 个 控 件 ， 试 完 成 其 常 见 属 性 的 设 置 ，大 小 、 位 置 的 调 整 。 3.4 基 本 控 件 的 使 用一 、 标 签 （ Label）1、 Label （ 标 签 ） 控 件 是 专 门 用 来 显 示 文 本 的 ， 因 此 用 户 不 能 对 标 签 内 的文 本 进 行 编 辑 。2、 一 般 被 用 作 标 题 名 。 通 常 用 标 签 来 标 注 本 身 不 具

40、有 Caption 属 性 的 控 件 。例 如 ， 可 用 Label 控 件 为 文 本 框 、 列 表 框 、 组 合 框 等 控 件 添 加 描 述 性 的 文 字 。3、 标 签 常 用 的 属 性 有 ：Caption 属 性 ： 缺 省 属 性 ， 设 置 标 签 中 显 示 的 文 本 内 容 。AutoSize属 性 ： 设 置 控 件 是 否 能 自 动 调 整 以 显 示 所 有 的 内 容 。WordWrap属 性 ： 该 属 性 设 置 是 否 扩 大 以 显 示 标 题 文 字 。二 、 命 令 按 钮 （ CommandButton）1、 当 用 户 需 要 交

41、互 式 地 控 制 应 用 程 序 的 时 候 ， 最 简 便 的 方 法 就 是 给 用 户 提供 一 个 “ 命 令 按 钮 ” 。2、 命 令 按 钮 的 作 用 是 ： 在 用 户 单 击 它 时 ， 将 会 激 发 它 的 Click 事 件 。 因 此 ，将 代 码 写 入 命 令 按 钮 的 Click 事 件 过 程 ， 通 过 用 户 单 击 就 可 以 执 行 相 关 操 作 。3、 命 令 按 钮 的 常 用 属 性 有 ：14 珙 职 高 教 案Cancel属 性 ： 用 于 设 置 按 钮 为 取 消 按 钮 。Caption 属 性 ： 用 于 设 置 在 命 令

42、按 钮 上 显 示 的 文 本 。Style 属 性 ： 设 置 命 令 按 钮 的 外 观 。三 、 文 本 框 （ TextBox）1、 TextBox（ 文 本 框 ） 控 件 一 般 是 用 来 接 收 或 显 示 输 入 输 出 信 息 ， 可 用 于 编辑 文 本 。2、 经 常 使 用 的 文 本 框 属 性 有 ：Text属 性 ： 用 于 设 置 显 示 的 文 本 内 容 。MaxLength 属 性 ： 用 于 设 置 文 本 框 中 输 入 字 符 串 的 长 度 限 制 。MultiLine 属 性 ： 用 于 设 置 文 本 框 是 否 以 多 行 方 式 显 示

43、文 本 。PasswordChar属 性 ： 用 于 设 置 是 否 显 示 用 户 键 入 的 字 符 。ScrollBars属 性 ： 用 于 设 置 文 本 框 是 否 有 垂 直 或 水 平 滚 动 条 。答 疑 ： 针 对 学 生 提 出 的 问 题 答 疑 。小 结 本 节 主 要 讲 三 种 基 本 控 件 的 编 程 使 用 。 要 点 ： 三 种 基 本 控 件 的 常 用 属 性 的设 置 和 编 程 实 现 。习 题 预 习 ： 实 例 1、 2、 3。思 考 ： 习 题 3 ： 2、 4、 5。15 珙 职 高 教 案 3.4基 本 控 件 的 使 用 例 题提 问 ：

44、 以 提 问 方 式 复 习 上 节 所 讲 VB 6.0控 件 知 识 。实 例 演 示 ： 演 示 实 例 3-1， 用 以 引 入 本 节 内 容 。知 识 点 讲 解 ：例 题 讲 解 ：1、 讲 解 并 演 示 教 材 P27 例 3-1。实 现 步 骤 、 编 程 代 码 ： 如 教 材 P27（ 略 ）课 堂 练 习 1： 上 机 实 现 例 3-1。2、 讲 解 并 演 示 教 材 P28 例 3-2。课 堂 练 习 2： 上 机 实 现 例 3-2。3、 演 示 教 材 P31 例 3-3。课 堂 练 习 3： 上 机 实 现 例 3-3。答 疑 ： 针 对 学 生 提 出

45、的 问 题 答 疑 。小 结 本 节 主 要 以 实 例 形 式 讲 解 三 种 基 本 控 件 的 编 程 思 路 及 编 程 方 法 。 要 求 掌 握重 点 语 句 的 使 用 。习 题 习 题 3 2、 4、 5。编 程 并 上 机 实 现 ： 7、 11、 12。要 求 ： 交 上 机 作 业 。 每 人 通 过 网 络 上 传 一 个 文 件 夹 ， 文 件 夹 以 班 级 、 姓 名 、学 号 为 名 字 ， 内 含 3 个 可 执 行 文 件 （ EXE 文 件 ） 。 记 一 次 平 时 成 绩 。16 珙 职 高 教 案“ 基 本 控 件 的 使 用 ” 习 题 课学 生

46、演 示 ： 指 定 学 生 演 示 实 例 3-1、 3-3， 检 查 学 生 例 题 掌 握 情 况 ， 并 给 其 记一 次 平 时 成 绩 。学 生 作 业 讲 评 ： 针 对 所 交 作 业 中 出 现 的 共 同 问 题 讲 评 。知 识 点 讲 解 ：例 1 ： 课 后 习 题 P33-7。设 计 步 骤 （ 同 以 前 例 题 ， 略 ） ， 程 序 代 码 如 下 ：Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X AsSingle, Y As Single)If Button = 1 ThenF

47、orm1.Picture=LoadPicture(“c:programfilesmicrosoftofficeoffice10bitmapsstylesglobe.wmf“)ElseForm1.Picture = LoadPicture(“)End IfEnd Sub课 堂 练 习 1： 学 生 上 机 实 现 例 1。例 2： 程 序 结 果 为 分 别 在 窗 体 上 显 示 “ 今 天 是 ： ” 后 分 别 显 示 当 前 年 月 日 、 时分 秒 。 制 作 步 骤 （ 略 ） ， 程 序 代 码 如 下 ：Private Sub Command1_Click()Label1.Cap

48、tion = “欢 迎 使 用 ： “ “-“;Next iPrintPrintFor i = 1 To 9For j = i + 1 To 10If b(j) b(i) ThenMin = b(j)b(j) = b(i)b(i) = MinEnd IfNext jPrint b(i); “-“;Next iPrint b(i)End Sub30 珙 职 高 教 案课 堂 练 习 2： 学 生 上 机 实 现 上 例 。答 疑 ： 针 对 学 生 提 出 的 问 题 答 疑 。小 结 本 节 主 要 掌 握 几 种 程 序 流 程 的 编 程 方 法 、 思 路 ,特 别 是 排 序 的 编 程 思 路 。作 业 及 上 机 安 排 实 验 1 1-2， 实 验 2 1-4。 要 求 全 部 编 程 ， 并 上 机 实 现 。