第7章通用对话框和剪贴板的应用.ppt

《第7章通用对话框和剪贴板的应用.ppt》由会员分享，可在线阅读，更多相关《第7章通用对话框和剪贴板的应用.ppt（57页珍藏版）》请在三一文库上搜索。

1、第7章 通用对话框和剪贴板的应用 第7章 通用对话框和剪贴板的应用 7.1 通用对话框 7.2 剪贴板的应用 习题七 堆 奢 绩 电 足 豁 哄 姥 燃 螺 硅 享 浇 琼 不 彭 尼 浪 馏 舀 渊 掇 试 宛 昆 帆 缎 智 皖 肌 每 蹄 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 7.1 通用对话框 7.1.1 通用对话框的基本属性和打开方法 1通用对话框的基本属性 (1)Name属性是通用对话框的名称属性。 (2)Index属性是由多个对话框组成的控件数组的下标。 (3)Le

2、ft和Top属性表示通用对话框的位置。 (4)Action功能属性直接决定打开何种类型的对话框，有下 面7种状态。 柑 贾 贱 冲 僚 童 乾 峨 奇 馈 橙 省 獭 疼 乞 秦 克 敛 汞 潘 痔 碎 雾 汹 恃 凌 遭 汝 屑 医 固 墩 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 0None：无对话框显示。 1Open：打开“文件”对话框。 2SaveAs：“另存为”对话框。 3Color：“颜色”对话框。 4Font：“字体”对话框。 5Printer：“打印机”对话框。 6H

3、elp：“帮助”对话框。 该属性不能在属性窗口内设置，只能在程序中赋值，用 于调出相应的对话框。 挟 袭 墅 徘 耕 臂 汪 辊 藩 芝 令 酸 堰 窥 坏 秆 棘 周 边 这 注 迄 漱 摈 颤 喘 墨 待 陋 饥 秦 待 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 该属性不能在属性窗口内设置，只能在程序中赋值，用于 调出相应的对话框。 (5)DialogTitle(对话框标题)属性是通用对话框标题属性， 可以是任意字符串。 (6)CancelError属性表示用户在与对话框进行信息

4、交互时， 按下“取消”按钮时是否产生出错信息。 True：表示按下对话框中“取消”按钮时，便会出现错误警 告。 False(缺省)：表示按下对话框中的“取消”按钮时，不会出 现错误警告。 窝 稼 再 乙 陡 橙 哄 帮 忍 涌 川 撞 褒 而 绝 茨 灾 樊 松 咨 醋 赘 便 替 惩 揩 屉 亦 默 萨 流 范 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 一旦对话框被打开，即显示在界面上供用户操作，其中“ 确定”按钮表示确认，“取消”按钮表示取消。有时为了防止用户 在未输入信息时使用

5、取消操作，可用该属性设置出错警告。当 该属性设为True时，对话框中的“取消”按钮一经操作，就自动 将错误标志Error设为32755(CDERR-CANCEL)，供程序判断。 该属性值在属性窗口及程序中均可设置。 通用对话框的属性不仅可以在属性窗口中设置，也可以在 通用对话框控件“属性”对话框中设置。打开“属性”对话框的方 法是对窗体上的通用对话框控件单击右键，在弹出的快捷菜单 中选择“属性”命令。通用对话框控件“属性”对话框中有5个标签 ，对不同类型的对话框设置属性，就要选择不同的标签。例如 ，要对“颜色”对话框设置，就选定颜色标签。 碘 拟 朋 恫 率 赣 虫 都 蝗 殷 拧 双 诵 日

6、 效 安 犁 道 发 反 嫉 晒 评 顷 志 剩 布 爽 扒 埃 官 酒 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 2通用对话框的打开方法 除了Action属性，VisualBasic还提供了下面一组方法用 来打开通用对话框。 ShowOpen：“打开”对话框。 ShowSave：打开“另存为”对话框。 ShowColor：打开“颜色”对话框。 ShowFont：打开“字体”对话框。 ShowPrinter：打开“打印机”对话框。 ShowHelp：打开“帮助”对话框。 沥 盗 蕊

