第9章文件管理 §91公共对话框 §92数据文件 §93文件系统控件 §94文件系统对象
第9章 文件管理 §9.1 公共对话框 §9.2 数据文件 §9.3 文件系统控件 §9.4 文件系统对象 *
89.1公共对话框 对话框技术在软件中应用的非常广泛,第3章中介绍的 消息框 MsgBox和输入框 InputBox是两种最为简单的对话框。 像“打开”、“另存为”、“颜色”、“字体”、“打 印”、“帮助”等对话框在各类软件中使用频繁。为此, VB中专门提供了一个公用对话框控件,用于实现以上功能 添加“公共对话框”控件 二、使用“公共对话框 公用对话框的应用举例
§9.1 公共对话框 对话框技术在软件中应用的非常广泛，第3章中介绍的 消息框MsgBox和输入框InputBox是两种最为简单的对话框。 像“打开” 、 “另存为” 、 “颜色” 、 “字体” 、 “打 印” 、 “帮助”等对话框在各类软件中使用频繁。为此， VB中专门提供了一个公用对话框控件，用于实现以上功能。 一、添加“公共对话框”控件 二、使用“公共对话框” 三、公用对话框的应用举例
、添加“共对话”控 件 公用对话框是一个外部控件,不在标准工具箱中,使用时 需要设计者自己从部件中添加。具体方法为: 1.打开“部件”对话框 General ft Activex plugin A Microsoft ADO Data Control 6.0(OLEDB 右击“工具箱”,选择“部 MIcrosoft Agent Control 2.0 D Microsoft Calendar Control 9.0 Microsoft Chart Control 6.0 (OLEDB) a目 “工程”主菜单选项中选择 ft Comm Control 6.0 ommon Di alog Control 6.0 (S 瓶 crosoft Data Bound List Control60目目ys O Microsoft Dat aCrid Control 6.0 (OLEDB) Microsoft DataList Controls 6.0 (OLED 递口口 D Microsoft DirectAnimation Media Contro 自的 Microsoft Common Dialog Control 6. 0 (SP3) 定位:C: INDOWS\System32 COMDLG32.Cx 网智〓 选择“ MicroSoft Common Dial Ih
一、添加“公共对话框”控 件 公用对话框是一个外部控件，不在标准工具箱中，使用时 需要设计者自己从部件中添加。具体方法为： 1. 打开“部件”对话框 ➢ 右击“工具箱” ，选择“部件” ➢ “工程”主菜单选项中选择“部件” 2. 选择“MicroSoft Common Dialog Control 6.0
二、使用“公共对话框”+ “公用对话框”控件在程序运行时是一个不可见的控件。 在程序代码中要用该控件的有关方法让其显示出指定格式的对 话框。其方法有6种: 方 法 所显示的对话框 ShowOpen 显示“打开”对话框 ShowSave 显示“另存为”对话框 ShowColor 显示“颜色”对话框 ShowFont 显示“字体”对话框 ShowPrinter 显示“打印”对话框 ShowHelp 激活 Windows帮助引擎
二、使用“公共对话框” “公用对话框”控件在程序运行时是一个不可见的控件。 在程序代码中要用该控件的有关方法让其显示出指定格式的对 话框。其方法有6种： 方 法 所显示的对话框 ShowOpen 显示“打开”对话框 ShowSave 显示“另存为”对话框 ShowColor 显示“颜色”对话框 ShowFont 显示“字体”对话框 ShowPrinter 显示“打印”对话框 ShowHelp 激活Windows帮助引擎
1.使用“开”对 +框 CommonDialogl. ShowOpen 丁开 ? 主要 查找范围①):|素数 回-图 ①Fi1 我最近的文档工程1 攴名称。 回工程1 桌 ②Dia 我的文档 我的电脑 ③In 文件名Q 开 ④Fi 文件类型〔) 取消 厂以只读方式打开) k txt
1．使用“打开”对话 框 主要属性： ①FileName属性：设置默认文件名或返回所选文件的路径及名称。 Name=CommonDialog1.FileName ②DialogTitle属性：设置或返回对话框的标题。 CommonDialog1. DialogTitle＝”请选择文件” ③InitDir属性：设置或返回对话框访问的初始文件目录。 CommonDialog1. InitDir＝”D:\ABC” ④Filter属性：设置文件的过滤条件。 CommonDialog1.Filter = " (*.*)|*.*| (*.txt)|*.txt" CommonDialog1.ShowOpen