vb期末考试复习资料.pdf

《vb期末考试复习资料.pdf》由会员分享，可在线阅读，更多相关《vb期末考试复习资料.pdf（83页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、第 一 章 V ISUAL B A S IC的 特 点 与 版 本 例 1 与 传 统 的 程 序 设 计 语 言 相 比，Visual B a s ic最 突 出 的 特 点 是 A.结 构 化 程 序 设 计 B.程 序 开 发 环 境 C.程 序 调 试 技 术 D.事 件 驱 动 编 程 机 制【分 析】传 统 的 程 序 设 计 语 言 是 面 向 过 程 的，但 一 般 都 可 以 实 现 结 构 化 程 序 设 计，有 的 也 提 供 了 较 完 善 的 集 成 开 发 环 境 和 程 序 调 试 技 术，但 它 们 基 本 上 都 没 有 事 件 驱 动 编 程 机 制。与 这

2、 些 语 言 相 比，Visual Basic最 突 出 的 特 点 就 是 事 件 驱 动 编 程 机 制。【答 案】D例 2 下 列 成 员 中 不 属 于 主 窗 口 的 是 A.最 大 化 按 钮 B.状 态 栏 C.系 统 菜 单 D.工 具 栏【分 析】主 窗 口 由 标 题 栏、菜 单 栏 和 工 具 栏 构 成，其 中 标 题 栏 上 有 系 统 菜 单（左 端）以 及 最 小 化、最 大 化 和 关 闭 按 钮。因 此，最 大 化 按 钮、系 统 菜 单 和 工 具 栏 都 是 主 窗 口 中 的 成 员，而 主 窗 口 中 没 有 状 态 栏。【答 案】B例 3 在 属 性

3、 窗 口 中，属 性 列 表 可 以 按 两 种 顺 序 排 列，这 两 种 顺 序 是 和。【分 析】为 了 便 于 查 找，属 性 窗 口 对 当 前 对 象 的 属 性 提 供 了 两 种 排 列 方 式，一 种 是 按 字 母 表 顺 序，另 一 种 是 按 属 性 的 分 类 顺 序。【答 案】按 字 母 序 或 按 分 类 序 按 分 类 序 或 按 字 母 序 例 4 Visual Basic 6.0 的 集 成 开 发 环 境 有 两 种 方 式，第 一 种 方 式 是,第 二 种 方 式 是。【分 析】在 默 认 情 况 下，Visual Basic 6.0 集 成 开 发

4、环 境 为 多 文 档 界 面 方 式，即 M D I方 式，在 这 种 方 式 下，窗 体 设 计 器 窗 口 是 固 定 的。使 用“工 具”菜 单 中 的“选 项”命 令，可 以 把 集 成 开 发 环 境 设 置 为 单 文 档 界 面 方 式，即 SD I方 式，在 这 种 方 式 下，窗 体 设 计 器 窗 口 是 浮 动 的。【答 案】多 文 档 界 面 或 MDI单 文 档 界 面 或 SDI第 二 章 对 象 及 其 操 作 例 1为 了 通 过 属 性 窗 口 把 窗 体 的 ControlBox属 性 设 置 为 True（或 False）,下 列 正 确 的 操 作 是

5、 A.直 接 键 入 True（或 False）B.利 用 对 话 框 设 置 属 性 值 C.选 择 C ontrolB ox,然 后 按 回 车 键 D.双 击 ControlBox属 性 条【分 析】ControlBox属 性 是 一 个 逻 辑 值，其 取 值 只 有 两 种，即 T rue和 False,一 般 可 以 通 过 选 择 输 入，即 单 击 属 性 条 右 端 的 箭 头，下 拉 显 示 属 性 值 T ru e和 F a ls e,从 中 选 择 所 需 要 的 值。在 上 面 给 出 的 答 案 中，前 三 个 答 案 都 不 能 实 现 所 要 求 的 操 作，只

6、 有 答 案 D 才 能 实 现。实 际 上，对 于 只 有 两 种 可 能 取 值（True或 False、0 或 1）的 属 性，都 可 以 通 过 双 击 属 性 条 设 置。【答 案】D例 2 下 列 语 句 用 来 设 置 窗 体 F o r m l的 属 性，其 中 在 运 行 时 不 能 正 确 操 作 的 语 句 是 A.Fonnl.Caplin=Form Test B.Forml.Name=FormTestC.Forml.MaxButton=False D.Forml.MinButton=False【分 析】这 4 个 语 句 用 来 在 运 行 时 设 置 窗 体 的 属

