《教学课件第七章对话框和菜单》由会员分享，可在线阅读，更多相关《教学课件第七章对话框和菜单（24页珍藏版）》请在金锄头文库上搜索。
1、第七章第七章 对话框和菜单对话框和菜单本章要求本章要求: : 1. 1.了解用户自定义对话框；了解用户自定义对话框； 2. 2.通用对话框控件的功能；通用对话框控件的功能； 3. 3.掌握菜单设计的基本方法掌握菜单设计的基本方法 ；n “对话框对话框”可以被看作一种特殊的窗体，它的可以被看作一种特殊的窗体，它的大小一般不可改变，也没有大小一般不可改变，也没有“最小化最小化”和和“最大最大化化”按钮，它只有一个按钮，它只有一个“关闭关闭”按钮（有时还包按钮（有时还包含一个含一个“帮助帮助”按钮）。按钮）。n VB提供了三种解决方案：提供了三种解决方案：系统预定义的对话框（系统预定义的对话框（In
2、putBox和和MsgBox）用户自定义对话框用户自定义对话框通用对话框控件。通用对话框控件。一、概述：一、概述：二、二、用户自定义对话框用户自定义对话框 （一）由普通窗体创建（一）由普通窗体创建用户对话框用户对话框对对话话框框窗窗体体与与一一般般窗窗体体在在外外观观上上是是有有区区别别的的，需需要要通通过过设设置属性值来自定义窗体外观。置属性值来自定义窗体外观。1BorderStyle属性属性窗体的窗体的BorderStyle属性值设置为属性值设置为3（VbFixedDoubleialog） 2ControlBox属性属性属性值为属性值为True时窗体显示控制菜单框，为时窗体显示控制菜单框，
3、为False时不显示。时不显示。 （二）使用对话框模板窗体创建对话框（二）使用对话框模板窗体创建对话框n Visual Basic6.0系统提供了多种不同类的系统提供了多种不同类的“对话框对话框”模板窗模板窗体，通过体，通过“工程工程”菜单中的菜单中的“添加窗体添加窗体”命令，即可打开命令，即可打开“添加窗体添加窗体”对话框。对话框。用户可以选择的对用户可以选择的对话框有：话框有：“关于关于”对话框、对话框、对话框、对话框、登录对话框、日积登录对话框、日积月累、月累、ODBC登录、登录、选项对话框选项对话框6类类等。等。1显示自定义对话框显示自定义对话框可使用窗体对象的可使用窗体对象的Show
4、方法显示自定义对话框方法显示自定义对话框 （1 1）模式对话框）模式对话框 模模式式对对话话框框在在焦焦点点可可以以切切换换到到其其它它窗窗体体或或对对话话框框之之前前要要求用户必须作出响应以关闭对话框。求用户必须作出响应以关闭对话框。其显示方法为：其显示方法为：窗体名窗体名. Show vbModal. Show vbModal（其中（其中vbModalvbModal是系统常数，值为是系统常数，值为1 1）（2 2）无模式对话框）无模式对话框 无模式对话框的焦点可以自由切换到其它窗体或对话框，无模式对话框的焦点可以自由切换到其它窗体或对话框，而无需用户关闭当前对话框，其显示方法为：而无需用户
5、关闭当前对话框，其显示方法为：窗体名窗体名. Show. Show2关闭自定义对话框关闭自定义对话框可可使使用用Hide方方法法或或UnLoad语语句句来来关关闭闭自自定定义义对对话话框框，其其格格式为：式为：Me.Hide 或或 .HideUnLoad 例例: 右图是一个使用对右图是一个使用对话框模板的登录对话框话框模板的登录对话框（二）使用对话框模板窗体创建对话框（二）使用对话框模板窗体创建对话框三、三、通用对话框通用对话框(CommonDialog)(CommonDialog)n 通用对话框添加到工具箱通用对话框添加到工具箱（一）通用对话框的基本属性和方法（一）通用对话框的基本属性和方法
6、n 通用对话框可以提供通用对话框可以提供6种种形式的对话框，通过设置形式的对话框，通过设置Action属性属性值或调用值或调用Show方法方法来建立不同类型的对话框。如下表：来建立不同类型的对话框。如下表：工程工程/部部件件 选定部选定部件标签件标签选定选定Microsoft CommDialog Control 6.0确定确定1.1. 属性属性ActionAction属性属性：数值型，决定打开何种类型的对话框（见上表）：数值型，决定打开何种类型的对话框（见上表）DialogTiltleDialogTiltle属性属性：对通用话框标题。：对通用话框标题。CancelErrorCancelErr
7、or属性属性：逻辑型值，表示用户在与对话框进行信息：逻辑型值，表示用户在与对话框进行信息交换时，按下交换时，按下“取消取消”按钮时是否产生出错信息。按钮时是否产生出错信息。TrueTrue：选择选择“取消取消”按钮，出现错误警告；按钮，出现错误警告；FalseFalse( (缺省缺省) )：选择选择“取消取消”按钮，没有错误警告。按钮，没有错误警告。2. 2. 通用对话框的通用对话框的 Show Show 方法（见上表）方法（见上表）（一）通用对话框的基本属性和方法（一）通用对话框的基本属性和方法属性属性 1. 1. FileName(FileName(文件全名）属性文件全名）属性：在程序中可
8、用该属性值设置或返回用户：在程序中可用该属性值设置或返回用户所选定的文件名（包含路径）。所选定的文件名（包含路径）。 2. 2. FileTitleFileTitle（文件名）属性（文件名）属性：设计时无效，在程序中为只读，返回用：设计时无效，在程序中为只读，返回用户所选定的文件名（不包含路径）。户所选定的文件名（不包含路径）。（二）（二） “ “打开打开”/“”/“另存为另存为”对话框对话框DialogTiltleFileName InitDirFilterFilterIndexDefaultExt 3. Filter（过滤器）属性（过滤器）属性：确定文件列表框中所显示文件的类型，该属性的：
9、确定文件列表框中所显示文件的类型，该属性的值显示在值显示在“文件类型文件类型”列表框中。如设置其值为：列表框中。如设置其值为：Documents(*.DOC)|*.DOC|Text Files(*.TXT)|*.txt|All Files|(*.*)则在则在“文件类型文件类型”列表框显示下列三种文件类型以供用户选择列表框显示下列三种文件类型以供用户选择 Documents(*.DOC) 扩展名为扩展名为DOC的的Word文件文件 Text Files(*.TXT) 扩展名为扩展名为TXT的文本文件的文本文件 All Files|(*.*) 所有文件所有文件（二）（二） “ “打开打开”/“”/
10、“另存为另存为”对话框对话框4. FilterIndex（过滤器索引）属性（过滤器索引）属性：为整型值，表示用户在文件类型列表：为整型值，表示用户在文件类型列表框选定了第几组文件类型。框选定了第几组文件类型。5. InitDir（初始化路径）属性（初始化路径）属性：该属性用来指定打开对话：该属性用来指定打开对话框中的初始目录，若不设置，系统则默认为框中的初始目录，若不设置，系统则默认为“C:My Documents”。6. DefaultExt属性属性：字符型，用于确定保存文件的缺省扩：字符型，用于确定保存文件的缺省扩展名。展名。7. CancelError属属性性：逻逻辑辑型型值值，表表示示
11、用用户户在在与与对对话话框框进进行行信信息息交交换换时时，按按下下“取取消消”按按钮钮时时是是否否产产生生出出错错信信息息。 （二）（二） “ “打开打开”/“”/“另存为另存为”对话框对话框重要属性重要属性Color：用来返回或：用来返回或设置选定的颜色。设置选定的颜色。 （三）（三）“颜色颜色”对话框对话框颜色对话框是当颜色对话框是当Action值为值为3时的通用对话框，如下图。时的通用对话框，如下图。字体对话框是字体对话框是Action为为4时的通用对话框，如下图所示，时的通用对话框，如下图所示，提供用户选择字体、字号及字体样式等。提供用户选择字体、字号及字体样式等。 FontName
12、FontBold、FontItalic FontSizeFontStrikethruFontUnderline Color（四）（四） “ “字体字体”对话框对话框 字体对话框重字体对话框重要的属性见右要的属性见右图。图。属性：属性：Flags属性：属性：设置所显示的字体类型设置所显示的字体类型。 注意注意 在显示在显示“字体字体”对话框前，必须先将对话框前，必须先将 Flags 属性设属性设置为置为 cdlCFScreenFonts，cdlCFPrinterFonts，或或cdcdlCFBoth。否则，会发生字体不存在的错误。否则，会发生字体不存在的错误。（四）（四） “ “字体字体”对话框
13、对话框 Flages属性应取下列值：属性应取下列值：cdlCFScreenFonts&H1 屏幕字体屏幕字体 cdlCFPrinterFonts&H2 打印机字体打印机字体 cdlCFBoth&H3 打印机字体和屏幕字体打印机字体和屏幕字体 cdlCFEffects &H100显示删除线和下划线检查显示删除线和下划线检查框以及颜色组合框框以及颜色组合框四、菜单设计四、菜单设计（一）（一） 概述概述 菜菜单单是是图图形形化化界界面面一一个个必必不不可可少少的的组组成成元元素素，通通过过菜菜单单对对各各种种命命令令按按功功能能进进行行分分组组，使使用用户户能够更加方便、直观地访问这些命令。能够更加
14、方便、直观地访问这些命令。Windows环环境境下下的的应应用用程程序序一一般般为为用用户户提提供供三三种菜单：种菜单：窗体控制菜单窗体控制菜单下拉式菜单下拉式菜单弹出式（快捷）菜单弹出式（快捷）菜单 启动菜单编辑器：启动菜单编辑器：有三种方法有三种方法 1 单击工具栏菜单图标单击工具栏菜单图标 2 工具工具/菜单编辑器菜单编辑器 (CTRL+E) 3 窗体上快捷菜单窗体上快捷菜单 菜单编辑器菜单编辑器 菜单编辑器操作界面如右所菜单编辑器操作界面如右所示。示。（二）（二） 菜单编辑器菜单编辑器 菜单的主要属性：菜单的主要属性：1. 标题标题(Caption)：在窗口上显示，例如：输入：在窗口上
15、显示，例如：输入&File，显示，显示为：为： File，热键：，热键：Alt+F 2. 名称名称(Name)：菜单项的名称，分界符也应有名称。：菜单项的名称，分界符也应有名称。3. 快捷键快捷键(Shortcut)：功能键或组合键：功能键或组合键4. 下一个下一个(Next)：设置下一个菜单项。：设置下一个菜单项。5. 和和按钮按钮：“” 下一级菜单项；下一级菜单项；“”上一级菜单上一级菜单项。项。6. 插入插入(Insert)按钮按钮：插入菜单项：插入菜单项四、菜单设计四、菜单设计7. 删除删除(Delete)按钮按钮：删除菜单项：删除菜单项8. 和和按钮按钮：改变菜单项位置。改变菜单项位
16、置。9. 复选复选(Checked)检查框检查框：菜单项为选定项。：菜单项为选定项。10. 有效有效(Enabled)检查框检查框：True：菜单项可选；：菜单项可选；False：不可选。不可选。11. 显示窗口列表显示窗口列表(Window List)检查框检查框：决定是否显示所有打开的子窗体标题。决定是否显示所有打开的子窗体标题。对对MDI窗体和窗体和MDI子窗体有效，对普通窗体无效。子窗体有效，对普通窗体无效。四、菜单设计四、菜单设计1设计下拉菜单设计下拉菜单2设计子菜单或改变子菜单级别设计子菜单或改变子菜单级别 3为菜单项分组，菜单名用减号为菜单项分组，菜单名用减号“-”。4为菜单项指
17、定访问键和快捷键与命令按钮设置访问键为菜单项指定访问键和快捷键与命令按钮设置访问键相同。相同。5为菜单项加上复选标记为菜单项加上复选标记菜单名菜单名.Checked=Not 菜单名菜单名.Checked6禁止使用菜单项，在程序代码中可以通过程序代码：禁止使用菜单项，在程序代码中可以通过程序代码： 菜单名菜单名.Enabled=False7菜单项的增减菜单项的增减 菜单设计的几项操作：菜单设计的几项操作：四、菜单设计四、菜单设计（三）弹出式（快捷）菜单（三）弹出式（快捷）菜单n 用用VB菜单编辑器设计，菜单编辑器设计， Visible设置为设置为Fasle。 用用PopupMenu方法弹出方法弹出 对象对象.PopupMenu 菜单名菜单名 ,标志标志, x, y 标志：标志：0：菜单项只对鼠标左键有反应。：菜单项只对鼠标左键有反应。2：菜单项对鼠标左键和右键都有反应。：菜单项对鼠标左键和右键都有反应。nPopupMenu方法只能用在方法只能用在MouseDown或或MouseUp事件过程。事件过程。n 弹出式菜单是独立于窗体菜单栏而显示在窗体内浮动菜弹出式菜单是独立于窗体菜单栏而显示在窗体内浮动菜单，其显示位置取决于单击鼠标时指针位置。单，其显示位置取决于单击鼠标时指针位置。