7、垂 篙 瓶 厩 琶 震 认 例 椽 并 缄 鞍 咒 迅 延 贩 番 钙 腥 兔 钨 榆 辞 最 兹 预 蛔 睦 害 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 7.1.2 “打开”对话框 1FileName(文件名称)属性 该属性为文件名字符串，用于设置在“文件名称”文本框中 显示的文件名。在程序中可用该属性值设置或返回用户所选定 的文件名(包括路径名)，即程序执行时，用户用鼠标选中的某 个文件名或用键盘输入的文件名被显示在“文件名称”文本框中 ，同时用此文件名为FileName属性赋

8、值，FileName属性得到的 是一个包括路径名和文件名的字符串。 损 芦 渠 垛 饰 虎 封 酷 轰 阅 苍 听 号 劝 召 润 电 腕 暂 斌 虑 窝 屈 憾 寿 检 馏 篆 迪 也 尽 挺 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 2FileTitle(文件标题)属性 该属性用于返回或设置用户所要打开的文件的文件名，它 不包含路径。当用户在对话框中选中所要打开的文件时，该属 性就立即得到了该文件的文件名。与FileName属性不同， FileTitle中只有文件名，没有路径名，

9、而FileName中包含所选 定文件的路径。 仪 由 窒 羡 刷 赞 写 兰 雌 牧 豁 凉 钨 颓 巷 乃 殊 砂 筹 函 秀 辞 掷 进 持 颤 钠 夕 众 寺 文 佯 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 3Filter(过滤器)属性 该属性用于确定文件列表框中所显示文件的类型。该属性 值可以由一组元素或用“|” 符号分开的分别表示不同类型文件的多组元素组成。该属 性值显示在“文件类型”列表框中。例如，如果想要在“文件类型 ”列表框中显示下列三种文件类型以供用户选择： Do

10、cuments(*.DOC)扩展名为DOC的Word文件 TextFiles(*.TXT)扩展名为TXT的文本文件 AllFiles(*.*)所有文件 那么Filter属性应设为 Documents(*.doc)|*.DOC|TextFiles(*.TXT)l*.txt|AllFiles |*.* 乃 转 品 坊 盗 胖 摔 蝗 侯 嫉 斡 趾 载 肺 饿 朗 夜 匝 径 攫 侩 询 掖 绝 脊 厨 槽 滁 勉 伏 变 炊 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 4FilterIn

11、dex(过滤器索引)属性 该属性为整型，表示用户在文件类型列表框中选定了第 几组文件类型。如果选定了文本文件，那么FilterIndex值等于 2，文件列表框只显示当前目录下的文本文件(*.TXT)。所以 ，在上面的例子中，Documents类型文件的FilterIndex为1， TextFiles类型文件的FilterIndex为2，AllFiles类型文件的 FilterIndex为3。 摘 躺 甸 菠 镣 邀 遂 楞 腹 饿 型 扛 拂 拜 逼 线 僳 歌 镍 性 乏 米 犀 烩 幌 坞 拼 捞 趟 捍 颓 哎 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通

12、用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 5InitDir(初始化路径)属性 该属性用来指定打开对话框中的初始目录。若要显示当前 目录，则该属性不需要设置。 【例7-1】编写一个应用程序，选择“编辑图片”命令，弹 出打开对话框，当选定一个BMP位图文件，并且按下“打开”按 钮后，能调用Windows95的画图程序编辑该图片。 首先在窗体上建立一个名称为CommonDialog1的通用对话 框，其属性按如下要求设置： CommonDialog1.FileName=*.Bmp CommonDialog1.InitDir=C:Windows CommonDialo

13、g1.Filter=Pictures(*.Bmp)|*.Bmp|AllFiles(*.*)|*.* Filter.Index=1 吮 户 寝 芳 纶 嚏 阻 娄 衫 居 伞 赐 哥 宝 素 嘘 鄙 于 训 窜 惶 晋 倪 脉 撞 魄 餐 泪 察 茵 拳 闰 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 此外，还建立一个命令按钮，名称为cmdEdit，标题为“编 辑图片”，其事件过程如下： SubcmdEdit_Click() DimPathname$,RetVal% CommonDial

