怎样用代码设定默认打印机

jicheng · 发表于 2008-12-31 16:24:46

\\zch\Epson LQ-1600K　　　　.

\\whb\hp LaserJet 1320 PCL 6

怎样用代码设定其中一台打印机为默认的呀?

[ 本帖最后由 jicheng 于 2008-12-31 16:27 编辑 ]

Henry D. Sy · 发表于 2008-12-31 16:49:55

直接设置为默认打印机不就行了
一定要用代码的话，就试试
Dim prtDefault As Printer

Set Application.Printer = Application.Printers(0)

Set prtDefault = Application.Printer

huangdexun · 发表于 2009-8-7 11:35:42

在设计报表的时候，它会记忆下设计时的情况，但换了环境，每次打印的时候都会有提示，很麻烦。

elong · 发表于 2009-8-12 12:00:52

顶一下

dbbygzy · 发表于 2010-7-17 16:39:34

xuexil

yihesmxx · 发表于 2010-7-23 10:16:35

学习学习

闲心 · 发表于 2012-11-19 11:26:46

请问版主:该代码应放在哪儿?我是菜鸟

帐号		自动登录	找回密码
密码			注册

[Access本身] 怎样用代码设定默认打印机

群介绍
主题无相 (随机显示版	同地区群块其他地区)