C#常用控件.pdf

《C#常用控件.pdf》由会员分享，可在线阅读，更多相关《C#常用控件.pdf（54页珍藏版）》请在得力文库 - 分享文档赚钱的网站上搜索。

1、第 4 章 常 用 控 件 控 件 是 VB6.0用 户 接 口 的 基 本 构 件，是 程 序 员 设 计 用 户 界 面 的 基 本 元 素。VB6.0的 控 件 有 常 用 控 件、高 级 控 件，而 且 程 序 员 还 可 以 自 己 创 建 控 件。本 教 程 介 绍 常 用 控 件。4.1 标 签 控 件(Label)4.1.1 概 述 标 签 是 VB 6.0中 常 用 的 控 件 之 一，它 的 类 型 名 为 Label,程 序 员 在 窗 体 中 添 加 标 签 控 件 后，其 缺 省 名 称 按 先 后 顺 序 为 Label 1,Label2,。标 签 控 件 的 用

2、途 主 要 有 两 种：(1)给 本 身 没 有 Caption(标 题)属 性 的 控 件 加 标 志 性 说 明 或 提 示，如 给 文 本 框、列 表 框、组 合 框 等 控 件 加 标 识。(2)用 于 文 本 显 示。一 般 是 在 程 序 中 给 标 签 的 Caption属 性 赋 值，从 而 达 到 显 示 文 本 的 目 的。要 显 示 变 长 及 有 换 行 的 文 本，需 设 置 标 签 的 AutoSize和 Wordwrap 属 性 为 True。在 Caption属 性 中 输 入 标 题 时，在 某 字 符(非 汉 字)前 加,可 将 该 字 符 定 义 为 该

3、对 象 的 访 问 键，在 程 序 运 行 期 间，可 用“Alt+字 符”访 问 该 对 象。要 设 置 标 签 对 象 的 访 问 键，需 将 UseMnemonic属 性 设 为 True。4.1.2标 签 的 常 用 属 性、事 件 和 方 法 1.标 签 的 基 本 属 性 Alignment：设 置 Caption的 对 齐 方 式，0 左 对 齐，1 右 对 齐，2 中 对 齐。BackStyle：设 置 背 景 模 式：0 不 透 明，1 透 明。AutoSize：设 置 对 象 是 否 随 内 容 自 动 调 整 大 小，True 自 动 调 整，False 不 调 整。Wo