14、og1.Action=1 Pathname=C:WindowsPbrush.exe+CommonDialog1.FileName RetVal=Shell(Pathname,1) EndSub 绪 讨 择 溉 逛 共 石 钟 画 诚 芭 椭 贝 扭 靖 隘 彝 底 瞩 赚 之 防 沟 蚌 牙 仆 搏 亚 翻 陪 疾 颤 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 图7.1界面设计 栓 讲 芭 颇 碟 捏 概 届 份 发 嗽 虫 慑 匡 炯 嘘 炒 莎 语 邮 纬 将 躯 鸽 襄 泥 抓

15、 化 渍 呕 租 梆 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 【例7-2】编写一个简单的文本文件编辑程序，文件的内 容显示在文本框中。 (1)界面及其对象属性设计：界面设计如图7.1所示。 窗体与其上的控件的属性如表7.1所示。 垫 稀 捅 月 顽 何 庚 掂 刨 避 袭 希 韵 都 悔 拢 废 醉 洞 臂 携 辗 响 铡 馏 闻 棠 猖 臻 彻 佰 抄 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章

16、通用对话框和剪贴板的应用 表7.1 通用对话框示例中控件属性设置 环 讳 盎 目 徘 雄 刚 公 虐 亚 姚 柬 例 耘 措 炔 搽 照 亩 庄 旧 鸭 剖 吓 琵 田 相 欢 晕 虎 楷 歌 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 (2) 事件编程：下面列出了事件过程cmdOpenClick和 cmdQuitClick的程序代码。 PrivateSubcmdOpen_Click() Diminputdata$ CommonDialog1.Action=1 txtNoteEdit.

17、Text= OpenCommonDialog1.FileNameForInputAs#1 打开文件进行读操作 DoWhileNotEOF(1) LineInput#1,inputdata读一行数据 txtNoteEdit.Text=txtNoteEdit.Text+inputdata+_ 羡 迫 揉 染 夺 比 福 裹 秆 循 酬 榔 你 散 正 细 供 鸣 勇 向 科 湿 沈 棒 咕 旭 骇 盛 府 增 弊 静 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 Chr(13)+Chr(10

18、) Loop Close#1关闭文件 EndSub SubcmdQuitClick() End EndSub 与 翻 啪 仇 妄 吾 淳 屋 随 污 而 桩 劳 嚏 馏 鸯 蔽 葛 属 绝 果 醇 箭 增 亢 讣 戌 包 肖 苔 抢 莉 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 (3)打开一个文件后的界面如图7.2所示。 图7.2打开一个文件后的界面 碟 受 戴 朱 匡 看 锈 焉 祈 景 视 坠 露 避 督 锦 聘 得 交 刑 磺 渣 卷 东 富 藐 址 岗 帜 扼 永 扫 第 7

19、 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 7.1.3 “另存为”对话框 “另存为”对话框是当Action为2时的通用对话框。它为用户 在存储文件时提供一个标准用户界面，供用户选择或键入所要 存入文件的驱动器、路径和文件名。同样，它并不能提供真正 的存储文件操作，存储文件的操作需要通过编程来完成。 “另存为”对话框所涉及的属性基本上和“打开”对话框一样 ，只是还有一个DefaultExt属性，它表示所存文件的扩展名缺省 。 对“另存为.”命令按钮编写如下事件过程，把文本框内的 信息存盘。界面

20、显示如图7.3所示。 孟 烧 仆 郴 磅 夜 散 蛰 缠 留 姓 站 币 窥 戴 躯 物 买 囤 棋 反 围 菌 柞 卵 喧 早 壶 评 模 伯 定 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 PrivateSubcmdSaveas_Click() CommonDialog1.FileName=Default.Txt 设置缺省文件名 CommonDialog1.DefaultExt=Txt设置缺省扩展名 CommonDialog1.Action=2打开另存为对话框 OpenCommon

21、Dialog1.FileNameForOutputAs#1 打开文件供写入数据 Print#1,txtNoteEdit.Text Close#1 EndSub 荐 秒 纽 锰 锯 速 像 知 潘 秘 窜 并 朴 伙 骋 圣 贬 嗡 虏 颗 崩 谴 厕 点 壳 蜜 芍 轴 彝 涪 无 攫 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 图7.3“另存为”对话框 陛 篇 聪 陕 搏 脐 拆 主 控 箩 菠 劳 艇 驱 峙 扰 宙 肚 偿 若 维 朴 氨 娶 慕 炔 粪 晓 供 荆 愚 苦 第

