vb6.0 对话框和菜单

在Windows应用程序中，利用弹出式菜单（Pop-up Menu）是增加软件易用性的一个重要方式。

本文将向大家介绍在VB6.0中实现弹出式菜单的几种方法。

利用VB6.0内置的PopupMenu方法PopupMenu方法（Method）是VB6.0内置的实现弹出式菜单的方法，用于在MDIForm或Form等对象中的鼠标点位置或指定位置显示弹出式菜单。

其语法为：Object.PopupMenu menuname, flags, x, y, boldcommand说明如下：通过设置对象（Object）的Scalemode属性来规定X，Y坐标的度量单位，X，Y坐标设定弹出式菜单在对象（Object）中显示的相对位置，如果省略X，Y，则弹出式菜单将显示在当前鼠标点位置。

当用PopupMenu方法激活弹出菜单后，要等到用户选择了弹出菜单中的某个菜单项之后（这种情况下，还要先运行被选择菜单项的相应代码）或在表单其它位置单击鼠标左键消除弹出菜单后，后面的代码才能继续执行。

并且，一次只能激活一个弹出式菜单，当已经有一个弹处菜单被激活或已经有一个下拉菜单被打开时，对PopupMenu方法的调用将被忽略。

下面的例子演示当用户在表单上点击鼠标右键时，在鼠标点处显示弹出式菜单。

欲试验此例子，建立一个表单，在表单中建立一个菜单控件，将其命名为mnuFile（mnuFile菜单至少包含一个子菜单）。

在表单的声明（Declaration）区域加入如下代码：Private Sub Form_MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = vbRightButton ThenPopupMenu mnuFileEnd IfEnd SubPopupMenu方法是VB6.0内置的方法，使用起来方便简单，但该方法有一个不足，即当点击鼠标弹出菜单后，如果不选择菜单项而在其他位置点击鼠标，则菜单并不会在新的鼠标点处显示。

第六章对话框的设计6.1 预定义对话框在应用程序中添加对话框最容易的方法是使用预定义对话框，因为不必考虑设计、装载或者显示对话框方面的问题。

然而，其控件在外观上要受到限制。

预定义的对话框总是模式的。

表6.1中列出了在Visual Basic应用程序中添加预定义对话框时所使用的函数。

6.1.1 输入框InputBox函数用来产生要求输入数据的输入框；在输入框中显示提示文本、文本框和按钮；等待用户的输入或按下按钮，并返回用户在文本框中输入的内容。

如图6.1所示的输入框就是使用InputBox函数所产生的，用来提示用户输入要在窗体上显示的内容。

生成该输入框的代码如下所示：Word=InputBox（“请输入要在窗体中显示的内容：”、“输入”）只需再做一点工作就可以将上面的文本输入框使用到程序中了。

实例6.1使用输入框。

在窗体中放置一个按钮控件，并设置它的Caption属性的值为“输入要显示的内容”，双击这个按钮控件打开它的代码窗口，编写如下代码：个参数是指输入框中的用户提示字符串，第二个参数是指输入框的标题：InputBox（prompt[，title][，default][，spos][，ypos][，helpfile，context]）InputBox函数语法中的各参数的含义如表6.2所示。

如果同时提供了Helpfile与Context，用户可以按F1键来查看与Context相应的帮助主题。

如果用户单击输入框中的【确定】按钮，则InputBox函数返回文本框中的内容。

如果用户单击【取消】按钮，则此函数返回一个长度为零的字符串（“”）。

如果要省略某些位置参数，则必须加入相应的逗号分界符。

例如，要指定实例6.1中输入框的位置，而缺省输入框的初始值，则语句如下：word =InputBox（“请输入要在窗体中显示的内容：”，“输入”，200，200）。

6.1.2 消息框MsgBox函数用来产生一个消息框。