4、rdwrap：设 置 Caption中 内 容 是 否 可 以 垂 直 扩 充，即 是 否 可 以 换 行，True 可 以 垂 直 扩 充，从 而 文 本 中 可 以 含 有 换 行 符(Chr(10),显 示 时 可 以 换 行 显 示，False-不 能。ToolTipText：设 置 鼠 标 在 此 对 象 上 暂 停 时 显 示 的 文 本。在 属 性 值 栏 中 直 接 输 入 即 可。UseMnemonic：设 置 此 对 象 的 Caption(标 题)中 是 否 可 以 定 义 访 问 键，True 可 以 定 义 访 问 键，False 不 能 定 义 访 问 键。2.标

5、签 的 常 用 事 件(1)Change 事 件 Change：程 序 运 行 期 间，此 对 象 被 修 改 时 触 发 该 事 件。语 法：Private Sub object_Change(index As Integer)参 数 解 释：Index 返 回 一 个 整 数，它 是 一 个 可 选 项，当 且 仅 当 该 对 象 是 控 件 数 组 中 的 一 员 时，才 会 有 index参 数，用 来 唯 地 标 识 一 个 在 控 件 数 组(见 下 一 节)中 的 控 件(下 同)。Change事 件 过 程 可 协 调 在 各 控 件 间 显 示 的 数 据 或 使 它 们 同

6、 步。(2)MouseDown,MouseUp,MouseMove 事 件 MouseDown：鼠 标 键 在 此 对 象 上 按 下 时 触 发 该 事 件。MouseUp：鼠 标 键 在 此 对 象 上 按 下 后 释 放 时 触 发 该 事 件。MouseMove：鼠 标 移 动 经 过 此 对 象 时 触 发 该 事 件。语 法：Private Sub object_MouseDown(index As Integer,button As Integer,shift As Integer,x As Single,y As Single)Private Sub object _Mouse

7、Up(index As Integer,button As Integer,shift As Integer,x As Single,y As Single)Private Sub object_MouseMove(index As Integer,button As Integer,shift As Integer,x As Single,y As Single)参 数 解 释：index 返 回 一 个 整 数，用 来 唯 一 地 标 识 一 个 在 控 件 数 组 中 的 控 件。Button 返 回 一 个 整 数，表 示 鼠 标 按 钮，1 左 按 钮，2 右 按 钮，4 中 间 按

8、 钮。其 中 仅 有 一 位 被 设 置，指 示 出 引 起 该 事 件 的 那 个 按 钮。Shift 返 回 一 个 整 数，表 示 SHIFT,CTRL,ALT按 键，1 SHIFT键，2 CTRL键，4 ALT键。当 这 三 个 键 有 一 个 或 者 两 个 或 者 三 个 按 下 时，取 1,2,4 的 和,例 如，CTRL和 ALT键 都 被 按 下,则 shift的 值 就 是 60 x,y 返 回 一 个 指 定 鼠 标 指 针 当 前 位 置 的 列、行 坐 标。此 外 标 签 控 件 还 支 持 Click,DblClick事 件。3.标 签 的 常 用 方 法 标 签

9、控 件 的 常 用 方 法 有 Move,Refresho例:标 签 控 件 示 例。设 计 一 程 序，利 用 标 签 框 制 作 阴 影 效 果 Forl08使 用 标 签 框 制 作 阴 影 显 不 阴 影 对 象 属 性 设 置 窗 体（名 称）FormlBackColor 黄 色 标 签 1（名 称）Label 1Caption 使 用 标 签 框 制 作 阴 影 BackStyle 0（透 明）AutoSize True标 签 2（名 称）Label2Caption 使 用 标 签 框 制 作 阴 影 AutoSize TrueBackStyle 0（透 明）命 令 按 扭（名 称

10、）Command 1Caption 显 示 阴 影 事 件 过 程：Private Sub Command1_Click()Label1.ForeColor=RGB(150,150,150)LabeH.Move Label 1.Left+50,LabeH.Top+50End Sub4.2 命 令 按 钮 控 件(CommandButton)4.2.1 概 述 命 令 按 钮 的 类 型 名 为 CommandButton,程 序 员 在 窗 体 中 添 加 命 令 按 钮 控 件 后，其 缺 省 名 称 按 先 后 顺 序 为 Command 1,Command2,.命 令 按 钮 的 作 用

11、 是 接 受 用 户 的 访 问，进 而 开 始、中 断、结 束 一 个 进 程。为 了 在 命 令 按 钮 控 件 上 显 示 文 本，需 要 设 置 其 Caption属 性。为 了 能 够 在 按 Enter键 时 也 选 中 命 令 按 钮，需 要 将 其 Default属 性 设 置 为 True。为 了 能 够 按 Esc键 时 也 选 中 命 令 按 钮，则 需 要 将 Cancel属 性 设 置 成 True。4.2.2命 令 按 钮 的 常 用 属 性、事 件 和 方 法 1.命 令 按 钮 的 基 本 属 性 Cancel：设 置 此 对 象 是 否 为 缺 省 的 取 消

12、 按 钮，True 是，False（缺 省 值）不 是。窗 体 中 只 能 有 一 个 命 令 按 钮 的 Cancel设 置 为 True。若 Cancel设 为 True,则 不 管 窗 体 上 哪 个 控 件 是 焦 点，按 下 Esc就 相 当 于 单 击 该 按 钮 了。Default：设 置 此 对 象 是 否 为 缺 省 命 令 按 钮，True 是，False（缺 省 值）不 是。窗 体 中 只 能 有 一 个 命 令 按 钮 的 Default设 为 True。若 Default设 为 True,则 此 按 钮 成 为 缺 省 命 令 按 钮，此 时 按 Enter就 相 当

13、 于 单 击 此 按 钮，但 当 其 他 按 钮 取 得 焦 点 后，按 Enter触 发 的 是 取 得 焦 点 的 命 令 按 钮 的 单 击 事 件。Index：返 回 或 设 置 唯 一 标 识 控 件 数 组 中 一 个 控 件 的 编 号。仅 当 控 件 是 控 件 数 组 的 元 素 时 是 有 效 的。关 于 对 象 数 组 对 象 数 组 是 指 多 个 对 象 的 名 称 相 同，而 Index属 性 的 属 性 值 不 同，从 而 区 分 不 同 的 对 象，这 样 就 形 成 了 对 象 数 组。通 常 情 况 下，Index的 属 性 值 为 空，表 示 该 对 象

14、不 是 数 组，其 名 称 必 须 是 唯 一 的。当 给 Index设 置 一 个 值 后，该 对 象 便 成 为 一 个 对 象 数 组 了，即 使 只 有 一 个 成 员。由 上 可 知，要 设 置 对 象 数 组，只 要 修 改（名 称）和 Index属 性，使 其 名 称 相 同，Index的 属 性 值 不 同 就 可 以 了。Index是 从 0 开 始 的 整 数，最 大 为 32767。设 为 对 象 数 组 后，对 象 的 名 称 就 是“对 象（i），i=0,1,2,它 和 普 通 的 变 量 数 组 用 法 一 样，如：Commandl（0）.Caption=对 象 数

15、 组。当 一 个 对 象 是 按 对 象 数 组 的 元 素 命 名 时，则 该 对 象 的 事 件 将 有 一 个 参 数，如：Private Sub Command1_C1ick（Index As Integer）End Sub参 数 Index返 回 一 个 值，它 就 是 对 象 数 组 中 具 体 对 象 的 Index属 性 值，表 示 单 击 的 是 具 有 该 属 性 值 的 对 象。可 用 该 参 数 的 返 回 值 判 断 单 击 的 是 那 个 对 象。Style：设 置 此 对 象 的 外 观 形 式，0-Standard（标 准 的），1-Graphical（图 形

16、的）。DisabledPicture：Style=1 时，设 置 此 对 象 在 无 效 状 态（即 Enabled=False）时 显 示 的 图 片 屋 可 从 属 性 窗 口 中 加 载 图 片 文 件。DownPicture：Style=l时，设 置 此 对 象 在 按 下 状 态 时 显 示 的 图 片。可 从 属 性 窗 口 中 加 载 图 片 文 件。MaskColor：Style=l时，按 钮 按 下 时 在 透 明 状 态 下 显 示 的 颜 色。可 从 属 性 窗 口 的 调 色 板 中 选 择。UseMaskColor：Style=1 时,是 否 以 MaskColor中

17、 指 定 的 颜 色 作 为 透 明 区 域 的 颜 色。True-使 用 MaskColor指 定 的 颜 色，False-不 使 用。Tabindex：设 置 此 对 象 在 窗 体 中 的 编 号，用 于 移 动 焦 点。通 常 情 况 下，控 件 按 照 添 加 顺 序 分 配 Tabindex属 性 值，可 以 更 改 该 属 性 值，从 而 改 变 焦 点 移 动 顺 序。TabStop：设 置 是 否 可 以 用 Tab键 选 取 此 对 象，使 此 对 象 成 为 焦 点，True-(缺 省 值)此 对 象 可 以 用 Tab键 选 择 使 其 成 为 焦 点，False 不

18、能。2.命 令 按 钮 的 常 用 事 件 KeyDown：键 盘 有 键 按 下 时 触 发 该 事 件。KeyUp：按 下 某 个 键 释 放 时 触 发 该 事 件。KeyPress：敲 击 键 盘 时 触 发 该 事 件。语 法：Private Sub object_KeyDown(index As Integer,keycode As Integer,shift As Integer)Private Sub object KeyUp(index As Integer,keycode As Integer,shift As Integer)Private Sub object_KeyP

19、ress(index As Integer,keyascii As Integer)参 数 解 释：index 返 回 一 个 整 数，用 来 唯 一 标 识 一 个 在 控 件 数 组 中 的 控 件。Keycode 返 回 一 个 整 数(单 字 节)，即 按 键 的 代 码。键 盘 上 的 每 一 个 键 都 有 一 个 代 码，数 字 键 和 字 母 键 就 是 它 的 ASCH码，可 以 用 如 下 程 序 在 窗 体 上 查 看 和 获 得 键 的 代 码：Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)Pr

