VisualBasic程序设计第10章菜单与工具栏设计.ppt

VisualBasic程序设计第10章菜单与工具栏设计,2009年月日,计算机学院,教师：傅茂洺,10.1菜单编辑器,提要,10.2下拉式菜单,10.3弹出式菜单,10.4制作工具栏,一个完整的菜单通常由：主菜栏、子菜单、菜单项、访问键、快捷键、分隔符等组成。,10.1菜单编辑器,为了创建菜单，VB提供了一个设计菜单的工具，即“菜单编辑器”。可在VB的“工具”菜单下选择“菜单编辑器”命令，则可打开“菜单编辑器”窗口。,属性设置区,显示区,编辑区,“菜单编辑器”的组成,属性设置区窗口的上部分用于设置每个菜单项的基本属性编辑区窗口的中部有7个按钮，用于编辑菜单中的各菜单项菜单项编辑区窗口的下方区域，用于显示输入的菜单项，编辑好的菜单会立刻在编辑区中显示出来，并通过内缩符号表明菜单项的层次,“菜单编辑器”中的菜单项主要属性,“菜单编辑器”中的编辑按钮,“菜单编辑器”中的显示区与对应的菜单项,“菜单编辑器”显示区显示的菜单项目,窗体运行时对应的菜单显示效果,10.2下拉式菜单,“下拉式菜单”一般通过单击菜单栏中的菜单项的方式打开。在下拉式菜单系统中，一般有一个主菜单，称为“菜单栏”,建立菜单的步骤（1）打开“菜单编辑器”设置各项菜单项（2）为相应的菜单命令编写事件过程注意：菜单项控件只包含一个事件，即Click事件。菜单标题而非菜单命令的菜单项，无需添加代码。,【例10-1】设计一个简单的下拉式菜单。,窗体设计界面,窗体执行界面,设计步骤如下：在“菜单编辑器”中建立如下菜单,为相应的菜单命令编写事件过程编写“足球”菜单项的Click事件代码：PrivateSubmenu11_Click()Label1.Caption=你选择了足球EndSub编写“游泳”子菜单下的2个菜单项的Click事件代码：PrivateSubmenu121_Click()Label1.Caption=你选择了蛙泳EndSubPrivateSubmenu122_Click()Label1.Caption=你选择了仰泳EndSub,1.设置快捷键,为菜单设置热键与对应的菜单项,为它们设置快捷键将会大大提高操作速度。例如，Ctrl+C可代表复制，Ctrl+V可代表粘贴。,2.增加确认标记,在菜单中，靠近命令的确认标志表示该命令项已经被选择。需要在菜单中使用缺省选择时，则可以设置确认标志。当“菜单编辑器”中的“复选”复选框设置为选中时，在相应的菜单项左旁会被加上“”记号。在“菜单编辑器”中设置了的确认标志，也可以使用代码将其删除或加上，如：menu11.Checked=False使“足球”菜单项的“”记号去除menu11.Checked=True在“足球”菜单项加上“”记号。,4.菜单项的隐藏,要使菜单项消失而不可见，当“菜单编辑器”中的“可见”复选框设置为不可选时，其相应的菜单项将被隐藏起来。也可以在代码中使一个菜单项隐藏，如：menu11.Visible=False使“足球”菜单项隐藏,3.菜单项的有效性控制,有时候，某些菜单命令暂时毫无意义，可以根据程序的运行状态，动态的进行调整，暂时将它模糊，表示该菜单项不可选（呈灰色），如：menu11.Enabled=False使“足球”菜单项不起作用,【例10-2】设计一个简单的文本编辑器，利用输入对话框输入文本，通过菜单命令控制文本框中字体的外观。其中，部分菜单项具有在其旁加上或取消标志、关闭或隐藏菜单项的功能，并设有快捷键和访问键功能，其执行界面如图所示。,窗体上菜单的界面,使用“菜单编辑器”，按照如下设置各菜单项,10.3弹出式菜单,弹出式菜单（又称“快捷菜单”），只需用户在窗体上单击某一鼠标键（一般为鼠标右键）就立即弹出菜单。快捷菜单可以根据用户单击鼠标键时的位置，动态地调整菜单项的显示位置，同时也改变菜单项显示的内容，为用户提供了更加便利的操作。,设计弹出式菜单的方法（1）使用“菜单编辑器”窗口建立一个顶层菜单（主菜单项）。（2）设置弹出式菜单的显示方式。使用PopupMenu方法显示弹出式菜单。PopupMenu方法的语法格式是：窗体名.PopupMenu,Flags,X,Y,其中：“菜单项”是指要弹出的菜单名称（一般是主菜单项或子菜单项的名称）。X、Y是菜单显示的位置。Flags参数指定弹出式菜单的行为。,【例10-3】在例10-2中，将“文件”菜单作为弹出式菜单显示。运行效果如图所示。,只需在例10-2中增加窗体的MouseDown事件代码PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAs_Single,YAsSingle)IfButton=2Then单击鼠标右键时（Button=2），条件成立PopupMenuFile将“文件”菜单中的各菜单项设定为弹出式EndIfEndSub,程序启动后，在窗体上单击鼠标右键时，即可弹出“文件”快捷菜单。,10.4制作工具栏,工具栏往往由一系列的按钮（或形象化的图标按钮）组成，每个按钮对应一个常用的菜单命令。,在VB中可以通过两种方法建立工具栏：手工方式（在图片框控件上加入一些工具按钮控件）工具栏控件方式（使用工具栏控件）。,使用ToolBar与ImageList制作工具栏（1）添加ToolBar与ImageList控件。（2）在窗体上ToolBar与ImageList。（3）设置控件的属性。（4）编写代码。,用手工方式制作工具栏（1）在窗体中添加一个图片框Picture控件（2）选定图片框，在图片框中添加任何想在工具栏中显示的控件（3）设置控件的属性（4）编写代码一般都是在其按钮的Click事件代码中调用对应的菜单命令。,【例10-4】在例10-3中，增加一个自定义的工具栏。,在例10-3的基础上作修改：1）修改应用程序用户界面在窗体上增加一个图片框Picture1，然后在图片框中增加按钮数组Command1(0)Command1(1)和复选框数组Check1(0)Check1(2),1.用手工方式制作工具栏,2）设置新增对象属性：,3）面向工具栏上的控件编写事件驱动代码,使用ToolBar与ImageList制作工具栏,工具栏控件并不在默认的工具箱中，需要另外从VB的“工具”/“部件”菜单命令，打开的“部件对话框”中选择“MicrosoftWindowsCommonControls6.0”，添加到工具箱来。,工具箱中增加的控件组,Toolbar控件的“通用”选项卡,Toolbar控件的主要设置：,在添加有Toolbar控件的窗体上，用鼠标右键单击Toolbar控件，在弹出的快捷菜单中选择“属性”，可以打开“属性页”对话框。,与之对应的图像列表控件,“通用”选项卡通常需要设置的是：“图像列表”属性选项，它将被用来与图像列表(ImageList)控件建立关联,Toolbar控件的“按钮”选项卡,“按钮”选项卡需要设置：“索引”、“图像”等属性,第2个按钮的索引值,选ImageList控件图片库中的第2张图片,按钮的提示文本,ImageList控件的主要设置：工具栏中的按钮习惯上以图形按钮方式出现，而工具栏控件本身没有Picture属性。需要通过图像列表控件来实现工具栏按钮图片的载入。,向ImageList控件添加图像,已插入了3个图片,【例10-5】使用工具栏控件和图像列表控件，重新设计例10-4的工具栏，窗口设计界面如图所示。,ToolBar控件,ImageList控件,此处留有间隔,设计步骤：1）在窗体上添加ToolBar和ImageList控件2）设置ImageList控件属性,插入图片,3）设置ToolBar控件属性,选择图像列表,设置按钮图片,设置按钮提示信息,4）编写工具栏按钮的事件代码PrivateSubToolbar1_ButtonClick(ByValButtonAs_MSComctlLib.Button)n=Button.IndexSel