第讲 vb界面设计.ppt

本章教学内容 6.1 通用对话框 6.2 菜单 6.3 多重窗体 本讲教学内容 介绍VB的通用对话框CommonDialog控件、菜单编辑器。 6.1 通用对话框(CommonDialog) 一、 通用对话框概述 1.在图形用户界面中，对话框是用户与程序进行交互的主要途径。VB的通用对话框CommonDialog控件就是提供了基于Windows的标准对话框。 2. CommonDialog控件不是VB的内部控件，它是ActiveX控件。使用时选择“工程”菜单的“部件”命令，来打开“部件”对话框。在其中选择“Microsoft Common Dialog Control 6.0”选项，将CommonDialog控件添加到工具箱。 　 3. VB通用对话框可以打开的Windows标准对话框界面有：“打开”对话框，“另存为”对话框，“颜色”对话框，“字体” 对话框，“打印” 对话框和“帮助” 对话框。 　　但VB的这些对话框仅用于返回信息，不能真正实现文件的打开、文件的另存为、颜色设置、字体设置、打印等操作。若要实现这些操作，一般都要通过编程来解决。 4. 在使用通用对话框控件打开标准对话框时，必须对它的一个Action属性进行设置或调用该控件的Show方法，那样才能真正地打开标准对话框中某一种类型的对话框。 5. 在VB通用对话框的“取消”按钮，单击时，表示用户取消当前操作。在取消当前操作时，CancelError属性可以设置按“取消”按钮时是否产生错误信息。 当CancelError属性为False时，单击该按钮不产生错误信息； 当CancelError属性为True时，单击该按钮时通用对话框会自动将错误对象Err.Number设置为32755（cdlCancel），供程序判断。 二、“打开”对话框 　　当在程序中把Action属性值设置为1时或调用了ShowOpen方法，就可以打开通用对话框的“打开”对话框。在“打开”对话框中，可以翻阅计算机的整个目录结构，查找所需要的文件。但要真正实现文件的打开需要设置几个必要的属性。 　 2. 常用属性 (1) FileName(文件名属性) 　该属性值为字符串，用于设置和得到用户所选的文件名（包括路径名）。 (2) FileTitle(文件名属性) 　该属性设计时无效，在程序中为只读，用于返回文件名。它与FileName属性不同，不包含路径 (3) InitDir(初始化路径属性) 　该属性用于指定初始的目录，或返回用户选择的文件目录。如果此属性没有被指定，则使用当前目录。 (4) Filter(过滤器属性) 　该属性设置对话框的文件类型列表框中的过滤器。通过设定过滤器指定在文件类型列表框中显示的文件类型。 　其格式为：文件说明｜文件类型 例如：如果文件类型列表框中要显示Word文档、文本文件和所有文件三种文件类型。 其格式为： 　Word文档｜*.Doc｜文本文件｜*.Txt｜所有文件｜*.* (5) FilterIndex(过滤器索引属性) 　当指定一个以上的过滤器时，需使用该属性确定哪一个作为默认过滤器显示，默认值为1。 【例6－1】设计一个应用程序，界面如下图1所示。本例中要求对“打开文件”按钮进行编程。该程序功能为：在打开对话框中选择一个文本文件，将该文本文件的路径和名称显示在文本框中。 设计步骤： ①新建一个工程，设置窗体的Caption属性为“通用对话框学习”。 ②在窗体上添加4个命令按钮、1个文本框和一个通用对话框。按图6.2所示设置文本框和命令按钮的属性，并将命令按钮的Name属性依次改为“CmdOpen”、“CmdColor”、“CmdFont”和“CmdHelp”。　 ③编写“打开文件”按钮的事件过程代码。 Private Sub CmdOpen_Click() CommonDialog1.InitDir = C:\WinNt CommonDialog1.Filter = 文本文件*.txt|*.txt CommonDialog1.Action = 1 Text1.Text = CommonDialog1.FileName End Sub ④运行该应用程序，单击“文件打开”命令按钮，出现如图2所示“打开”对话框，选择一个文本文件名，按“确定”按钮出现如图3所示窗体。 三、“另存为”对话框 1. 特点 　　当在程序中把Action属性值设置为2