VB编程中的各种对话框，你都知道吗？

VB中的对话框控件

     VB编程中的CommonDialog 控件了提供一组标准的操作对话框，可以进行打开和保存文件，设置打印、提示帮助，选择颜色和字体等操作，在vb开发中具有非常广的应用。

    在VB中要使用 CommonDialog 控件，首先要在部件中将其添加到窗体中并设置其属性。

控件所显示的对话框由控件的方法确定。

在运行时，对话框控件是看不到的，当其相应的方法被调用时，将显示对应对话框界面供用户选择；

在设计时，CommonDialog 控件是以图标的形式显示在窗体中。该图标的大小不会改变。

Private Sub cmdOpen_Click() '打开

  CD1.ShowOpen

  '打开对话框中选择的文件名（包括路径）显示在文本框中

  Text1.Text = CD1.FileName

End Sub

Private Sub cmdSaveas_Click() '另存为

  CD1.DefaultExt = 'txt'    '保存文件时的缺省类型是文本文档

  CD1.ShowSave

End Sub

Private Sub cmdColor_Click() '颜色

  CD1.ShowColor

  '用在颜色对话框中选择的颜色设置文本框字体

End Sub

Private Sub cmdFont_Click() '字体

 '显示打印机和屏幕字体，并在字体对话框显示删除线和下划线检查框以及颜色组合框

  CD1.Flags = cdlCFBoth Or cdlCFEffects

  CD1.ShowFont

  '在字体对话框中选择不同的内容设置文本框中的字体

  Text1.FontName = CD1.FontName

  Text1.FontSize = CD1.FontSize

  Text1.FontBold = CD1.FontBold

  Text1.FontItalic = CD1.FontItalic

  Text1.FontUnderline = CD1.FontUnderline

End Sub