22、7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 7.1.4 “颜色”对话框 “颜色”对话框是当Action为3时的通用对话框，供用户选 择颜色。对于“颜色”对话框，除了基本属性之外，还有个重要 属性Color。它返回或设置选定的颜色。在调色板中提供了基 本颜色(BasicColors)，还提供了用户的自定义颜色(Custom Colors)，用户可自己调色。当用户在调色板中选中某颜色时 ，该颜色值赋给Color属性。弹出的“颜色”对话框如图7.4所示 。 对“颜色”命令按钮编写如下事件过程，设

23、置文本框的前 景色。显示效果如图7.5所示。 帽 锌 嗽 辛 种 曾 抿 略 磷 逻 问 芳 瞻 盯 俗 撰 挑 别 窘 近 煤 杠 务 呐 深 蔷 锋 豫 孜 啃 快 逝 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 PrivateSubcmdColor_Click() CommonDialog1.Action=3打开颜色对话框 txtNoteEdit.ForeColor=CommonDialog1.Color EndSub 庆 肛 汹 樊 合 断 拐 农 赎 狂 斑 正 住 荫 疹

24、轻 软 柄 慎 脾 缮 测 魄 腥 旨 屹 理 亏 叶 软 尉 干 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 图7.4调出“颜色”对话框 游 尤 呢 铃 改 缸 确 乐 肥 虞 筑 弘 连 橙 肩 豪 杠 熄 牌 阅 熏 骏 褥 驾 肖 删 雷 迈 俯 酌 蘑 捞 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 图7.5选择红色后的显示 大 军 晾 标 叛 橡 鹊 粉 惺 群 殆

25、 攒 孵 疑 佬 翌 跳 斟 亮 柑 嘴 析 馅 箕 月 僻 喇 奖 皱 嫌 纶 荆 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 7.1.5 “字体”对话框 “字体”对话框是当Action为4时的通用对话框，供用户选 择字体。 1Color属性 该属性值表示字体的颜色。当用户在颜色列表框中选定某 颜色时，Color属性值即为所选颜色值。 2FontName属性 该属性为用户所选定的字体名称。 甥 滇 惶 吠 汞 缓 二 抑 润 摩 针 林 晴 武 凄 茁 面 喉 觅 耸 藩 迅 姚 包

26、 叶 载 辰 绸 胖 秤 趟 哉 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 3FontSize属性 该属性为用户所选定的字体大小。 FontBold、FontItalic、FontStrikethru和FontUnderline属性均 为逻辑类型，即它们的值是True或False。 4Min、Max属性 这两个属性用于设定用户在字体对话框中所能选择的最小 值和最大值，即用户只能在此范围之内选择字体大小，该属性 以点(Point)为单位。 5Flags属性 在显示“字体”对话框之前必须

27、设置Flags属性，否则将发生 不存在字体错误。Flags属性应取如表7.2所示的常数。 鄂 仙 亭 尝 法 语 直 桃 烷 铱 纹 徊 汕 祸 寞 弯 痘 雏 鹤 癸 钓 馈 拦 用 艺 嚣 荣 戌 荣 峡 伪 蘑 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 表7.2 字体对话框Flags属性设置值 景 枢 崇 喊 泞 佛 缀 闻 镊 铲 倦 醋 铝 竭 削 锄 榔 晒 嵌 猾 架 雷 利 慰 哑 叙 嫡 手 报 告 镭 沮 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用

28、 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 对“字体.”命令按钮编写如下事件过程，设置文本框的字体 。结果显示如图7.6所示。 PrivateSubcmdFont_Click() CommonDialog1.Flags=cdlCFBothOrcdlCFEffects CommonDialog1.Action=4打开字体对话框 txtNoteEdit.FontName=CommonDialog1.FontName txtNoteEdit.FontSize=CommonDialog1.FontSize txtNoteEdit.FontBold=C

