打印对话框怎么用？（在线）

Question

具体如何使用呢？说的详细一些。

Answer 1

用CommonDialog控件,调用他的ShowPrint方法,很方便的
通过添加部件CommonDialog控件,这个应该会吧

Answer 2

Private Sub mnuPrint_Click()
CmdOpen.Flags = cdlPDReturnDC + cdlPDNoPageNums
If RichTextBox1.SelLength = 0 Then
    CmdOpen.Flags = CmdOpen.Flags + cdlPDAllPages
Else
    CmdOpen.Flags = CmdOpen.Flags + cdlPDSelection
End If
'参看上面CommonDialog方法
CmdOpen.ShowPrinter
'将 RichTextBox 控件中格式化文本发送给设备进行打印。
'语法
'object.SelPrint (hDC)
'SelPrint 方法的语法包含下面部分:
'部分         描述
'-----------------------------------------------
'object       对象表达式，其值是“应用于”列表中的一个对象。
'hdc          设备描述体，是准备用来打印控件内容的设备。
'-----------------------------------------------
RichTextBox1.SelPrint CmdOpen.hDC
End Sub或去http://www.hongen.com/pc/program/codtutor/code0003/code01.htm看看

Answer 3

在运行时，一旦“打印”对话框中作出选择，下列属性即包括与该选择有关的信息：属性 决定 
Copies 打印的份数。 
FromPage 开始打印页。 
ToPage 结束打印页。 
hDC 所选打印机的设备描述体。