当前位置:学海荡舟 -> 电脑乐园 -> CommomDialog使用的例子




  编 程 入 门
--看实例学VB6.0--CommomDialog使用的例子--

  CommonDialog控件是常用的一个控件,它为我们提供了打开、另存为、字体、颜色、打印、帮助等几种类型的标准对话框,本例演示了所有这些类型的对话框的使用方法。

  为了学习方便,提供的源码已经作了详细的中文注释,看看源码框中的代码:


(源程序下载)

  如果控件面板中没有CommonDialog控件的小图标,必须先从“添加控件对话框”中添加,下面我们来看看怎样调用不同类型的对话框。

  CommonDialog控件有一系列的Show方法,例如:ShowOpen、ShowSave、ShowFont、ShowColor、ShowPrinter、ShowHelp等,这些方法的使用语法是类似的,如下所示:

  object.ShowOpen,我们只须在程序中写入这个语句,就能调出“打开”对话框,同样也能调用其它类型的对话框。

  而CommonDialog控件的属性是和不同的对话框类型紧密相关的,有些属性只适用于某一类对话框,有些属性在不同的对话框中的属性是有差别的,所以下面分类列出了和不同对话框相关联的属性的用法。

  与ShowOpen、ShowSave方法相关的属性:
  FileName属性:返回或设置所选文件的路径和文件名,如果在使用Show方法以前使用FileName属性,则设定了对话框的默认文件名;如果是在以后使用则返回选择的文件名。
  使用语法是: CommonDialog.Filename[=pathname]
  Filter属性:返回或设置在对话框的类型列表框中所显示的过滤器(也就是限定打开或保存为的文件类型),它的使用语法是:
  object.Filter [= 描述文字1 |过滤标示1 |描述文字2 |过滤标示2]
  其中描述文字为任意文字,而 过滤标示则采用*.文件后缀(例如:*.bmp)的格式,描述文字和过滤标示之间用“|”隔开。
  DefaultExt属性:为该对话框返回或设置缺省的文件扩展名,也就是当我们没有指定打开或保存的文件类型时,按DefaultExt属性所设置的扩展名为默认值。

  与ShowFont方法相关的属性:
  Color选定的颜色。为使用此属性,必须先将Flags属性设置为cdlCFEffects。
  FontBold 是否选定“粗体”。
  FontItalic 是否选定“斜体”。
  FontStrikethru 是否选定删除线。
  FontUnderline 是否选定下划线。
  FontName 选定的字体名称。
  FontSize 选定的字体大小。
  使用的语法是直接引用,比如我们要根据“字体对话框”返回的值设置文本框的字体,则直接采用语句:Text.Font=CommonDialog.FontnName

  与ShowColor方法相关的属性:
  Color选定的颜色。为使用此属性,必须先将Flags属性设置为cdlCFEffects。

  与ShowHelp方法相关的属性:
  HelpCommand属性 返回或设置需要的联机帮助的类型
  HelpFile属性 确定帮助文件的路径和文件名
  语法是: object.HelpFile[ = filename]

  下面看看CancelError属性,它设置当选取“取消”按钮时是否认为出错,使用的语法是:CommonDialog.CancelError[= boolean] (boolean指布尔型变量)
  如果我们把它设为True,则当使用者选取了“取消”按钮时程序会返回一个cdlCancel错误,通过捕捉这个错误并加以处理,我们就能避免程序的出错。具体的使用可在源码中看到实例。

相关链接: VB趣味程序讲解