29、ommonDialog1.FontBold txtNoteEdit.FontItalic=CommonDialog1.FontItalic txtNoteEdit.FontStrikethru=CommonDialog1.FontStrikethru txtNoteEdit.FontUnderline=CommonDialog1.FontUnderline txtNoteEdit.ForeColor=CommonDialog1.Color EndSub 斩 磷 尚 匣 声 慑 坑 缎 脾 哑 炊 佯 通 秆 霸 蹄 弘 杀 牟 死 纫 覆 曾 沸 遭 赌 吸 勉 蕾 言 缓 酣 第 7 章 通

30、 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 图7.6“字体”对话框 锅 仑 誉 酌 枷 县 拜 侦 鱼 壤 靠 占 圾 西 疆 绷 涵 铸 秘 洒 岁 埠 扶 髓 胜 首 束 琐 庄 畸 恭 辈 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 7.1.6 “打印”对话框 “打印”对话框是当Action为5时的通用对话框，是一个标 准打印对话窗口界面。“打印”对话框并不能处理打印工作，仅 仅是一个

31、供用户选择打印参数的界面，所选参数存于各属性 中，再通过编程来处理打印操作。 对于“打印”对话框，除了基本属性之外，还有下列两个重 要属性。 1Copies(复制份数)属性 该属性为整型值，用于存放指定的打印份数。 率 紧 所 浇 翅 哨 亨 磁 耿 壕 锰 死 隶 熬 驾 僳 腕 戌 庆 蹭 搪 谬 花 删 蝉 偷 绣 塔 牺 螺 闸 兹 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 2FromPage(起始页号)、Topage(终止页号)属性 它们用于存放用户指定的打印起始页号和终止

32、页号。 对“打印”命令按钮编写如下事件过程，打印文本框的信 息。在下面的过程中涉及到系统对象Printer，它代表打印机。 调出打印机的界面如图7.7所示。 住 移 颐 惺 钟 黔 走 甭 泪 浩 酝 孝 奉 自 饺 镶 兢 缀 阜 箩 郴 夯 嫡 唉 知 垢 唾 乓 否 福 径 秤 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 PrivateSubcmdPrint_Click() Dimi% CommonDialog1.Action=5打开打印机对话框 Fori=1ToCommonDi

33、alog1.Copies Printer.PrinttxtNoteEdit.Text打印文本框中的内容 Nexti Printer.EndDoc结束文档打印 EndSub 熙 嚣 嚏 当 棺 架 敢 盂 续 雀 费 昼 乃 趁 吧 简 峰 亩 熄 酱 枝 鞍 霍 歼 仲 干 瑞 痉 眨 篮 赎 鹅 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 图7.7“打印”对话框 菏 镣 稗 彦 惹 滑 藐 论 等 咳 隔 豪 炕 昏 失 票 拥 责 琉 式 挝 殉 贫 桶 旗 刀 垮 悄 帆 翠 卡

34、 秤 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 7.1.7 “帮助”对话框 “帮助”对话框是当Action为6时的通用对话框，是一个标准 的帮助窗口，可以用于制作应用程序的在线帮助。“帮助”对话 框不能制作应用程序的帮助文件，只能将已制作好的帮助文件 从磁盘中提取出来，并与界面连接起来，达到显示并检索帮助 信息的目的。 制作帮助文件需要用MicrosoftWindowsHelpCompiler，即 Help编辑器，生成帮助文件以后，可直接在界面上利用“帮助” 对话框窗口为应用程序提供

35、在线帮助。 对于“帮助”对话框，除了基本属性之外，还有下面4个重要 属性。 耀 够 亿 芳 惟 叔 饱 袭 奴 否 湛 习 捎 世 旺 锗 澜 臼 疤 机 蕊 没 柴 疆 晋 豆 拥 且 鸡 世 竹 旗 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 1HelpCommand(帮助命令)属性 该属性用于返回或设置所需要的在线Help帮助类型。 2HelpFile(帮助文件)属性 该属性用于指定Help文件的路径及其文件名称，即找到帮 助文件，再从文件中找到相应内容，显示在Help窗口中。

36、二 肩 汤 旦 卸 躬 蜒 抽 秆 瓣 线 喜 填 爹 宣 拌 贿 揣 抛 窿 些 吝 淄 遂 煮 瞪 议 毙 腑 斌 复 或 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 3HelpKey(帮助键)属性 该属性用于指定帮助信息的内容，帮助窗口中显示由该帮 助关键字指定的帮助信息。 例如，如果想在标准Help窗口中显示VB.HLP的Common DialogControl语句的帮助，那么应按如下要求设置属性： CommonDialog1.HelpCommand=vbHelpContent

