第二十讲菜单,VisualBasic程序设计教程,内蒙古科技大学工程训练中心韩艳,工程训练中心,,9.1菜单,菜单的种类：下拉式菜单、弹出式菜单9.1下拉式菜单1、下拉式菜单结构结构：主菜单栏、各级子菜单；子菜单又分为：菜单命令或选项、子菜单标题和分隔条；菜单命令或选项：可以直接执行；子菜单标题：可以再拉出一级菜单；分隔条：用于对于子菜单项进行分组；2、设计下拉式菜单进入菜单编辑器：⑴执行”工具“菜单的”菜单编辑器“按钮；⑵直接执行热键（快捷键）Ctrl+E；⑶单击”工具栏“上的”菜单编辑器”；⑷在要建立菜单的窗体上单击鼠标右键，打开快捷菜单，执行“菜单编辑器”；,工程训练中心,,9.1菜单,9.1下拉式菜单“菜单编辑器”属性区：,工程训练中心,,9.1菜单,9.1下拉式菜单“菜单编辑器”属性区：说明：⑴“名称”属性是菜单项的必要属性，必须给定；⑵在输入菜单标题时在某个字母前输入一个*.jpg):文本文件(*.txt)|*.txt|图形文件(*.bmp;*.jpg)|*.bmp;*.jpg,描述,,过滤器,,描述,,过滤器,,⑤“过滤器索引”－FilterIndex用途：当为对话框指定了一个以上的过滤器时，用于确定哪个过滤器作为缺省过滤器。
第一个过滤器索引值为1，第二个为2，依此类推工程训练中心,,9.2对话框,9.2.1通用对话框“打开”对话框属性值：⑥“标志”－Flags用途：用于确定对话框的一些特性，如是否允许同时选择多个文件等⑦“缺省扩展名”－DefaultExt用途：当对话框用于保存文件时，如果文件没有指定扩展名，则使用该属性指定的缺省扩展名，如：*.txt，*.doc等⑧“文件最大长度”－MaxFileSize用途：用于指定文件的最大长度，单位为字节；⑨“取消引发错误”－CancelError用途：用于确定运行时在对话框中按”取消“时是否出错选择该项，相当于CancelError设为true，按”取消“出错，否则，不出错工程训练中心,,9.2对话框,9.2.1通用对话框例在窗体上画一个名称为command1的命令按钮，标题为”打开文件“，再画一个名称为CD1的通用对话框程序运行后，若单击命令按钮，则弹出打开文件对话框，并按下列要求设置属性和代码：⑴设置适当属性，使对话框的标题为”打开文件“whatsapp网页版，初始目录为c盘根目录；⑵设置适当属性，使对话框的”文件类型“下拉式组合框中有二行：”Word文档“、”所有文件“，默认的是”所有文件“；⑶编写命令按钮的事件过程，使得单击按钮可以弹出”打开文件“对话框；思路：首先，条件⑴、⑵是在对话框属性窗口上配置参数，可在对话框属性窗口内填写”对话框标题“、”初始化路径“的相应内容；其次，过滤器的内容为：Word文档|*.doc|所有文件|*.*；且根据题意，过滤器索引值设为2；另，条件⑶是指编写代码，调用通用对话框，可采用如下程序代码：cd1.action=1或者cd1.showopen均可,工程训练中心,,9.2对话框,9.2.1通用对话框2、”另存为“对话框调用方法：在程序运行后，Action＝2或调用ShowSave方法；属性：与”打开“对话框基本一致；”另存为“对话框可以指定文件要保存的路径、文件名和文件类型；例编写一个程序，用”另存为“对话框将一个文本框的内容写入一个文本文件里。
解题思路：首先在窗体上画一个文本框、命令按钮和通用对话框控件；其中对话框的属性可在其属性窗口中配置，也可在程序中用命令配置；,配置对话框属性cd1.Filter="文本文件|*.txt|所有文件|*.*"对话框的过滤器cd1.FileName="*.txt"对话框的文件名cd1.DefaultExt="txt"对话框的默认文件扩展名cd1.Action=1调用另存为对话框将文本框内的内容写入文本文件Opencd1.FileNameForOutputAs#1Print#1,Text1.TextClose#1,工程训练中心,,9.2对话框,9.2.1通用对话框3、”颜色“对话框调用方法：在程序运行后whatsapp官网，Action＝3或调用ShowColor方法；属性：除对话框的基本属性外还有”color“与“flags”两个属性值；,工程训练中心,,9.2对话框,9.2.1通用对话框3、”颜色“对话框例编写一个应用程序，用”颜色“对话框设置一个文本框的背景颜色解题思路：首先在窗体上画一个文本框、命令按钮和通用对话框控件；对于文本框的背景色（backcolor）的设置可采用如下命令：Text1.Backcolor=CommonDialog1.Color例”颜色“对话框flags的属性实例解题思路：首先在窗体上画一个文本框、命令按钮和通用对话框控件；设置颜色对话框的flags的属性值为”cdlCCFullOpen”,工程训练中心,,9.2对话框,9.2.1通用对话框4、”字体“对话框调用方法：Action＝4或者调用showfont方法；属性值：,工程训练中心,,9.2对话框,9.2.1通用对话框4、”字体“对话框例编写一个程序，用“字体”对话框设置一个文本框的字体。
解题思路：在程序中whatsapp登录，首先要设置对话框的flags属性，然后设置文本框的字体属性，如：fontname、fontsize等相应属性，如：Text1.Fontname=CommonDialog1.Fontname等；,cd1.Flags=cdlCFBothOrcdlCFEffects‘安装字体cd1.ShowFont根据用户在字体对话框中的选择来设置文本框字体Text1.FontName=cd1.FontNameText1.FontBold=cd1.FontBoldText1.FontSize=cd1.FontSizeText1.FontItalic=cd1.FontItalicText1.FontStrikethru=cd1.FontStrikethruText1.FontUnderline=cd1.FontUnderlineText1.ForeColor=cd1.Color,工程训练中心,,9.2对话框,9.2.1通用对话框5、”打印机“对话框调用方法：Action＝5或者调用showprinter方法；属性值：,例编写一个程序，用“打印机”对话框打印一个文本框内容解题思路：打印份数要由FOR－NEXT循环程序加以控制。
工程训练中心,,9.2对话框,9.2.1通用对话框6、”帮助“对话框调用方法：Action＝6或者调用showhelp方法；属性值：,注：帮助对话框不是用来制作应用程序的帮助文件的，它仅仅是将已制好的帮助文件从磁盘中提取出来，并与帮助对话框所提供的界面联接，达到显示并检索帮助信息的目的工程训练中心,,9.2对话框,9.2.2自定义对话框所谓“自定义对话框”就是用户自己设计的一个窗口，窗口上放置一些用于交互信息的控件一般自定义对话框的属性设置：,注：“自定义对话框”一般情况下都设有“确定”和“取消”按钮，其他控件可根据需要而定工程训练中心,,9.2对话框,9.2.2自定义对话框“自定义对话框”的调用：一般情况下，调用Show方法即可，但由于调用Show方法时，参数不同，因而调用后的“自定义对话框”的状态有所不同：⑴将自定义窗体作为模式对话框显示模式对话框必须先关闭对话框，才能继续操作其他窗体如“字体”对话框调用格式：自定义对话框窗体名.ShowvbModal或自定义对话框窗体名.Show1⑵将自定义对话框作为无模式对话框显示无模式对话框允许不关闭对话框，在对话框和其他窗体间间移动焦点如“查找”对话框。
调用格式：自定义对话框窗体.ShowvbModaless或自定义对话框窗体.Show0,工程训练中心,,9.3综合应用举例,例在窗体上画一个文本框，把它的Mutiline属性设为True，通过菜单命令向文本框中输入信息并对文本框中的文本格式化解题思路：首先在窗体上画文本框，并设置相应的属性值；再设置菜单及其菜单项；最后，编写各子菜单项的相应的程序语句例编写一个简单的文本编辑程序文本内容是在打开对话对话框中所选择的文件名解题思路：本题是对通用对话框的综合使用，针对各对话框的特点，设置其属性值。