发布时间 : 星期四 文章VB6程序设计更新完毕开始阅读06913c4bcf84b9d528ea7a8f
VB6程序设计
第六章 对话框
对话框是一种特殊的窗体，通过它可以向用户显示各种信息，或者提示用户提供应用程序继续执行所需要的数据。
6.1 预定义对话框
6.1.1 消息对话框
消息对话框用来显示信息，让用户选择按钮，并可将用户的选择作为程序继续执行的依据。
MsgBox函数是VB中用来生成各类消息框的函数，常用格式如下： MsgBox(prompt[,buttons][,title])
6.1.2 输入对话框
输入对话框用于在程序运行时提示用户输入信息。
InputBox函数是VB中用来生成输入对话框的函数，常用格式如下： InputBox(prompt[,title][,default][,xpos,ypos])
6.2 通用对话框
通用对话框是一种控件，称为CommonDialog。使用该控件，可以创建“打开”、“另存为”、“颜色”、“字体”、“打印”五种标准对话框，以及打开指定的帮助文件的“帮助”窗口。
6.2.1 通用对话框控件
启动VB后，选择“工程”菜单中的“部件”命令，在对话框的“控件”选项卡中找到并选定“Microsoft CommonDialog Control 6.0”控件部件。
通过调用对话框的方法可以显示相应的对话框： ? ShowOpen：显示“打开”对话框 ? ShowSave：显示“另存为”对话框 ? ShowColor：显示“颜色”对话框 ? ShowFont：显示“字体”对话框 ? ShowPrinter：显示“打印”对话框 ? ShowHelp：打开帮助文件窗口
在程序运行时，通过对CommonDialog控件的Action属性赋值，也可以显示相应的对话框。Action属性值及其含义如下：
? 0：不显示对话框
29
第五章 窗体和标准控件
? 1：显示“打开”对话框 ? 2：显示“另存为”对话框 ? 3：显示“颜色”对话框 ? 4：显示“字体”对话框 ? 5：显示：“打印”对话框 ? 6：显示帮助文件
基本属性：DialogTitle、CanceError等。在设计时设置通用对话框的属性，可在属性窗口中直接设置；也可以右击通用对话框控件，选择“属性”，通过“属性页”对话框进行设置。在程序运行时，可通过赋值语句设置通用对话框的属性。
6.2.2 “打开”对话框
常用属性：FileName、FileTitle、Filter、InitDir等。
例：
CommonDialog1.FileName = \ CommonDialog1.ShowOpen s = CommonDialog1.FileName n = CommonDialog1.FileTitle
6.2.3 “另存为”对话框
“另存为”对话框的常用属性与“打开”对话框相同。
6.2.4 “颜色”对话框
常用属性：Color等 例：
Private Sub Command1_Click() CommonDialog1.ShowColor
Form1.BackColor = CommonDialog1.Color End Sub
6.2.5 “字体”对话框
常用属性：Flags、Color、FontBold、FontItalic、FontStrikethru、FontUnderline、FontName、FontSize等。
例：
Private Sub Command1_Click() CommonDialog1.Flags = 1 + 256 CommonDialog1.ShowFont
Text1.FontName = CommonDialog1.FontName Text1.FontSize = CommonDialog1.FontSize Text1.FontItalic = CommonDialog1.FontItalic Text1.FontBold = CommonDialog1.FontBold
30
VB6程序设计
Text1.FontStrikethru = CommonDialog1.FontStrikethru Text1.FontUnderline = CommonDialog1.FontUnderline Text1.ForeColor = CommonDialog1.Color End Sub
6.2.6 “打印”对话框
“打印”对话框可以让用户选择打印参数：指定打印机，选择打印输出方式、打印质量、打印的份数等。
除基本属性外，常用的属性有：Copies、FromPage、ToPage等。 例：
Private Sub Command1_Click() CommonDialog1.ShowPrinter
For I = 1 To CommonDialog1.Copies Printer.Print Text1.Text Printer.EndDoc Next I End Sub
6.2.7 “帮助”对话框
例：
Private Sub Command1_Click()
CommonDialog1.HelpFile = \ CommonDialog1.HelpCommand = 9 CommonDialog1.ShowHelp End Sub
6.3 自定义对话框
（略）
6.3.1 模式对话框与非模式对话框 6.3.2 自定义对话框的设计
31
第五章 窗体和标准控件
第七章 菜单、工具栏、状态栏及多文档界面
在Windows应用程序中，一般都有菜单、工具栏和状态栏。
7.1 菜单设计
7.1.1 菜单的基本概念
所谓菜单，就是应用程序为用户提供的一组命令。 ? 下拉式菜单 ? 弹出式菜单
在VB中，菜单和菜单中的命令项均看作是菜单控件。菜单控件最重要的属性：Name、Caption。菜单控件只包含一个Click事件。
7.1.2 菜单编辑器
在VB中使用菜单编辑器为应用程序创建菜单。打开菜单编辑器的方法有三种。
菜单编辑器窗口由三部分组成：数据区、编辑区和菜单控件列表框。 注意：
? 输入菜单命令标题时可用符号“&”为菜单命令添加访问键
? 如果菜单命令需要打开一个对话框，可在其名称后面加上一个省略号 ? 在“标题”文本框中只输入一个字符“-”，则可以创建菜单中的隔条控
件
? 菜单控件的名称应当唯一 ? 菜单控件也可组成数组
? 可为菜单项指定一个快捷键
7.1.3 编写菜单控件的事件过程
应用举例：
2#P154[例7.2]设计一个包含加、减、乘、除算术运算及其清零功能的菜单及窗体，计算结果可以按八进制、十进制、十六进制显示（缺省以十进制显示），如下图所示。
32