打印报表的时候如何选择不同的打印机打印(假设一台机子上连着两台打印机)?

ghxi2001 2003-01-10 02:30:14
实际上是我设了两种类型的报表格式,一种要用普通打印机打印,另一种需要使用票据打印机。我想在程序里设定票据报表的打印用默认打印机——票据打印机,如何实现?多谢大家帮忙!
...全文
106 点赞 收藏 11
写回复
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
kmcyz 2003-01-13
"再请教一下,如果另一程序同样要使用两台不同的打印机,其中一台为网络打印机,用上面的程序也能找到网络打印机吗?"

没问题!
回复
leyonben 2003-01-13
用 commondialog 调用 打印机设置,
更改默认打印机,然后打印的时候就会打印到默认打印机咯
回复
ghxi2001 2003-01-12
再请教一下,如果另一程序同样要使用两台不同的打印机,其中一台为网络打印机,用上面的程序也能找到网络打印机吗?
回复
xuxun 2003-01-11
如果要灵活一点,可以调出选择打印机的界面(系统自带的)来进行设置嘛
回复
FreshAir 2003-01-11
1.查看“设定-打印机”画面,将两台打印机的名字记录下来,
为了方便说明起见,不妨假设为PRINTER-A和PRINTER-B。

2.编写下述公用子程序。
Sub PsSelectPrinter(AstrPrinter As String)
Dim i As Integer
For i=0 to Printer.Count-1
If Printers(i).DeviceName = AstrPrinter then
Set Printer = Printers(i)
Exit For
End If
Next i
End Sub

3.指定打印机:
指定第一台打印机时,使用Call PsSetPrinter("PRINTER-A")
指定第二台打印机时,使用Call PsSetPrinter("PRINTER-B")
回复
ghxi2001 2003-01-11
请各位兄弟姐妹多帮帮我的忙啊!!!
回复
ghxi2001 2003-01-11
我用的是自带的datareport
楼上的兄弟,每次只有一个打印对象阿,只是要判断选择哪个打印机
回复
ccbl 2003-01-10
对不起 PRINTERS
回复
ccbl 2003-01-10
VB中的打印对象可以选择当前打印机
DIM I A LONG
FOR I=0 TO PRINTER。COUNT-1
。。。循环每个打印对象
next
回复
逍遥鹰王 2003-01-10
up
回复
connonrocket 2003-01-10
你用的的 是什么 报表 ?
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7453

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告