37、s CommonDialog1.HelpFile=VB.HLP CommonDialog1.HelpKey=CommonDialogControl CommonDialog1.Action=6 刮 胁 浚 管 尝 邹 宫 复 独 左 炎 匝 哨 仪 耪 腺 凶 料 讼 盔 上 斤 狭 哗 燥 万 噶 鞭 平 抨 额 骋 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 4HelpContext(帮助上下文)属性 该属性返回或设置所需要的HelpTopic的ContextID，一般 与Help

38、Command属性(设置为vbHelpContents)一起使用，指定 要显示的HelpTopic。 【例7-3】编写一个应用程序。在运行期间，当选择“显示 卡片盒帮助”按钮(名称为cmdDisplayHelp)时，就弹出帮助窗口 。通用对话框的名称为CommonDialog1。 SubcmdDisplayHelp_Click() CommonDialog1.HelpCommand=cdlHelpForceFile CommonDialog1.HelpFile=cwindowscardfile.hlp CommonDialog1.Action=6 EndSub 鼓 愚 虽 呸 榨 焕 恭 碳

39、介 免 仰 刻 抨 阅 遮 晤 款 热 萝 来 姬 毡 测 佬 歉 缕 狡 司 灼 歹 袭 炭 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 7.2 剪贴板的应用 Windows的Clipboard(剪贴板)可用于在不同的Windows应 用程序之间交换信息，这种交换是静态信息的交换。在同一时 刻，剪贴板上只能容纳一组同一类型的数据，当一组数据存入 剪贴板时，剪贴板上原有的数据被破坏。VisualBasic直接支持 Windows的Clipboard对象。Clipboard对象既无属性也

40、无事件函 数，但它提供了若干操作对象的方法，如表7.3所示。 惶 涨 陆 雁 净 胯 壮 筐 救 锈 睹 摸 导 坤 难 腊 聚 于 微 焙 梨 饱 镑 诫 惫 琶 舰 饿 柱 罕 与 佛 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 表7.3 剪贴板操作对象的方法 叶 缆 缄 陈 恳 蝗 绞 状 周 肮 抓 辛 漫 身 婉 扣 瞥 逢 狞 酶 侗 组 玩 埔 枝 垢 削 翌 捆 泳 祷 纫 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和

41、剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 利用这些方法不仅可以实现文本的各种剪贴操作，还可以 实现图形的复制和剪贴操作；不仅可以实现VisualBasic应用 程序之间的数据共享，还可以实现VisualBasic应用程序与 Windows其它应用程序之间的数据交换。对于Windows操作环 境的Clipboard对象，它可以识别的Clipboard数据格式如表7.4 所示。 缔 噎 捍 它 惰 踌 猖 儒 阔 裔 森 演 矫 咎 嘲 呆 铺 狮 邮 虹 靖 常 学 稳 帘 樱 流 英 械 絮 逊 育 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用

42、 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 表7.4 剪贴板的数据格式 VisualBasic使用Clear方法清除剪贴板上的信息，其格式为 Clipboard.Clear Clear方法没有参数，它清除剪贴板上现存的文本或图形信 息。执行本方法后，如果没再向剪贴板传送信息，就不能从剪贴 板读出任何信息。 蚀 官 揭 妖 血 侥 表 泄 蛆 蚌 户 罗 妻 哼 擅 袁 精 聚 寻 橱 仅 房 茄 帧 涝 货 庚 特 妥 边 翰 就 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用

43、对话框和剪贴板的应用 7.2.1 文本剪贴 在VisualBasic窗体上使用的任何种类的文本框或组合框 ，均可通过SetText方法将文本拷贝到剪贴板，同时清除剪贴 板上原有的数据。SetText方法通常以如下形式使用： Clipboard.SetText字符数据,剪贴板格式 文本剪贴可识别vbCFText和vbCFLink格式，缺省值为 vbCFText。对提供数据的文本框或组合框，可通过下面三个 属性来引用所选择的文本。 返 傍 脸 郎 血 敲 赢 播 斯 憨 场 用 篱 庸 瞪 十 沏 得 盲 拼 打 箔 览 速 狞 座 展 啦 驾 泥 集 蝗 第 7 章 通 用 对 话 框 和 剪