20、int KeyCode;Chr(KeyCode)End SubShift 返 回 一 个 整 数，表 示 SHIFT,CTRL,ALT按 键，1 SHIFT键，2 CTRL键，4 ALT键。当 这 三 个 键 有 一 个、两 个 或 者 三 个 按 下 时，取 1,2,4 的 和，例 如，CTRL和 ALT键 都 被 按 下，则 shift的 值 就 是 6。Keyascii 返 回 一 个 整 数(双 字 节)，即 按 键 的 ASCII码 或 汉 字 的 内 码。可 用 如 下 程 序 在 窗 体 查 看 其 返 回 值 的 情 况：Private Sub Form_KeyPress(Ke

21、yAscii As Integer)Print KeyAscii;Chr(KeyAscii)End Sub注 意，KeyDown和 KeyUp事 件 只 能 返 回 一 个 单 字 节 的 键 代 码，键 盘 上 的 每 一 个 键 都 有 一 个 代 码，对 字 母 键 不 分 大 小 写，都 按 大 写 算，程 序 中 需 要 配 合 Shift参 数 来 判 断 大 小 写。而 KeyPress事 件 返 回 的 是 键 的 ASCH码，是 双 字 节，区 分 大 小 写，而 且 可 以 识 别 单 个 汉 字，返 回 的 是 汉 字 的 内 码。应 当 使 用 KeyDown和 Key

