Visual_Basic语言程序设计教程 教学课件 作者 周冰 邓娟 刘芳 第10章多窗体、菜单与对话框.pptVIP

10.3.2 弹出式菜单设计 因此需要在窗体的MouseUp事件里编写对应的代码。注意只有在窗体上单击鼠标右键时才会弹出快捷菜单。具体代码如下： Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then 若单击鼠标右键 PopupMenu Edit 弹出edit快捷菜单 End If End Sub 10.4 通用对话框 VB6.0为用户提供了一组基于Windows标准的对话框，称为通用对话框，即CommonDialog。包括“打开”对话框、“另存为”对话框、“颜色”对话框、“字体”对话框、“打印”对话框以及“帮助”对话框。 通用对话框不是标准控件，使用时必须先将该控件添加到工具箱里。将CommonDialog添加到工具箱里的步骤如下： 1．选择“工程”下拉菜单中的“部件”子菜单，弹出“部件”对话框。 2．在“部件”对话框列表中选择“Microsoft Common Dialog Control6.0”项目，确保其前方的复选框内出现“√”。 3．单击确定按钮。添加完成后工具箱里出现CommonDialog的图标。具体操作如图所示。 10.4 通用对话框 通用对话框常用的属性有名称属性和Action属性等。系统默认的通用对话框名称为CommonDialog1、CommonDialog2……。Action属性决定程序打开什么类型的对话框。具体Action属性、含义及对应的方法。 Action属性 含义 对应方法 0 无对话框显示 1 “打开”对话框 ShowOpen 2 “另存为”对话框 ShowSave 3 “颜色”对话框 ShowColor 4 “字体”对话框 ShowFont 5 “打印”对话框 ShowPrinter 6 “帮助”对话框 ShowHelp 10.4 通用对话框 把CommonDialog控件添加到窗体后，就意味着上述各种标准对话框可以被使用了。当某一时刻需要用到某个对话框时，必须通过设置Action属性或VB6.0的方法才能使之显示在屏幕上。 例如要显示“打开”对话框，在程序中利用设置Action属性则对应语句如下： CommonDialog1.Action=1 也可在程序中用控件的方法完成对话框的显示。 CommonDialog1.ShowSave 10.4 通用对话框 文件对话框 文件对话框包括“打开”和“另存为”对话框。使用“打开”、“另存为”对话框可以设置文件对话框的属性。文件对话框属性页中的属性和含义如表示。 属性标题 属性名称 含义 对话框标题 DialogTitle 设置对话框的标题，默认值为“打开”或“另存为” 文件名称 FileName 设置对话框中“文件名称”的默认值，并返回用户所选中的文件名（包括完整的路径名） 初始化路径 InitDir 设置初始化的文件目录，并返回用户所选择的目录，默认为当前目录 过滤器 Filter 设置显示文件的类型。格式为：描述|通配符| 过滤器索引 FilterIndex 设置文件对话框中默认过滤器的索引 标志 Flags 设置对话框的一些选项，可以是多个值的组合。如1，显示只读复选框 默认扩展名 DefaultExt 为对话框返回或设置默认的文件扩展名 文件最大长度 MaxFileSize 设置被打开文件的最大长度，取值范围1～2k，默认为260 例如： CommonDialog1.Fileter=”All Files(*.*)|*.*|位图(*.bmp)| *.bmp|” ’设置对话框的过滤器 CommonDialog2.DialogTitle=”选择文件” ’设置对话框的标题 其他对话框 颜色对话框 使用“颜色”对话框可设置颜色属性，对应的Windows颜色对话框如图所示。其属性和含义如表所示。 属性标题 属性名称 含义 颜色 Color 设置初始颜色，并返回用户选择的颜色 标志 Flags 设置对话框的一些选项，可以是多个值的组合。例如1表示首次打开颜色对话框。 其他对话框 例如： Commondialog1.Showcolor Form1.BackColor=CommonDialog1.Color 表示将用户在“颜色”对话框中设置的颜色作为窗体背景色。 其他对话框 字体对话框 使用“字体”对话框可设置字体属性。其属性和含义如表所示。 属性标题 属性名称 含义 字体名称 FontName 设置字体名称中的初始字体，并返回用户所选择的字体名称 字体大小 FontSize 设置初始字体大小，并返回用户选择的字体大小，默认为8 样式 FontBold 设置