vb CommonDialog 属性

CommonDialog 控件 
取消引发错误 CancelError 
颜色 Color 
复制 Copies 
缺省扩展名 DefaultExt 
对话框标题 DialogTitle 
文件名称 FileName 
过滤器 Filter 
过滤器索引 FilterIndex 
标志 Flags 
字体名称 FontName 
字体大小 FontSize 
起始页 FromPage 
帮助命令 HelpCommand 
帮助上下文 HelpContext 
帮助文件 HelpFile 
帮助键 HelpKey 
初始化路径 InitDir 
最大 Max 
文件最大长度 MaxFileSize 
最小 Min 
缺省打印机 PrinterDefault 
终止页 ToPage 

CommonDialog方法 显示的对话 
ShowOpen 打开 
ShowSave 另存为 
ShowColor 颜色 
ShowFont 字体 
ShowPrinter 打印 
ShowHelp 调用 Windows“帮助” 

CommonDialog 控件（“打印”对话框）示例 
下例显示“打印”对话框。 

Private Sub Command1_Click() 
Dim BeginPage, EndPage, NumCopies, i 
' 设置“取消”为 True 
CommonDialog1.CancelError = True 
On Error GoTo ErrHandler 
' 显示“打印”对话框 
CommonDialog1.ShowPrinter 
' 从该对话框取得选定的值 
BeginPage = CommonDialog1.FromPage 
EndPage = CommonDialog1.ToPage 
NumCopies = CommonDialog1.Copies 
For i = 1 To NumCopies 
' 此处放置将数据发送到打印机的代码 
Next i 
Exit Sub 
ErrHandler： 
' 用户按了“取消”按钮 
Exit Sub 
End Sub