7、性。其 中 Fonnl.Captin=Form Test”用 来 设 置 窗 体 的 标 题，Forml.Name=FormTest用 来 设 置 窗 体 的 名 称，Form 1.MaxButton=False用 来 隐 藏 窗 体 的 最 大 化 按 钮，Forml.MinButton=False用 来 隐 藏 窗 体 的 最 小 化 按 钮。从 语 法 格 式 上 来 看，似 乎 没 有 什 么 问 题，在 输 入 时 也 不 会 产 生 错 误。但 是，窗 体 的 N am e属 性 是 一 个“只 读”属 性，在 运 行 时 不 能 改 变，因 此，程 序 运 行 后，当 执 行 到

8、 Forml.Name=FormTest语 句 时 将 会 出 错。【答 案】B例 3 下 列 不 能 打 开 属 性 窗 口 的 操 作 是 A.执 行“视 图”菜 单 中 的“属 性 窗 口”命 令 B.按 F 4键 C.按 Ctrl+T 键 D.单 击 工 具 栏 上 的“属 性 窗 口”按 钮【分 析】在 上 面 选 择 中，Ctrl+T键 用 来 执 行“工 程”菜 单 中 的“部 件”命 令，打 开 的 是“部 件”窗 口，不 是 属 性 窗 口，其 他 3 个 选 项 都 可 以 打 开 属 性 窗 口。答 案 C例 i 4、为 了 对 多 个 控 件 执 行 操 作，必 须 选

9、 择 这 些 控 件 下 列 不 能 选 择 多 个 控 件 的 操 作 是 A.按 住 A lt键，不 要 松 开，然 后 单 击 每 个 要 选 择 的 控 件 B.按 住 Shift键，不 要 松 开，然 后 单 击 每 个 要 选 择 的 控 件 C.按 住 C trl键，不 要 松 开，然 后 单 击 每 个 要 选 择 的 控 件 D.拖 动 鼠 标 画 出 一 个 虚 线 矩 形，使 所 选 择 的 控 件 位 于 这 个 矩 形 内【分 析】教 程 中 介 绍 了 选 择 控 件 的 两 种 方 法，即 按 住 S h ift键 单 击 每 个 要 选 择 的 控 件 和 拖

