通用对话框控件 在VB 中,对话框是一种特殊的窗口,它通过显示和获取信息与用户进行交流,一个对话框可以很简单,也可以很复杂,前面介绍的MsgBox和InputBox函数可以建立简单的对话框,即信息框和输入框。但是要定义的对话框较复杂时,将会花较多的时间和精力设计和书写代码,为此,Visual Basic 6.0 提供了通用对话框控件,用其可以定义比较复杂的对话框(通用对话框)。要把通用对话框控件加到工具箱中,可按如下步骤操作: (1) (1) 执行“工程”菜单中的“部件”命令,打开“部件”对话框。 (2) (2) 选择“控件”选项卡,如图 1 所示,在控件列表框中选择“Microsoft Common Dialog Control 6.0”。 图 1 部件对话框 (3) (3) 单击“确定”按扭,通用对话框即被添加到工具箱中,如图 2所示。在设计状态下,CommonDialog 控件以图标的形式显示在窗体上,其大小不能改变,在程序运行时,控件本身被隐藏。 图 2 通用对话框 通用对话框的默认名称(Name 属性)为CommonDialogX(X 为1,2,3……)。 通用对话框控件为程序设计人员提供了几种不同类型的对话框,有文件对话框、打印对话框、字体对话框、颜色对话框等。利用这 些 对话框,可以获取所需 要的信息,例 如打开文件、打印、存 盘 、选择颜色等。这 些 对话框与Windows 本身及 商 业 程序具有相 同的风 格 。CommonDialog 对话框的类型可以通过Action 属性设置,也可以使用说明性的Show 方法来代替Action 属性值。Action 属性和Show 方法如表1: 表1 Action 属性和Show 方法 Action 属性 Show 方法 说明 1 ShowOpen 显示文件打开对话框 2 ShowSave 显示另存为对话框 3 ShowColor 显示颜色对话框 4 ShowFont 显示字体对话框 5 ShowPrinter 显示打印机对话框 6 ShowHelp 显示帮助对话框 通用对话框具有的主要共同属性为: (1) (1) CancelError 属性:通用对话框里有一个“取消”按扭,用于向应用程序表示用户想取消当前操作。当 CancelError 属性设置为True 时,若用户单击“取消”按扭,通用对话框自动将错误对象 Err.Number 设置为32755(cdlCancel)以便供程序判断。若CancelError 属性设置为False,则单击“取消”按扭时不产生错误信息。 (2) (2) DialogTitle 属性:每个通用对话框都有默认的对话框标题,通过 DialogTitle 属性可由用户自行设计对话框标题上显示的...