调出了WINDOWS的打印设置窗口(SHOWPRINTER),如何传递打印序列??

解决方案 »

  1.   

    With CmnDlg
    '            .ShowPrinter
                .PrinterDefault = False
                .FLAGS = cdlPDReturnDefault
                .FLAGS = cdlPDPrintSetup Or cdlPDReturnIC
                .CancelError = True         ' 在用户点击取消按钮时产生cdlCancel错误
                           
                On Error Resume Next
                .ShowPrinter
                
                ' 如果用户取消了选择就退出
                If Err.number = cdlCancel Then
                    Exit Sub
                End If            On Error GoTo 0            '在这如何知道用户选择的是哪台打印机?
            End With