22、Up事 件 过 程 来 处 理 任 何 不 被 KeyPress识 别 的 击 键，诸 如：功 能 键、编 辑 键、定 位 键 以 及 任 何 这 些 键 和 键 盘 换 档 键 的 组 合 等。这 三 个 事 件 响 应 的 先 后 顺 序 是 KeyDown,KeyPress,KeyUp。此 外 命 令 按 钮 控 件 还 支 持 Click,GotFocus,LostFocus,MouseDown,MouseMove,MouseUp 等 事 件。3.命 令 按 钮 的 常 用 方 法 SetFocus：移 动 焦 点 到 此 对 象。调 用 方 法 如 下：object.SetFocus

23、object必 须 是 Form对 象，MD I Form对 象 或 者 能 够 接 收 焦 点 的 控 件。调 用 SetFocus方 法 以 后，任 何 的 用 户 输 入 将 指 向 指 定 的 窗 体 或 控 件。此 外 命 令 按 钮 控 件 还 支 持 Move,Refresh等 方 法。例：设 计 一 应 用 程 序，使 命 令 按 扭 响 应“回 车”键 和“撤 消”键 按 键 事 件 过 程：单 击 事 件 过 程：Private Sub Form_KeyPress(KeyAsciiAs Integer)Private Sub Command1_Click()Dim CHAR

24、1 As StringPrint 单 击 了 一 下 鼠 标 CHAR1=Chr(KeyAscii)End SubPrint 正 在 按 下+CHAR1+”键,End Sub属 性 设 置:对 象 属 性 设 置 窗 体（名 称）FormlCaption 命 令 按 扭 属 性 的 应 用 标 签 1（名 称）Label 1BackStyle 0（透 明）标 签 2（名 称）Lable2BroderStyle 1（有 边 框）标 签 3（名 称）Lable3BroderStyle 1（有 边 框）命 令 按 扭 1（名 称）Command 1Caption 确 定(&0K)Default Tr

