对话框与菜单程序设计(I)

《对话框与菜单程序设计(I)》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第7章对话框与菜单程序设计“对话框”可以被看作一种特殊的窗体，它的大小一般不可改变，也没有“最小化”和“最大化”按钮，它只有一个“关闭”按钮（有时还包含一个“帮助”按钮）。VB提供了三种解决方案：系统预定义的对话框（InputBox和MsgBox）用户自定义对话框通用对话框控件。概述：7.1自定义对话框7.1.1由普通窗体创建自定义对话框实际上，创建一个自定义对话框就是创建一个窗体。对话框窗体与一般窗体在外观上是有区别的，需要通过设置以下属性值来自定义窗体外观。窗体的BorderStyle属性值设置为3（VbFixedDoubleialog）

2、此时窗体包含控制菜单框和标题栏，不包含“最大化”和“最小化”按钮，不能改变窗体尺寸。1．BorderStyle属性2．ControlBox属性属性值为True时窗体显示控制菜单框，为False时不显示。7.1.2使用对话框模板窗体创建对话框VisualBasic6.0系统提供了多种不同类的“对话框”模板窗体，通过“工程”菜单中的“添加窗体”命令，即可打开“添加窗体”对话框。用户可以选择的对话框有“关于”对话框、对话框、登录对话框、日积月累、ODBC登录、选项对话框6类等，1．显示自定义对话框可使用窗体对象的Show方法显示自定义对话框（1）模

3、式对话框模式对话框在焦点可以切换到其它窗体或对话框之前要求用户必须作出响应以关闭对话框，如单击“确定”按钮、“取消”按钮或者直接单击“关闭”按钮。其显示方法为：〈窗体名〉.ShowvbModal（其中vbModal是系统常数，值为1）（2）无模式对话框无模式对话框的焦点可以自由切换到其它窗体或对话框，而无需用户关闭当前对话框，其显示方法为：〈窗体名〉.Show。2．关闭自定义对话框可使用Hide方法或UnLoad语句来关闭自定义对话框，其格式为：Me.Hide或<窗体名>.HideUnLoad<窗体名>。例7.1设计一个如图7-1所示的更改密

4、码对话框，要求只有通过单击“确定”、“取消”或“关闭”按钮才能切换到其它窗体或对话框。7.2通用对话框工程/部件选定部件标签选定MicrosoftCommDialogControl6.0通用对话框添加到工具箱确定一、通用对话框的基本属性和方法通用对话框可以提供6种形式的对话框，通过设置Action属性值或调用Show方法来建立不同类型的对话框。如下表：1属性Action属性：数值型，决定打开何种类型的对话框（见上表）DialogTiltle属性：对通用话框标题。CancelError属性：逻辑型值，表示用户在与对话框进行信息交换时，按下“取消

5、”按钮时是否产生出错信息。True：选择“取消”按钮，出现错误警告；Err置为32755(cdlCancel)。False(缺省)：选择“取消”按钮，没有错误警告。2通用对话框的方法除了Acton属性，VB还提供了一组方法用来打开不同类型对话框ShowOpenShowSaveShowColorShowFontShowPrinterShowHelp在设计对话框时，可以通过属性窗口设置通用对话框的属性设置控件属性，通常使用通用对话框的属性页设置相关属性。用鼠标右键单击窗体上的CommonDialog控件图标，在弹出的快捷菜单中选择“属性”选项，或

6、在“属性”窗口中选择“自定义”，再单击右侧的“...”按钮，就可以打开“属性页”对话框，如图7-5所示。在“属性页”对话框中有5个选项卡，用于对不同类型的对话框进行属性设置。例如，要设置颜色对话框的属性，需要选定“颜色”选项卡。7.2.1“打开”/“另存为”对话框属性1FileName(文件名称）属性：在程序中可用该属性值设置或返回用户所选定的文件名（包含路径）2FileTitle（文件标题）属性：在程序中可用该属性值设置或返回用户所选定的文件名（不包含路径）DialogTiltleFileNameInitDirFilterFilterInd

7、exDefaultExt3Filter（过滤器）属性：确定文件列表框中所显示文件的类型，该属性的值显示在“文件类型”列表框中。如设置其值为：Cocuments(*.DOC)

8、*.DOC

9、TextFiles(*.TXT)

10、*.txt

11、AllFiles

12、(*.*)则在“文件类型”列表框显示下列三种文件类型以供用户选择Cocuments(*.DOC)扩展名为DOC的Word文件TextFiles(*.TXT)扩展名为TXT的文本文件AllFiles

13、(*.*)所有文件4FilterIndex（过滤器索引）属性：为整型值，表示用户在文件类型列表框选定

14、了第几组文件类型。5InitDir（初始化路径）属性：该属性用来指定打开对话框中的初始目录，若不设置，系统则默认为“C:MyDocuments”。6．Defau