10、动 鼠 标 画 虚 线 矩 形。除 这 两 种 方 法 外，按 住 C trl键 单 击 每 个 要 选 择 的 控 件 也 可 实 现 选 择 控 件 的 操 作，但 按 住 A lt键 单 击 每 个 要 选 择 的 控 件 不 能 达 到 目 的。【答 案】A例 5 为 了 在 运 行 时 把 窗 体 F o r m l的 标 题(C aption属 性)设 置 为 Test Program,应 使 用 的 语 句 为【分 析】窗 体 的 Caption属 性 用 来 设 置 窗 体 的 标 题，一 般 格 式 为：窗 体.(2四 0 11=字 符 串 其 中 的“窗 体.”可 以 是

11、F o r m l.,可 以 省 略，也 可 以 是 关 键 字 Me：而 字 符 串”就 是 要 设 置 的 窗 体 的 标 题。因 此，本 题 有 几 种 不 同 的 答 案。【答 案】Form 1.Caption=Test Program或 Me.Caplion=Test Program或 Caption=Test Program例 6 当 选 择 了 多 个 控 件 后，其 中 有 一 个 控 件 是“基 准 控 件”，设 置“基 准 控 件”的 方 法 是【分 析】在 一 般 情 况 下，如 果 选 择 了 窗 体 上 的 多 个 控 件，则 其 中 有 一 个 控 件 自 动 成

12、为“基 准 控 件”。选 择 方 法 不 同，“自 动 基 准 控 件”也 不 一 样。如 果 按 住 C trl或 Shift键 选 择 多 个 控 件，则 最 后 单 击 的 控 件 为“基 准 控 件”；如 果 用 拖 动 鼠 标 的 方 法 选 择 控 件，则 最 后 画 到 窗 体 上 的 控 件 是“基 准 控 件”。如 果 想 用 其 他 某 个 控 件 作 为“基 准 控 件”，可 以 在 选 择 多 个 控 件 后，单 击 该 控 件。【答 案】选 择 多 个 控 件 后，单 击 其 中 的 某 个 控 件，即 可 把 该 控 件 设 置 为“基 准 控 件”。第 三 章 V

13、B程 序 设 计 基 础 例 1 在 设 计 阶 段，当 双 击 窗 体 上 的 某 个 控 件 时，所 打 开 的 窗 口 是 A.工 程 资 源 管 理 器 窗 口 B.工 具 箱 窗 口 C.代 码 窗 口 D.属 性 窗 口【分 析】Visual Basic集 成 开 发 环 境 下 的 窗 口(包 括 代 码 窗 口)基 本 上 都 可 以 通 过 执 行“视 图”菜 单 中 相 应 的 菜 单 命 令 打 开。在 设 计 阶 段，如 果 单 击 窗 体 上 的 某 个 控 件，则 只 能 打 开 代 码 窗 口。【答 案】C例 2 下 列 打 开“代 码 窗 口”的 操 作 中 不

14、 正 确 的 是 A.按 F 4键 B.单 击“工 程 资 源 管 理 器”窗 口 中“查 看 代 码”按 钮 C.双 击 已 建 立 好 的 控 件 D.执 行“视 图”菜 单 中“代 码 窗 口”命 令【分 析】在 所 给 出 的 选 择 中，按 F 4键 可 以 打 开 属 性 窗 口，不 可 能 用 来 打 开 代 码 窗 口，而 其 他 3 个 选 项 都 可 以 用 来 打 开 代 码 窗 口。【答 案】A例 3 下 列 正 确 的 Visual Basic注 释 语 句 是 A.Dim a(10)As Integer Rem 这 是 一 个 VB 程 序 B.这 是 一 个 V

15、B程 序 Private Sub Commandl_Click().C.a=l:b=2:Rem 这 是 一 个 VB 程 序:c=3D.If Shift=6 And Button=2 ThenPrint BBBB Rem 这 是 一 个 VB 程 序 End If【分 析】在 使 用 注 释 语 句 时，有 以 下“禁 忌”：当 注 释 出 现 在 一 个 语 句 行 的 后 面 时，只 能 用 撇 号 作为 注 释 符，不 能 使 用 Rem；在 复 合 语 句 行 中，注 释 必 须 是 最 后 一 个 语 句，不 能 放 在 复 合 语 句 行 中；注 释 语 句 不 能 放 在 续 行

16、 符 的 后 面。在 所 给 出 的 选 择 中，A、C、D 都 是 不 正 确 的。【答 案】B例 4 为 了 建 立 窗 体 的 C lick事 件 过 程，即 Form _C lick,应 先 在 代 码 窗 口 的 栏 中 选 择 Form,然 后 在 栏 中 选 择 Clicko【分 析】代 码 窗 口 的 顶 部(标 题 栏 的 下 面)分 为 左 右 两 栏，左 边 一 栏 是“对 象”栏，右 边 一 栏 是“过 程”栏。在“对 象”栏 的 下 拉 列 表 中 可 以 选 择 窗 体 或 控 件 的 名 称，在“过 程”栏 中 可 以 选 择 事 件 的 名 称。因 此，为 了

17、建 立 事 件 过 程 Form _C lick,应 在“对 象”栏 中 选 择 F o rm,然 后 在“过 程”栏 中 选 择 Clicko【答 案】第 一 个 空：“对 象”或 对 象 第 二 个 空：“过 程”或 过 程 例 5 假 定 窗 体 的 名 称 为 F o r m l,对 该 窗 体 编 写 如 下 代 码：Private Sub Form_Load()Form 1.Caption=AAAAAMe.Caption=BBBBBCaption=CCCCCEnd Sub程 序 运 行 后，窗 体 的 标 题 是.【分 析】Form L oad是 程 序 运 行 后 首 先 要 执

18、 行 的 事 件 过 程。在 上 面 的 事 件 过 程 中，有 3 个 赋 值 语 句，这 3 个 语 句 都 用 来 对 对 象 赋 值，即 对 对 象 的 Caption属 性 赋 值，它 们 都 可 以 设 置 窗 体 的 标 题。第 一 个 语 句 把 窗 体 的 标 题 设 置 为“AAAAA，执 行 第 二 个 语 句 后，窗 体 的 标 题 变 为“BBBBB”，而 执 行 第 三 个 语 句 后，窗 体 的 标 题 变 为“CCCCC”。【答 案】CCCCC例 6 篇 写 程 序，用 来 设 置 窗 体 的 位 置 和 大 小。要 求：程 序 运 行 后，窗 体 的 初 始

19、位 置 为(3000,3000),其 初 始 宽 度 和 高 度 均 为 5 000；单 击 一 次 窗 体 后，窗 体 位 置 的 X 坐 标 和 Y 坐 标 各 减 少 一 半，其 宽 度 和 高 度 均 减 少 到 原 来 的 一 半。(分 析】窗 体 的 位 置 由 T op属 性 和 L eft属 性 来 设 置，宽 度 和 高 度 分 别 由 W idth属 性 和 Height属 性 来 设 置。窗 体 的 初 始 属 性 可 以 通 过 属 性 窗 口 设 置，也 可 以 在 Form_Load事 件 过 程 中 设 置；而 单 击 窗 体 后 的 属 性 可 以 在 Form

20、_Click事 件 过 程 中 设 置。程 序 如 下：Private Sub Form_Load()Top=3000Left=3000Width=5000Height=5000End SubPrivate Sub Form_Click()Form 1.Top=Forml.Top/2Form 1.Left=Fonn 1.Left/2Forml.Width=Forml.Width/2Forml.Height=Forml.Height/2End Sub窗 体 的 初 始 位 置 和 大 小 在 Form_Load事 件 过 程 中 设 置，程 序 运 行 后，显 示 窗 体 的 初 始 位 置 和

21、 大 小。单 击 一 次 窗 体 后，其 位 置 的 X 坐 标、Y 坐 标 及 窗 体 的 宽 度、高 度 均 减 少 到 原 来 的 一 半。此 后 如 果 再 单 击 一 次 窗 体，则 仍 减 少 一 半。如 果 把 Form_Click事 件 过 程 改 为：Private Sub,Form_Click()Forml.Top=1500Forml.Left=1500Forml.Width=2500Forml.Height=2500End Sub则 程 序 运 行 后，无 论 单 击 多 少 次 窗 体，窗 体 的 位 置 和 大 小 都 是 原 来 的 一 半。该 程 序 用 到 了

22、窗 体 的 4 个 属 性，即 Top.Left.W idth和 Height。在 设 置 这 几 个 属 性 时，窗 体 名 称(Forml)可 以 有，也 可 以 没 有，也 可 以 换 成 关 键 字 Me。例 7 在 Visual B asic中，下 列 优 先 级 最 高 的 运 算 符 是 A.*B.C.D.Not【分 析】Visual Basic提 供 了 3 类 运 算 符，即 算 术 运 算 符、关 系 运 算 符 和 逻 辑 运 算 符。在 3 类 运 算 符 中，算 术 运 算 的 优 先 级 最 高，其 次 是 关 系 运 算，最 后 是 逻 辑 运 算。在 该 例 中

23、，C 和 D 分 别 为 关 系 运 算 符 和 逻 辑 运 算 符，A 和 B 是 算 术 运 算 符，A 和 B 的 优 先 级 比 C 和 D 高。而 对 于 A 和 B 来 说，乘 法(*)的 优 先 级 比 整 除()的 优 先 级 高。因 此，优 先 级 最 高 的 应 当 是 乘 法 运 算 符(*)。【答 案】A例 8 以 下 关 系 表 达 式 中，其 值 为 False的 是 A.XYZ XYzB.VisualBasic=visualbasicC.the thereD.Integer Int【分 析】该 例 通 过 关 系 表 达 式 对 字 符 串 进 行 比 较。在 V

24、isual B asic中，字 符 串 数 据 按 其 ASCH码 值 进 行 比 较。在 比 较 两 个 字 符 串 时，首 先 比 较 两 个 字 符 串 的 第 一 个 字 符，其 中 ASCH码 值 较 大 的 字 符 所 在 的 字 符 串 大。如 果 第 一 个 字 符 相 同，则 比 较 第 二 个 依 次 类 推。在 该 例 的 4 个 选 择 中，A、C、D 的 值 均 为 True；B 中 的 两 个 字 符 串 基 本 相 同，但 第 一 个 字 符 串 的 第 一 个 字 母 是 大 写 字 母，而 第 二 个 字 符 串 的 第 一 个 字 母 是 小 写 字 母，第

25、 一 个 字 符 串 小 于 第 二 个 字 符 串，即 两 个 字 符 串 不 相 等，因 此 VisualBasic=visualbasic”的 值 为 假,即 False【答 案】B例 9 下 列 正 确 的 Visual Basic注 释 语 句 是 A.Dim a(10)As Integer Rem 这 是 一 个 VB 程 序 B.这 是 一 个 V B程 序 Private Sub Commandl_Click().C.a=l:b=2:Rem 这 是 二 个 VB 程 序:c=3D.If Shift=6 And Button=2 ThenPrint BBBB Rem 这 是 一

26、个 VB 程 序 End If【分 析】在 使 用 注 释 语 句 时，有 以 下“禁 忌”：当 注 释 出 现 在 一 个 语 句 行 的 后 面 时，只 能 用 撇 号 作 为 注 释 符，不 能 使 用 Rem；在 复 合 语 句 行 中，注 释 必 须 是 最 后 一 个 语 句，不 能 放 在 复 合 语 句 行 中；注 释 语 句 不 能 放 在 续 行 符 的 后 面。在 所 给 出 的 选 择 中，A、C、D 都 是 不 正 确 的。【答 案】B例 1 0 为 了 建 立 窗 体 的 C lick事 件 过 程，即 Form_C1ick,应 先 在 代 码 窗 口 的 _栏 中

27、 选 择 Form,然 后 在 _栏 中 选 择 Click,【分 析】代 码 窗 口 的 顶 部(标 题 栏 的 下 面)分 为 左 右 两 栏，左 边 一 栏 是“对 象”栏，右 边 一 栏 是“过 程”栏。在“对 象”栏 的 下 拉 列 表 中 可 以 选 择 窗 体 或 控 件 的 名 称，在“过 程”栏 中 可 以 选 择 事 件 的 名 称。因 此，为 了 建 立 事 件 过 程 Form _C lick,应 在“对 象”栏 中 选 择 F o r m,然 后 在“过 程”栏 中 选 择 Click。【答 案】第 一 个 空：“对 象”或 对 象 第 二 个 空：“过 程”或 过

28、程 例 1 1 假 定 窗 体 的 名 称 为 Form l,对 该 窗 体 编 写 如 下 代 码：Private Sub Form_Load()Form 1.Caption=AAAAAMe.Caption=BBBBBCaption=CCCCCEnd Sub程 序 运 行 后，窗 体 的 标 题 是。【分 析】Form L oad是 程 序 运 行 后 首 先 要 执 行 的 事 件 过 程。在 上 面 的 事 件 过 程 中，有 3 个 赋 值 语 句，这 3 个 语 句 都 用 来 对 对 象 赋 值，即 对 对 象 的 Caption属 性 赋 值，它 们 都 可 以 设 置 窗 体

29、的 标 题。第 一 个 语 句 把 窗 体 的 标 题 设 置 为“AAAAA，执 行 第 二 个 语 句 后，窗 体 的 标 题 变 为“BBBBB”，而 执 行 第 三 个 语 句 后，窗 体 的 标 题 变 为“CCCCC”。【答 案】CCCCC例 1 2编 写 程 序，用 来 设 置 窗 体 的 位 置 和 大 小。要 求：程 序 运 行 后，窗 体 的 初 始 位 置 为(3000,3000),其 初 始 宽 度 和 高 度 均 为 5 000；单 击 一 次 窗 体 后，窗 体 位 置 的 X 坐 标 和 Y 坐 标 各 减 少 一 半，其 宽 度 和 高 度 均 减 少 到 原

30、来 的 一 半。【分 析】窗 体 的 位 置 由 T op属 性 和 L eft属 性 来 设 置，宽 度 和 高 度 分 别 由 W idth属 性 和 Height属 性 来 设 置。窗 体 的 初 始 属 性 可 以 通 过 属 性 窗 口 设 置，也 可 以 在 Form_Load事 件 过 程 中 设 置；而 单 击 窗 体 后 的 属 性 可 以 在 Form_Click事 件 过 程 中 设 置。程 序 如 下：Private Sub Form_Load()Top=3000Left=3000Width=5000Height=5000End SubPrivate Sub Form_

31、Click()Form l.Top=Form l.Top/2Form 1.Left=Form 1.Left/2Form 1.Width=Form 1.Width/2Form 1.Height=Form 1.Height/2Encl Sub窗 体 的 初 始 位 置 和 大 小 在 Form_Load事 件 过 程 中 设 置，程 序 运 行 后，显 示 窗 体 的 初 始 位 置 和 大 小。单 击 一 次 窗 体 后，其 位 置 的 X 坐 标、Y 坐 标 及 窗 体 的 宽 度、高 度 均 减 少 到 原 来 的 一 半。此 后 如 果 再 单 击 一 次 窗 体，则 仍 减 少 一 半。

32、如 果 把 Form_Click事 件 过 程 改 为：Private Sub,Form_Click()Form l.Top=1500Form 1.Left=1500Forml.Width=2500Form 1.Height=2500End Sub则 程 序 运 行 后，无 论 单 击 多 少 次 窗 体，窗 体 的 位 置 和 大 小 都 是 原 来 的 一 半。该 程 序 用 到 了 窗 体 的 4 个 属 性，即 Top、Left、W idth和 Height。在 设 置 这 儿 个 属 性 时，窗 体 名 称(Forml)可 以 有，也 可 以 没 有，也 可 以 换 成 关 键 字

33、Me。第 四 章 数 据 的 输 入 与 输 出 例 题 分 析 例 1 在 窗 体 上 画 一 个 命 令 按 钮(名 称 为 C o m m an d l),然 后 编 写 如 下 事 件 过 程：Private Sub Command 1 _Click()a=4b=5c=6Print a=b+cEnd Sub程 序 运 行 后，单 击 命 令 按 钮，其 结 果 为 A.a=ll B.a=b+c C.False D.出 错【分 析】Print方 法 具 有 计 算 和 输 出 两 种 功 能。当 P rint的 输 出 项 是 表 达 式 时，将 先 计 算 表 达 式，然 后 输 出

34、表 达 式 的 值。所 计 算 和 输 出 的 表 达 式 可 以 是 算 术 表 达 式，也 可 以 关 系 表 达 式 或 逻 辑 表 达 式。该 例 中 的 a=b+c是 一 个 关 系 表 达 式，其 中 a 的 值 为 4,b+c的 值 是 11,Print a=b+c实 际 上 执 行 的 是 Print4=11,显 然 是 一 个“假”值。【答 案】c注 胃，有 人 可 能 会 认 为 本 例 的 答 案 应 当 为 D,这 是 不 对 的。例 2 下 列 不 正 确 的 语 句 是 A.Print a=10+20B.Print na=u;10+20C.Print,a,=M10+

35、20nD.Print a=;10+20【分 析】P rin t方 法 的 输 出 项 是 一 个 表 达 式，包 括 算 术 表 达 式(字 符 串 表 达 式)、关 系 表 达 式 和 逻 辑 表达 式。在 所 给 出 的 选 择 中，A 是 用 Print方 法 输 出 一 个 关 系 表 达 式 的 值，比 较 两 个 算 术 表 达 式 的 值 是 否 相 等；B 是 用 Print输 出 一 个 字 符 串 和 一 个 算 术 表 达 式 的 值，其 中 字 符 串 照 原 样 输 出，然 后 计 算 并 输 出 算 术 表 达 式 的 值；C 是 用 Print方 法 输 出 一

36、个 关 系 表 达 式 的 值，比 较 两 个 字 符 串 是 否 相 等，这 几 个 语 句 都 是 正 确 的，可 以 输 出 正 确 的 结 果，而 D 会 产 生 语 法 错 误。【答 案】D例 3 在 窗 体 上 画 一 个 命 令 按 钮，然 后 编 写 如 下 代 码：Private Sub Command 1 _Click（）a&=InputBox（请 输 入 第 一 个 数”）b&二 InputBox（请 输 入 第 二 个 数”）Print b&+a&End Sub程 序 运 行 后，单 击 命 令 按 钮，在 两 个 输 入 对 话 框 中 先 后 输 入 12345和

37、5 4 3 2 1,程 序 的 输 出 结 果 是 A.66666 B.54321 12345C.1234554321 D.出 错【分 析】InputBox函 数 的 返 回 值 是 一 个 字 符 串，但 由 于 a&和 b&通 过 类 型 说 明 符 被 显 式 地 定 义 为 长 整 型 变 量，因 而 在 执 行 InputBox函 数 后，所 返 回 的 字 符 串 值 被 转 换 为 长 整 型 值，它 实 际 上 相 当 于 执 行 一 次 类 型 转 换，即：a&=CLng（InputBox（请 输 入 第 一 个 数）b&=CLng（InputBox（请 输 入 第 二 个

38、数）这 样，当 执 行 Print方 法 时，将 计 算 并 输 出 算 术 表 达 式 b&+a&的 值。答 案 A例;假 定 程 序 中 有 如 下 语 句：answe厂 MsgBox（第 一 个 字 符 串，vbAbortRetryIgnore_Or vbCritical_Or vbDefaultButton3,_”第 二 个 字 符 串”）执 行 该 语 句 后，将 显 示 一 个 信 息 框，此 时 如 果 按 回 车 键，则 answer的 值 为 A.”第 二 个 字 符 串”B.5 C.3 D.7【分 析】M sgBox函 数 的 返 回 值 是 一 个 整 数，这 个 整 数

39、 与 所 选 择 的 按 钮 有 关。本 例 的 第 二 个 参 数 由 三 部 分 组 成，其 中 vbA bortRetrylgnore用 来 在 信 息 框 中 显 示 3 个 按 钮，分 别 为“终 止”、“重 试”和 忽 略；vbCritical用 来 在 信 息 框 中 显 示 Critical M essage图 标；而 vbDefaukButton3把 信 息 框 的 第 三 个 按 钮（即“忽 略”）指 定 为 默 认 按 钮。执 行 该 语 句 后，在 信 息 框 中 显 示 3 个 按 钮，并 把 第 三 个 按 钮 作 为 默 认 按 钮，此 时 如 果 按 回 车 键

40、，则 返 回 值 是 该 按 钮 所 对 应 的 值 由 于“忽 略”按 钮 对 应 的 值 是 5,因 此 变 量 answer的 值 为 5。答 案 B例 5 执 行 下 列 语 句 后，显 示 输 入 对 话 框,此 时 如 果 单 击“确 定”按 钮,则 变 量 strinput的 内 容 是。strinput=InputBox（“请 输 入 字 符 串”，“字 符 串 对 话 框”，“字 符 串”）【分 析】在 执 行 InputBox函 数 时，会 产 生 一 个 输 入 对 话 框，该 函 数 有 7 个 参 数，前 三 个 参 数 都 是 字 符 串。其 中 第 一 个 参 数

41、 用 来 在 输 入 对 话 框 内 显 示 一 个 提 示 用 户 输 入 的 字 符 串，第 二 个 参 数 是 对 话 框 的 标 题，第 三 个 参 数 是 输 入 的 默 认 信 息。也 就 是 说，在 执 行 InpulBox函 数 后，如 果 用 户 没 有 输 入 任 何 信 息，则 可 用 此 默 认 字 符 串 作 为 输 入 值。如 果 不 想 用 这 个 默 认 字 符 串 作 为 输 入 值，则 可 在 输 入 区 直 接 键 入 数 据，以 取 代 默 认 值。在 该 例 中，显 示 对 话 框 后 直 接 单 击“确 定”按 钮，因 此 第 三 个 参 数 就 是

42、 默 认 的 输 入 值。【答 案】字 符 串 例 6 阅 读 程 序：Private Sub Form_Click（）msgl$=继 续 吗?msg2$=操 作 对 话 框 r=MsgBox（msg 1$,vbYesNo OrvbDefaultButton2,msg2$）End Sub程 序 运 行 后，单 击 窗 体，将 产 生 一 个 信 息 框。此 时 如 果 直 接 按 回 车 键，则 相 当 于 用 鼠 标 单 击 信 息 框中 的 按 钮。【分 析】本 例 用 M sgBox函 数 产 生 信 息 框，该 函 数 的 第 一 个 参 数 在 信 息 框 内 显 示，第 二 个 参

43、 数 分 为 两 部 分，其 中 前 一 部 分(即 vbYesNo)用 来 在 信 息 框 中 产 生 两 个 按 钮，分 别 为“是”和“否”，后 一 部 分(即 vbDefaultButton2)把 第 二 个 按 钮(即“否”)设 置 为 默 认 按 钮；第 三 个 参 数 是 信 息 框 的 标 题。程 序 运 行 后，单 击 窗 体，所 产 生 的 信 息 框 的 标 题 为“操 作 对 话 框”,在 信 息 框 内 显 示 的 内 容 是“继 续 吗？”,两 个 按 钮 分 别 是“是”和“否，其 中“否”是 默 认 按 钮。此 时 如 果 按 回 车 键，则 与 单 击“否”按

44、 钮 效 果 相 同。【答 案】“否”或 第 二 个 例 7 设 有 如 下 程 序：Private Sub Form_Click()a=32548.56Print Format(Int(a*10+0.5)/10,M000,000.00)End Sub程 序 运 行 后，单 击 窗 体，输 出 结 果 是。【分 析】本 例 用 Form at函 数 对 数 值 进 行 格 式 化 输 出，要 输 出 的 数 值 存 放 在 变 量 a 中。Form at函 数 的 第 一 个 参 数 对 变 量 a 进 行 了 舍 入 处 理,保 留 一 位 小 数，第 二 位 小 数 四 舍 五 入,其 值

45、 为 32548.6Format函 数 的 第 二 个 参 数 是 格 式 说 明 符，使 用 的 说 明 符 有“0”和“，”，保 留 两 位 小 数，该 函 数 的 返 回 值 为 032,548.60【答 案】032,548.60例 8 编 写 程 序，计 算 圆 的 面 积.【分 析】圆 面 积 的 计 算 公 式 为：S=1 r2其 中 r 是 要 计 算 面 积 的 圆 的 半 径，程 序 运 行 后 从 键 盘 上 输 入。程 序 如 下：Private Sub Form_Click()Const PI=3.14159Dim r As Single,S As Singler=In

46、putBox(请 输 入 圆 的 半 径”，“输 入 数 据“，“50)S=PI*r*rPrint“S二“；Format(SEnd Sub程 序 运 行 后，单 击 窗 体，将 显 示 一 个 输 入 对 话 框，在 该 对 话 框 中 输 入 圆 的 半 径(默 认 为 5 0),然 后 单 击 确 定 按 钮 或 按 回 车 键，即 可 在 窗 体 上 输 出 圆 的 面 积。假 定 在 对 话 框 中 输 入 3 5,则 单 击“确 定”按 钮 后,输 出 结 果 为：S=3,848.45。例 9 从 键 盘 上 输 入 小 时、分 和 秒，把 它 转 换 为 秒 数 并 输 出。【分

47、析】1小 时 等 于 6 0分，1分 钟 等 于 6 0秒。把 小 时 数 乘 以 6 0*6 0,把 分 钟 数 乘 以 6 0,再 加 上 秒 数，就 等 于 总 秒 数。设 小 时 数 为 H,分 钟 数 为 M,秒 数 为 S,则 H 小 时、M 分、S 秒 的 总 秒 数 SS为：SS=H*60*60+M*60+S程 序 如 下：Private Sub Form_Click()H=InputBox(请 输 入 小 时，小 时)H=Val(H)M=InputBox(请 输 入 分，分”)M=Val(M)S=InputBox(请 输 入 秒，秒)S=Val(S)SS=S+M*60+H*6

48、0*60PrintH;小 时;M;分”;S;秒=;SS;秒 End Sub程 序 运 行 后，单 击 窗 体，将 先 后 显 示 3 个 输 入 对 话 框，要 求 输 入 小 时 二 分 和 秒。假 定 分 别 输 入 5、4 5和 2 5,则 输 出 结 果 为：5 小 时 4 5分 2 5秒=20725秒第 五 章 常 用 标 准 控 件 例 题 例 1 在 窗 体 上 画 两 个 文 本 框(其 名 称 分 别 为 T e x tl和 Text2)和 一 个 命 令 按 钮(其 名 称 为 Command1)，然 后 编 写 如 下 两 个 事 件 过 程：Private Sub Co

49、mmand 1 _Click()Textl.Text=Computer Rank Examination0End SubPrivate Sub Textl_Change()Text2.Text=UCase(Text 1.Text)End Sub程 序 运 行 后，单 击 命 令 按 钮，则 在 Text2文 本 框 中 显 示 的 内 容 是 A.Computer Rank ExaminationB.computer rank examinationC.COMPUTER RANK EXAMINATIOND.空 字 符 串【分 析】该 例 有 两 个 事 件 过 程，一 个 是 命 令 按 钮

50、的 C lick事 件 过 程，一 个 是 文 本 框 的 T e x tl的 Change事 件 过 程，当 单 击 命 令 按 钮 时，执 行 前 一 个 事 件 过 程，而 当 在 文 本 框 T e x tl中 输 入 信 息 时，将 执 行 该 文 本 框 的 Change事 件 过 程。在 命 令 按 钮 事 件 过 程 中，为 文 本 框 T e x ll的 Texl属 性 赋 值，即 在 该 文 本 框 中 显 示 字 符 串 Computer Rank Examination”，在 这 种 情 况 下，将 触 发 T e x tl文 本 框 的 Change事 件，把 文 本