25、ue命 令 按 扭 2（名 称）Command2事 件 过 程:Caption 撤 消(&ESC)Cancel TruePrivate Sub Command1_Click()Commandl.Visible=FalseLabell.Visible=FalseLabel2.Caption=日 期+Date$Label3.Caption=时 间+Time$End SubPrivate Sub Command2_Click()EndEnd Sub4.3文 本 框 控 件(TextBox)4.3.1 概 述 T e x tB o x控 件 有 时 也 称 做 编 辑 字 段 或 者 编 辑 控 件，

26、显 示 设 计 时 程 序 员 的 输 入、运 行 时 用 户 的 输 入 或 在 代 码 中 赋 予 T e x t属 性 文 本。文 本 框 的 类 型 名 为 T e x tB o x,程 序 员 在 窗 体 中 添 加 文 本 框 控 件 后，其 缺 省 名 称 按 先 后 顺 序 为 T e x tl,T e x t 2,为 了 在 文 本 框 中 显 示 文 本，在 设 计 时，要 给 Text属 性 设 置 文 本，在 运 行 时 要 给 Text属 性 赋 值，也 可 以 取 其 值 而 获 得 文 本 框 中 的 文 本。为 了 在 TextBox控 件 中 显 示 多 行

27、文 本，要 将 MultiLine属 性 设 置 为 True。如 果 多 行 TextBox没 有 水 平 滚 动 条，那 么 即 使 TextBox调 整 了 大 小，文 本 也 会 自 动 换 行。为 了 在 TextBox上 定 制 滚 动 条 组 合，需 要 设 置 ScrollBars属 性。如 果 文 本 框 的 MultiLine属 性 设 置 为 True而 且 它 的 ScrollBars没 有 设 置 为 None(0),则 滚 动 条 总 出 现 在 文 本 框 上。如 果 将 MultiLine属 性 设 置 为 True,则 可 以 在 TextBox内 用 Ali

28、gnment属 性 设 置 文 本 的 对 齐。如 果 MultiLine属 性 是 False,则 Alignment属 性 不 起 作 用。在 DDE对 话 中，TextBox控 件 还 可 以 起 接 收 端 链 接 的 作 用。4.3.2 文 本 框 控 件 的 属 性、事 件 和 方 法 1.文 本 框 控 件 的 基 本 属 性 Text：设 置 或 返 回 该 对 象 的 文 本 内 容。类 型 为 字 符 串。ScrollBoars：设 置 边 框 滚 动 条 模 式，0 无，1 水 平，2 垂 直，3 全 有。MaxLength：设 置 Text属 性 中 可 能 输 入 的

29、 最 大 字 符 数。MultiLine：设 置 文 本 框 是 否 可 以 输 入 多 行，True 多 行，当 输 入 内 容 超 过 边 界 时，自 动 换 行。PasswordChar：设 置 此 对 象 是 否 按 输 入 字 符 显 示。如 该 属 性 设 为“*”，则 不 论 用 户 输 入 什 么 字 符，都 将 显 示“*。常 用 于 设 置 密 码。SelLength：返 回 或 设 置 所 选 择 的 字 符 数。SelStart：返 回 或 设 置 所 选 择 的 文 本 的 起 始 点；如 果 没 有 文 本 被 选 中，则 指 出 插 入 点 的 位 置。SelTe

30、xt：返 回 或 设 置 包 含 当 前 所 选 择 文 本 的 字 符 串；如 果 没 有 字 符 被 选 中，则 为 零 长 度 字 符 串 上 述 三 个 属 性 在 设 计 时 不 能 使 用。一 般 用 于 在 运 行 时 对 文 本 框 内 容 的 编 辑。如：Textl.SelStart=3Textl.SelLength=2s=Textl.SelText将 取 出 文 本 框 Textl中 从 第 三 个 字 符 开 始 的 两 个 字 符 赋 给 变 量 s,如 果 将 第 三 个 语 句 换 成 Textl.SelText=123,将 用“123”替 换 文 本 中 第 三

