vb对话框与菜单程序设计.pptx
第8 8章 对话框与菜单程序设计 “对话框”可以被看作一种特殊的窗体，它的大小一般不可改变，也没有“最小化”和“最大化”按钮，它只有一个“关闭”按钮（有时还包含一个“帮助”按钮）。VB提供了三种解决方案：系统预定义的对话框（InputBox和MsgBox）用户自定义对话框通用对话框控件。概述：第1页/共30页8.1 自定义对话框8.1.1 由普通窗体创建由普通窗体创建自定义对话框自定义对话框 对话框窗体与一般窗体在外观上是有区别的，需要通过设置以下属性值来自定义窗体外观。窗体的BorderStyle属性值设置为3（VbFixedDoubleialog）1BorderStyle属性 2ControlBox属性属性值为True时窗体显示控制菜单框，为False时不显示。第2页/共30页1显示自定义对话框显示自定义对话框（1）模式对话框 模式对话框在焦点可以切换到其它窗体或对话框之前要求用户必须作出响应以关闭对话框，如单击“确定”按钮、“取消”按钮或者直接单击“关闭”按钮。其显示方法为：窗体名.Show vbModal （其中vbModal是系统常数，值为1）（2）无模式对话框 无模式对话框的焦点可以自由切换到其它窗体或对话框，而无需用户关闭当前对话框，其显示方法为：窗体名.Show。8.1 自定义对话框第3页/共30页2关闭自定义对话框关闭自定义对话框 可使用Hide方法或UnLoad语句来关闭自定义对话框，其格式为：Me.Hide 或 .Hide UnLoad。例如，图8-1是用户使用窗体设计的一个“设置服务器”的自定义对话框。例6-16-1 8.1 自定义对话框第4页/共30页8.2 通用对话框工程/部件 选定部件标签选定Microsoft CommDialog Control 6.0 通用对话框添加到工具箱确定通用对话框图标第5页/共30页8.2 通用对话框8.2.1 打开通用对话框 通用对话框可以提供6种形式的对话框，通过设置Action属性值或调用Show方法来建立不同类型的对话框。如下表：表8.1 打开通用对话框的方法与Action属性设置类型Action属性方法无对话框0“打开”对话框1ShowOpen“另存为”对话框2ShowSave“颜色”对话框3ShowColor“字体”对话框4ShowFont“打印”对话框5ShowPrinter“帮助”对话框6ShowHelp第6页/共30页8.2.2 通用对话框的属性页通用对话框的属性页 DialogTiltleFileName InitDirFilterFilterIndexDefaultExt 在设计时，可能通过属性窗口设置通用对话框的属性设置控件属性，通常使用通用对话框的属性页设置相关属性。8.2 通用对话框第7页/共30页属性 1.FileName(文件名称）属性：在程序中可用该属性值设置或返回用户所选定的文件名（包含路径）2.FileTitle（文件标题）属性：在程序中可用该属性值设置或返回用户所选定的文件名（不包含路径）8.2.3“打开”/“另存为”对话框 使用通用对话框控件的ShowOpen方法，或将Action属性赋值为1，可以在运行时显示“打开”对话框。使用通用对话框控件的ShowSave方法，或将Action属性赋值为2，可以在运行时显示“另存为”对话框。8.2 通用对话框第8页/共30页 3.Filter（过滤器）属性：确定文件列表框中所显示文件的类型，该属性的值显示在“文件类型”列表框中。如设置其值为：Documents(*.DOC)|*.DOC|Text Files(*.TXT)|*.txt|All Files|(*.*)则在“文件类型”列表框显示下列三种文件类型以供用户选择 Documents(*.DOC)扩展名为DOC的Word文件 Text Files(*.TXT)扩展名为TXT的文本文件 All Files|(*.*)所有文件8.2 通用对话框第9页/共30页 4.FilterIndex（过滤器索引）属性：为整型值，表示用户在文件类型列表框选定了第几组文件类型。5.InitDir（初始化路径）属性：该属性用来指定打开对话框中的初始目录，若不设置，系统则默认为“C:My Documents”。6DefaultExt属性：字符型，用于确定保存文件的缺省扩展名。7CancelError属性：逻辑型值，表示用户在与对话框进行信息交换时，按下“取消”按钮时是否产生出错信息。8.2 通用对话框第10页/共30页 例例8-1 设设计计一一个个简简单单的的图图片片浏浏览览程程序序，可可以以加加载载显显示示图图片片，也也可可保保存存图图片片。例例6-2 8.2 通用对话框第11页/共30页8.2.4“颜色颜色”对话框对话框 颜色对话框是当Action值为3时的通用对话框，如右图。重要属性 Color：用来返回或设置选定的颜色。例8.2 设计设计一个简单的画板程序，可以根据选择的线型的粗细、颜色，用鼠标的左键模拟笔在绘图区随意绘图，程序运行效果如图8-14所示。设计题 8.2 通用对话框第12页/共30页8.2.5“字体”对话框 字体对话框是Action为4时的通用对话框，如下图所示，提供用户选择字体、字号及字体样式等。字体对话框重要的属性有：Color,FontName,FontSize,FontBold FontItalic,FontStrikethru,FontUnderline,Max等.FontName FontBold、FontItalicFontSizeFontStrikethruFontUnderline ColorMin、Max8.2 通用对话框第13页/共30页Flags属性：属性：设置所显示的字体类型，设置所显示的字体类型，数据类型为数据类型为Long。注意注意 在显示在显示“字体字体”对话框前，必须先将对话框前，必须先将 Flags 属性属性设置为设置为 cdlCFScreenFonts，cdlCFPrinterFonts，或，或cdcdlCFBoth。否则，会发生字体不存在的错误。否则，会发生字体不存在的错误。Flages属性应取下列值（见属性应取下列值（见P270.表表8-2)：cdlCFScreenFonts&H1屏幕字体屏幕字体 cdlCFPrinterFonts&H2打印机字体打印机字体 cdlCFBoth&H3打印机字体和屏幕字体。打印机字体和屏幕字体。cdlCFEffects&H100 显示删除线和下划线检查框以及颜色组合框显示删除线和下划线检查框以及颜色组合框8.2 通用对话框第14页/共30页 例例8-3 “字体”对话框示例。在文本框上显示文字，利用“字体”对话框来设置所显示文字的字体、字型、大小、颜色等。程序运行时，单击“选择字体”按钮，打开的“字体”对话框，在打开的“字体”对话框中选择设置，文本框中所显示设置后的效果，如图8-17所示。例6-48.2 通用对话框第15页/共30页8.2.6 其他对话框其他对话框 通用对话框除以上介绍的4种通用对话框外，还提供了“打印”和“帮助”对话框。“打印”对话框可以设置打印输出的方法，如打印范围、打印份数以及当前安装的打印机信息等。“帮助”对话框则通过使用ShowHelp方法调用Windows系统的帮助引擎。这两种对话框的使用方法与前面介绍的类似，读者可以参考VB有关资料，得到进一步的说明。8.2 通用对话框第16页/共30页8.3 菜单设计菜单设计8.3.1 菜单的类型 Windows环境下的应用程序一般为用户提供三种菜单：窗体控制菜单、下拉菜单与快捷菜单。第17页/共30页启动菜单编辑器：有三种方法 1 单击工具栏菜单图标 2 工具/菜单编辑器 (CTRL+E)3 窗体上快捷菜单 菜单编辑器 菜单编辑器操作界面如右所示。8.3.2 菜单编辑器 8.3 菜单设计菜单设计第18页/共30页菜单编辑器的使用技巧1.标题(Caption)：2.名称(Name)：3.快捷键(Shortcut)：4.下一个(Next)：5.和按钮6.插入(Insert)按钮：7.删除(Delete)按钮：8 和按钮：8.复选(Checked)检查框：8.有效(Enabled)检查框：11.显示窗口列表(Window List)检查框：根据设计要求，依次输入或选择所面项目，即可完成。例：第19页/共30页 菜单的主要属性1.标题(Caption)：在窗口上显示，例如：输入&File，显示为：File，热键：Alt+F 2.名称(Name)：菜单项的名称，分界符也应有名称。3.快捷键(Shortcut)：下拉列表框4 下一个(Next)：设置下一个菜单项。5.和按钮：“”下一级菜单项；“”上一级菜单项。6.插入(Insert)按钮：插入菜单项7.删除(Delete)按钮：删除菜单项8.和按钮：改变菜单项位置。9.复选(Checked)检查框：菜单项为选定项。10.有效(Enabled)检查框：True：菜单项可选；False：不可选。11.显示窗口列表(Window List)检查框：菜单编辑器的使用技巧菜单编辑器的使用技巧第20页/共30页1设计下拉菜单2设计子菜单或改变子菜单级别 3为菜单项分组 菜单名用减号“-”4为菜单项指定访问键和快捷键 与命令按钮设置访问键相同。5为菜单项加上复选标记6禁止使用菜单项 在程序代码中可以通过程序代码：菜单名.Enabled=False7菜单项的增减 菜单设计的几项操作：菜单编辑器的使用技巧第21页/共30页8.3.3 下拉式菜单下拉式菜单 8.3 菜单设计菜单设计 在下拉式菜单中，一般只需要对下拉菜单的最低级菜单项编写单击事件代码，如果对一个有下级菜单的菜单项编写了单击事件，则在执行下一级菜单时，该菜单程序将先执行。在下拉式菜单中，一般有一个主菜单，称为菜单栏。每个菜单栏包括一个或多个选择项，称为菜单标题。例例8-4 建立下拉式菜单，通过菜单来控制文本框中的文字的字体、颜色等。程序的运行情况如下图7-20所示：演示菜单控件（对象）只有一个事件单击事件（Click()）第22页/共30页8.3.4 弹出式菜单弹出式菜单 弹出式菜单是独立于菜单栏显示在窗体或指定控件上的浮动菜单，菜单的显示位置与鼠标当前位置有关。实现步骤如下：1.在菜单编辑器中建立该菜单。2.设置其顶层菜单项（主菜单项）的Visible属性为False（不可见）。3.在窗体或控件的MouseUp或MouseDown事件中调用PopupMenu方法显示该菜单。PopupMenu的使用方法为：PopupMenu,flags,x,y,Boldcommand8.3 菜单设计菜单设计第23页/共30页其中：关键字“PopupMenu”可以前置窗体名称，但不可前置其他控件名称。是指通过菜单编辑器设计的、至少有一个子菜单项的菜单名称（Name）。Flags参数为常数，用来定义显示位置与行为,其取值见表8.4（Pg.212)。例子8.3 菜单设计菜单设计第24页/共30页 例8-5 设计一个简单的“记事本”应用程序，有“文件”、“编辑”、“格式”、“退出”四个一级菜单项。其中：文件菜单项包括“打开”、“另存为”、“退出”子菜单项。编辑菜单项包括“复制”、“剪切”和“粘贴”3个子菜单项。格式菜单项包括“字体”、“对齐方式”2个菜单项，“对齐方式”菜单项又包含“左对齐”、“右对齐”、“居中”3个3级子菜单项。8.4 应用举例应用举例第25页/共30页8.4 应用举例应用举例第26页/共30页本章小结 程序在运行过程中，一般总是需要输入数据、输出信息，对话框为程序和用户的交互提供了有效的途径。对话框是一种特殊的窗体，它的大小一般不可改变。用户可以利用窗体及一些标准控件自己定义对话框，以满足各种需要。对于打开、保存、字体设置、颜色设置、打印、帮助这样的常规操作，可利用系统提供的CommonDialog控件进行操作，通用对话框在程序中使用的Show方法与Action属性来显示相应的对话框，但这些对话框仅用于返回信息，不能真正实现文件打开、保存、字体设置、颜色设置、打印等操作，要实现这些操作，必须通过编程解决。第27页/共30页本章小结 在WindowsWindows环境中，几乎所有的应用软件都提供菜单，并通过菜单来实现各种操作。VBVB中，在“菜单编辑器”中能够非常方便、高效、直观地建立菜单。菜单设计好以后，需要为有关菜单项编写事件过程，在VBVB中，每个菜单项就是一个控件，菜单控件能够识别的唯一事件是ClickClick。为了简化程序设计，通常将同一层菜单的几个或全部菜单项设计成菜单数组，如果使用菜单数组，则在菜单编辑器中输入菜单时必须设置索引值。第28页/共30页本章作业 P200 例7-1P202 例7-2P205 例7-3（1）窗体的左边有一个框架Frame1，标题为“选择时间”；框架内有一组单选钮控件数组，从上到下为Option1(0)、Option1(1)和Option1(2)，标题分别为“1分钟”、“5分钟”和“10分钟，默认选择为1分钟。（2）单击“开始计时”按钮(Command1)后，程序根据选择的时间开始倒计时，同时命令按钮变为不可使用，框架也不可使用。（3）但当剩余时间到0分0秒时，改为显示“时间到！”,同时命令按钮、框架变为可用。（4）定时器Timer1的时间间隔为1秒。第29页/共30页谢谢您的观看！第30页/共30页
