主题：如何在打印前打开打印机窗口

 我的打印按钮代码为:

        Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")

        Dim fl As String = ProjectPath & "Reports\出库单.xls"

        Book.Build() '生成细节区

        Book.Save(fl) '保存工作簿

        Dim Proc As New Process '打开工作簿

        Proc.File = fl

        Proc.Verb = "Print" '指定动作

        Proc.Start()

按下按钮将会直接打印了

我想要在打印前先进行预缆后,然后打开打印机的对话窗口,因为我需要选择不同的打印机来打印

 

此主题相关图片如下：qq截图20110518160115.png

学这个：

 

http://help.foxtable.com/topics/2121.htm

 

还是没研究明白,狐爸给解决一下嘛,给个代码实例嘛

其实我也不会vba的。

我大概看了一下，似乎只有打印和打印预览两个方法。

谢谢楼主!

如何把选择的打印机 赋值给 Proc

对话框设置后就可以用，不需要赋值