31、个 字 符 开 始 的 两 个 字 符。当 然 也 可 以 对 Text属 性 用 上 一 篇 介 绍 的 字 符 串 函 数 进 行 编 辑。Locked：设 置 文 本 框 的 内 容 是 否 可 以 编 辑，True 可 用“复 制”，但 不 能 用“剪 切”和“粘 贴”等 命 令，False 只 读，仅 能 显 示。Causevalidation：设 置 是 否 有 效 性 验 证 发 生 在 失 去 焦 点 的 控 件，True/FalseoHideselection：指 定 该 对 象 失 去 焦 点 时，是 否 隐 藏 标 准 文 本 框 控 件 的 选 择。标 准 文 本 框

32、控 件(MaskEdBox)提 供 受 限 制 的 格 式 化 输 入 和 输 出。IMEMode：设 定 所 使 用 的 输 入 方 法 的 模 式，0 无，1 打 开，2 关 闭，3 暂 停。2.文 本 框 控 件 的 常 用 事 件 GotFocus：当 一 个 对 象 获 得 焦 点 时 产 生 该 事 件。Private Sub object_GotFocus(index As Integer)LostFocus：当 一 个 对 象 失 去 焦 点 时 产 生 该 事 件。Private Sub object_LostFocus(index As Integer)Validate：在

33、 焦 点 转 到 下 一 个 控 件 之 前 发 生，此 时 该 控 件 的 CausesValidation 属 性 值 设 置 为 True。Private Sub object_Validate(KeepFocus As Boolean)参 数 KeepFocus确 定 控 件 是 否 失 去 焦 点 的 值。KeepFocus设 置 为 True时,控 件 保 持 焦 点。Validate事 件 和 CausesValidation属 性 协 同 工 作，防 止 控 件 失 去 焦 点 直 到 满 足 确 定 的 准 则。只 有 在 即 将 获 得 焦 点 的 控 件 的 Causes

34、Validation属 性 值 设 置 为 True时，Validate事 件 才 发 生。此 外 文 本 框 控 件 还 支 持 Change,Click,DblClick,KeyDown,KeyPress,KeyUp,MouseDown,MouseMove,MouseUp 等 事 件。3.文 本 框 控 件 的 常 用 方 法 文 本 框 控 件 的 常 用 方 法 有：Move,Refresh,SetFocus。例：设 计 一 应 用 程 如 图，单 击 单 选 扭 可 以 改 变 标 签 框 中 文 字 的 字 体、大 小 和 颜 色。事 件 过 程:Private Sub Form_

35、Load()Labell.Caption=文 字 属 性 的 改 变 Labell.FontName=宋 体 Labell.FontSize=14Labell.ForeColor=vbBlueOptionl.Value=TrueOption4.Value=TrueOption7.Value=TrueEnd SubPrivate Sub Option1_Click()Labell.FontName=宋 体 End SubPrivate Sub Option2_Click()Labell.FontName=隶 书 End SubPrivate Sub Option3_Click()Labell.F

36、ontName=幼 圆 End SubPrivate Sub Option4_Click()Labell.FontSize=14End SubPrivate Sub Option5_Click()Labell.FontSize=18End SubPrivate Sub Option6_Click()Labell.FontSize=22End SubPrivate Sub Option7_Click()Labell.ForeColor=vbBlueEnd SubPrivate Sub Option8_Click()Labell.ForeColor=RGB(255,0,255)End SubPri

37、vate Sub Option9_Click()Labell.ForeColor=vbGreenEnd Sub4.4列 表 框 控 件(ListBox)4.4.1 概 述 列 表 框 的 类 型 名 为 ListBox,程 序 员 在 窗 体 中 添 加 列 表 框 控 件 后，其 缺 省 名 称 按 先 后 顺 序 为 Listl,List2,。列 表 框 控 件 显 示 项 目 列 表，从 其 中 可 以 选 择 一 项 或 多 项。如 果 项 目 总 数 超 过 了 列 表 框 可 显 示 的 项 目 数，就 自 动 在 ListBox控 件 上 添 加 滚 动 条。使 用 Addlte