第二章 VB6.0 集成开发环境2.1 VB 6.0 中文版的启动与退出1.启动开始程序中文版2.退出文件退出集成开发环境一、主窗口1.标题栏2.菜单栏3.工具栏（编辑、标准、窗体编辑器、调试）二、其他窗口1.窗体设计器窗口（Form）2.工程资源管理器窗口查看代码、查看对象、切换文件夹、文件列表框（ .vbp .vbg .frm .bas .cls .res）3.属性窗口对象框、属性显示方式、属性列表、属性解释4. 工具箱窗口（1）两类控件：内部控件、ActiveX控件（2）内部控件：指针、图片框、标签、文本框、框架、命令按钮、复选框、单选按钮、组合框、列表框、水平滚动条、垂直滚动条、计时器、驱动器列表框、目录列表框、文件列表框、形状、直线、图像框、数据、OLE容器（21个）5. 代码编辑器窗口（1）打开代码窗口的方法双击已建立好的控件；执行视图菜单中的“代码窗口”命令；按F7键；单击“工程资源管理器”中的“查看代码”按钮（2）代码窗口的组成标题栏；对象框；过程/事件框；代码框2.3 对象及其操作一、对象1. 什么是对象对象是具有特殊属性和行为方式的实体，如窗体、控件等。

2. 对象属性（1）什么叫属性：对象的特性叫属性，不同对象有不同的属性。

（2）设置对象属性：* 在属性窗口设置* 在程序中设置，其格式为：对象名.属性名=新设置的属性值如：Text1.Text=“Good morning”3. 对象事件（1）什么叫事件事件是由Visual Basic预先设置好的，能够被对象识别的和响的动作。

（2）事件的响应当事件由用户触发（如Click）或由系统（如Load）触发时，对象就会该事件做出响应（3）事件过程响应某个事件后所执行的通过一段程序代码来实现，这样一段程序代码叫事件过程事件过程的格式：Private Sub 对象名称＿事件名称( )……Endsub如：Private Sub Command1_click()Text1.Text=“Good morning”Text1.Font.Size=18Text1.Fore=vbRedEnd Sub5. 对象方法（１）什么叫方法方法是Visual Basic 提供的一种特殊的子程序（过程），用来完成一定操作。

VB 6.0 ：菜单编辑器的用法做VB 项目时经常需要用菜单编辑器来创建自己需要的菜单，因此需要对其具体用法非常娴熟。

下面把从网上下载过来的资料结合自己使用的体会整理出一份文档以供日后参考。

附加以下图片以帮助说明与理解。

图片：菜单编辑器的使用在出现VB6.0窗体的情况下,在菜单中选“工具”,再在其下拉菜单下选“菜单编辑器”。

然后按如下说明操作:一．“菜单编辑器”对话框。

使用菜单编辑器可以为应用程序创建自定义菜单并定义其属性。

二．对话框选项。

1．“标题” ：使用该选项可以输入菜单名或命令名，这些名字出现在菜单条或菜单之中。

如果想在菜单中建立分隔符条，则应在Caption 框中键入一个连字符(-)。

为了能够通过键盘访问菜单项，可在一个字母前插入& 符号。

在运行时，该字母带有下划线（& 符号是不可见的），按ALT 键和该字母就可访问菜单或命令。

如果要在菜单中显示& 符号，则应在标题中连续输入两个& 符号。

2．“名称” ：用来为菜单项输入控件名。

控件名是标识符，仅用于访问代码中的菜单项；它不会出现在菜单中。

3．“索引” ：可指定一个数字值来确定控件在控件数组中的位置。

该位置与控件的屏幕位置无关。

4．“快捷键” ：可在列表框中为每个命令选择快捷键。

5．“帮助上下文ID” 。

允许为context ID 指定唯一数值。

在HelpFile 属性指定的帮助文件中用该数值查找适当的帮助主题。

6．“协调位置” ：该列表框中共有四个可选项，他们决定是否及如何在容器窗体中显示菜单。

7．“复选” ：允许在菜单项的左边设置复选标记。

通常用它来指出切换选项的开关状态。

8．“有效” ：由此选项可决定是否让菜单项对事件做出响应，而如果希望该项失效并以浅灰色显示出来，则也可取消对该复选框的选用。

9．“可见”：决定是否将菜单项显示在菜单上。

10．“显示窗口列表” ：在MDI 应用程序中，确定菜单控件是否包含一个打开的MDI 子窗体列表。

第七章vb6.0菜单的设计与多文档界面第七章菜单的设计与多文档界面7.1 菜单简介大多数Windows应用程序都有一个菜单栏，它总是处在窗体标题栏的下面，并包含一个或多个菜单标题。

单击每个菜单标题都会弹出一个下拉菜单，在下拉菜单中包含有菜单项、分隔条和子菜单标题。