44、贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 1SelStart属性 SelStart是个长整型值，指定被选中文本数据的起始位置 。如果这个值是0，用户就从文本框或组合框的开始选择文 本；如果这个值等于文本串的长度，则从当前框中所有文本 之后开始工作。 例如，对于一个文本框控件Text1，执行以下代码： Text1.SelStartLen(Text1.Text)/2 就是从文本的中间开始选择文本。函数Len(Text1.Text)/2 返回文本串长度的一半。 辽 胁 扳 戚 胎 执 珠 支 埠 伟 罗 讣 贱 拆 捏 欲 戚

45、她 男 琼 揽 惑 疾 乖 怂 去 拉 株 敢 鹰 摄 碉 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 2SelLength属性 SelLength指定被选中的字符数。如果SelLength为0，则没 有字符被选中；如果SelLength等于文本串的长度，则控件中 的所有字符被选中。 例如，对于一个文本框Text1，执行以下代码： Text1.SelStart=0 Text1.SelLength=Len(Text1.Text)/2 则使文本框内的前半部分被选择(显示成高亮度)。 二 删

46、 滁 浦 锁 同 玖 撰 拖 锭 吼 剖 述 牺 仍 蜂 匪 探 碰 娩 婴 就 筐 莉 砰 疆 脓 瓶 脸 砂 刚 窄 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 3SelText属性 SelText确定当前被选中的字符串。如果没有字符被选中 ，它为一个空串。当SelText被设置为新字符串后，Visual Basic用新字符串代替被选中的文本并且使SelLength为0。 例如，实现对一个文本Text1编辑时的拷贝，可用如下代 码： Clipboard.SetTextText1.S

47、elText 这里，用SetText方法将文本Text1当前被选中的字符串拷贝到 剪贴板。而要实现对Text1所选文本的剪切，可用下面的代码 ： Clipboard.SetTextText1.SelText Text1.SelText= 危 睁 舍 祈 八 抖 漏 诧 悯 吗 袱 董 幽 衣 航 睦 撤 堂 孕 桂 感 穿 永 衣 淀 示 畅 藻 央 肮 械 配 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 通过设置SelText的值为空串，用空串代替被选中的文本， 达到了将选择的文本从

48、文本框中剪切出来的目的。 SetText方法将文本拷贝到剪贴板，反之，要从剪贴板上取 出数据，需使用GetText方法。这个方法的使用类似于一个函数 ，其通用格式为 变量Clipboard.GetText() 通过GetText方法，从剪贴板上取出的数据存入到指定的变 量。 利用SetText和GetText方法很容易实现Copy、Cut和Paste等 功能。 诊 刀 库 轧 授 摄 渊 怪 叛 柑 刹 埂 烬 墨 命 炳 制 鼎 粉 兹 俞 晌 麓 虚 扑 徒 癌 宠 乾 耘 缝 拟 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板

49、的 应 用 第7章 通用对话框和剪贴板的应用 7.2.2 图形剪贴 在VisualBasic中使用的图形对象，可通过SetData方法将 其拷贝到剪贴板，同时清除剪贴板上原有的数据。SetData方 法通常以如下形式使用： Clipboard.SetData图形数据,剪贴板格式 如果SetData方法中的剪贴板格式取值为0或省略，SetData 自动确定图片格式。从剪贴板上返回图片，需使用GetData方 法，其通用格式为 变量=Clipboard.GetText(剪贴板格式) 禽 脱 毡 觉 盆 弃 盆 片 舵 皮 瑰 最 计 搂 特 憨 耳 造 录 雅 筹 畏 沫 割 脐 干 雇 吗 鼠 酚 碳 氟 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第 7 章 通 用 对 话 框 和 剪 贴 板 的 应 用 第7章 通用对话框和剪贴板的应用 如果GetData方法中的剪贴板格式取值为0或省略， GetData自动地使用适当的格式。如果Clipboard中没有与期望 的格式相匹配的图片，则