38、m或 者 Removeitem方 法 可 以 添 加 或 者 删 除 ListBox控 件 中 的 项 目。利 用 List,ListCount和 Listindex属 性 可 以 访 问 ListBox中 的 项 目。也 可 以 使 用 List属 性 在 列 表 中 增 加 或 替 换 项 目。4.4.2 列 表 框 控 件 的 属 性、事 件 和 方 法 1.列 表 框 控 件 的 基 本 属 性 Columns：指 定 列 表 框 中 列 的 数 目，0 垂 直 单 列 列 表，1 水 平 单 列 列 表，大 于 1 水 平 多 列 列 表。IntegraHeight：设 置 对 象

39、是 否 自 动 调 整 大 小，True/False。ItemData：返 回 或 设 置 ComboBox或 ListBox控 件 中 每 个 项 目 的 编 号。ItemData是 一 个 整 型 数 组，其 下 标 取 值 为 0ListCountT。ItemData需 要 设 置，不 设 置 其 值 为 0。ListCount：返 回 ComboBox和 ListBox控 件 列 表 中 的 项 目 数。该 属 性 是 只 读 的。Listindex：返 回 列 表 框 中 选 中 项 目 的 索 引 号(顺 序 号)。可 用 该 属 性 判 断 在 列 表 中 具 体 选 择 了 那

40、 一 项，配 合 List数 组 还 可 获 得 被 选 择 的 项 目。该 属 性 是 只 读 的，不 能 设 置。如 果 没 有 选 择 项 目，Listindex属 性 值 为 T。列 表 中 的 第 一-项 是 Listindex=0,最 后 一 项 为 Listindex=ListCount-10List：返 回 或 设 置 控 件 的 列 表 部 分 的 项 目。List是 一 个 字 符 串 数 组，数 组 的 每 一 项 都 是 一 列 表 项 目，其 下 标 取 值 为 0 ListCountT。object.List(index)=string参 数 解 释：object-

41、对 象 表 达 式。index-列 表 中 具 体 某 一 项 目 的 号 码。string 字 符 串 表 达 式，指 定 列 表 项 目。如 果 不 选 该 参 数，则 取 出 index号 码 对 应 的 项 目，如 果 选 择 该 参 数，则 在 列 表 中 增 加 或 替 换 一 个 项 目。如，可 用 下 面 语 句 在 列 表 尾 部 增 加 项 目：object.List(object.ListCount)=stringText：返 回 用 户 在 该 对 象 中 选 定 的 列 表 项 目，和 List(Listindex)的 返 回 值 相 同，是 只 读 的。上 述 四

42、个 属 性 可 应 用 于 列 表 框、组 合 框 控 件，前 三 项 还 可 以 用 于 文 件 控 件。MultiSelect：返 回 或 设 置 一 个 值，该 值 指 示 是 否 能 够 在 ListBox或 FileListBox控 件 中 进 行 复 选 以 及 如 何 进 行 复 选。0(缺 省 值)不 允 许 复 选。1 简 单 复 选。鼠 标 单 击 或 按 下 SPACEBAR(空 格 键)在 列 表 中 选 中 或 取 消 选中 项（箭 头 键 移 动 焦 点）。2 扩 展 复 选。按 下 SHIFT并 单 击 鼠 标 或 按 下 SHIFT以 及 一 个 箭 头 键（上

43、 箭 头、下 箭 头、左 箭 头 和 右 箭 头）将 在 以 前 选 中 项 的 基 础 上 扩 展 选 择 到 当 前 选 中 项。按 下 CTRL并 单 击 鼠 标 在 列 表 中 选 中 或 取 消 选 中 项。Selected：返 回 或 设 置 列 表 框 或 文 件 列 表 框 中 项 目 的 选 择 状 态。Selected是 一 个 布 尔 数 组，和 List数 组 一 样，每 一 个 数 组 元 素 对 应 列 表 中 的 一 个 项 目，当 该 数 组 元 素 为 True时，表 示 该 项 目 被 选 中，为 False时，未 选 中。该 属 性 用 于 列 表 框 和