有的菜单项可以直接执行，有的菜单项执行时则会弹出一个对话框。

所有的Windows应用程序都遵循以下3个约定：凡是菜单名称后有一个省略号的，均表示在单击该选项后会弹出一个相应的对话框，在用户作出相应的回答后，该项功能就以用户所给予的信息去执行。

例如，单击【打开】选项，则弹出【打开】对话框，用户可从中选择要打开的文件。

凡是菜单名称后有一个小三角的，则表示它是一个子菜单标题，子菜单标题并不能直接执行，仅仅扮演一个“容器”的角色。

当鼠标指针移动到子菜单标题上时，会自动弹出子菜单。

例如，将指针移动到【发送】选项，就会弹出子菜单。

菜单名称后不包含L述两种符号者，表明该菜单项所代表的命令可直接执行。

例如，单击【关闭】选项，则将关闭当前打开的文档。

另外，有的菜单项名称后还显示相应的键盘访问键和快捷键。

访问键允许同时按下Alt键和一个指定字符来打开一个菜单。

一旦菜单打开，通过按下访问键即可选取菜单项。

在菜单项的标题中，访问键表现为一个带下划线的字母，如【打开】命令的访问键为0.当打开【文件】菜单后，按下0键即可执行【打开】命令。

快捷键出现在相应菜单项的右边，例如，【打开】命令的快捷键是Ctrl+O，无论【文件】菜单是否打开，只要按下Ctrl+O组合键，即可执行【打开】命令。

由于所有Windows应用程序都遵循上述约定，因此，在创建菜单时，也应该遵循这些约定。

例如，如果某菜单项的执行结果是弹出一个对话框，则应该在该菜单项后加上省略符（…）.此外，要使应用程序简单好用，还应该将菜单项按其功能分组。

例如，与文件有关的命令【新建】、【打开】和【另存为】都列入了【文件】菜单。

第十一章对话框程序设计•掌握与应用：对话框的特性和类型“文件”对话框的使用方法“颜色”对话框、“字体”对话框和“打印”对话框的使用方法教学目的要求：第十一章对话框程序设计11.1 对话框概述11.2 文件对话框11.3 其他对话框11.1 对话框概述11.1.1 对话框对话框分成3类：预定义对话框、自定义对话框和通用对话框预定义对话框（预制对话框）：由系统提供，VB提供了两种预定义对话框，输入框和消息框，前者用inputbox函数建立，后者用msgbox函数建立自定义对话框（定制对话框）：由用户根据自已的需要进行定制。

输入框和消息框不够灵活，有时甚至无法满足用户的需要通用对话框：它是一种控件，可以用来设计较为复杂的对话框11.1.2 自定义对话框自定义对话框就是用户根据所需自己创建的含有控件的窗体，这些控件包括命令按钮、选取按钮和文本框等等，他们可以为应用程序接收或反馈信息；同时，通过设置属性值来设置窗体的外观，也可以通过编写代码的方式来设置对话框。

例11.1.3 通用对话框通用对话框是一种ActiveX控件，它随同VB提供给程序设计人员在一般情况下，启动VB后，在工具箱中没有通用对话框控件，使用前要把通用对话框控件加到工具箱中（1）打开“部件”对话框：工程菜单→部件或右击工具箱后选择部件（2）选择“控件”选项卡，然后在控件列表框中选择“Microsoft Common Dialog Control 6.0”（3）单击“确定”按钮，通用对话框控件就被加入到工具箱中通用对话框有六种形式的对话框，通过设置Action属性或调用Show 方法来选择对话框类型Action属性方法打开文件（Open）1ShowOpen保存文件（Save as）2ShowSave选择颜色（Color）3ShowColor选择字体（Font）4ShowFont打印（Print）5ShowPrinter帮助文件（Help）6ShowHelp通用对话框的缺省名称为CommonDialog1,CommonDialog2 …对话框的类型不是在设计阶段设置的，而是在程序运行时设置的如：CommonDialog1.Action=3 或CommonDialog1.ShowColor 指定对话框类型为颜色对话框11.2 文件对话框11.2.1 打开（open）文件对话框“打开”对话框的功能是为应用程序提供“打开文件”的必要信息，如文件名、文件路径等。