44、 文 件 列 表 框 控 件。SelCount：当 MultiSelect属 性 设 置 为 1或 2 时,返 回 列 表 框 中 被 选 中 项 的 数 量。Sorted：设 置 列 表 框、组 合 框 控 件 中 列 表 内 容 是 否 自 动 按 字 母 排 序，True/FalseoStyle：设 置 此 对 象 的 外 观 形 式，0 Standard（标 准 列 表 框），1 Checkbox（复 选 列 表 框，即 列 表 框 中 的 每 一 项 都 是 复 选 项）。2.列 表 框 控 件 的 常 用 事 件 ItemCheck：当 ListBox控 件 的 Style属 性

45、设 置 为 1（复 选 框），并 且 ListBox控 件 中 一 个 项 目 的 复 选 框 被 选 定 或 者 被 清 除 时 该 事 件 发 生。ItemCheck事 件 出 现 在 Click事 件 之 前。Private Sub object_ItemCheck（index As Integer）Scroll：包 含 一 个 滚 动 条 的 对 象 的 滚 动 框 被 重 新 定 位，或 按 水 平 方 向 或 垂 直 方 向 滚 动 时，此 事 件 发 生。Private Sub object_Scroll（）此 外 列 表 框 控 件 还 支 持 Click,DblClick,G

46、otFocus,KeyDown,KeyPress,KeyUp,LostFocus,MouseDown,MouseMove,MouseUp,Validate 等 事 件。3.列 表 框 控 件 的 常 用 方 法 Additem：用 于 将 项 目 添 加 到 ListBox或 ComboBox控 件。object.Additem Item,Index参 数 解 释：object-必 需 的。一 个 对 象 表 达 式。Item-必 需 的。字 符 串 表 达 式，它 用 来 指 定 添 加 到 该 对 象 的 项 目。Index 可 选 的。是 整 数，它 用 来 指 定 新 项 目 或 行

47、在 该 对 象 中 的 位 置。对 于 ListBox 或 ComboBox 控 件 的 首 项 index=0。如 果 所 给 出 的 index值 有 效，则 item将 放 置 在 object中 相 应 的 位 置。如 果 省 略 index,当 Sorted属 性 设 置 为 True时，item将 添 加 到 恰 当 的 排 序 位 置，当 Sorted属 性 设 置 为 False时，item将 添 加 到 列 表 的 结 尾。绑 定 到 Data控 件 的 ListBox或 ComboBox控 件 不 支 持 Additem方 法。Removeitem：用 以 从 ListBo

48、x或 ComboBox控 件 中 删 除 一 项。object.Removeitem Index参 数 解 释：object-必 需 的。一 个 对 象 表 达 式。index 必 需 的。一 个 整 数，它 表 示 要 删 除 的 项 或 行 在 对 象 中 的 位 置。对 于 ListBox 或 ComboBox 中 的 首 项 index=0。被 绑 定 到 Data控 件 的 ListBox或 ComboBox不 支 持 Removeitem方 法。Clear：用 于 清 除 ListBox,ComboBox或 Clipboard（系 统 剪 贴 板）的 内 容。object.Clea

49、r对 象 名 称 object是 必 需 的。绑 定 到 Data控 件 的 ListBox或 ComboBox控 件 不 支 持 Clear方 法。此 外 列 表 框 控 件 还 支 持 Move,Refresh,SetFocus等 方 法。例:列 表 框 示 例。设 计 一 程 序，查 询 飞 往 各 城 市 的 航 班 时 间。要 求 单 击 城 市 名，显 示 航 班 飞 行 时 间。-Forl EU 回 冈 阳 洲 圳 庆 门 花 广 深 重 厦 属 性 设 置:对 象 属 性 设 置 标 签 1 Name Label 1Caption 请 选 择 目 的 地 标 签 2 Name

50、Label2Caption 航 班 信 息事 件 过 程：列 表 框 Name ListlFont 黑 体、加 粗、四 号 字 文 本 框 Name TextlMultiLine TrueScrollBars 2（加 垂 直 滚 动 条）命 令 按 扭 Name Command 1Caption 结 束 Private Sub Command1_Click()EndEnd SubPrivate Sub Form_Load()Listl.Additem 上 海 Listl.Additem 大 连 Listl.Additem 广 洲 Listl.Additem 深 圳 Listl.Additem