读书人

PaperSize = vbPRPSUser 提示异常

发布时间: 2012-04-01 17:23:46 作者: rapoo

PaperSize = vbPRPSUser 提示错误
最近用 Printer 写了一个打印
我在本机测试打印没问题,在同屋的电脑安装打印也没有问题
但是到客户那里打印就出现 run-time error '380':Invalid property value 错误

后来我我在VB下运行 找到错误行 .PaperSize = vbPRPSUser 去掉以后 可以正常打印
请问这是什么原因啊
系统都是 XP 的 打印机也是一样的 HP1020 激光打印机

只是有一点不同 我在公司测试的时候用的是 网络共享的打印机 而在客户那里用的是本地打印机
虽然去掉 .PaperSize = vbPRPSUser 依然可以使用
但是我想弄明白是什么原因 期望大家能给我讲一下!
谢谢!

With Printer
.PaperSize = vbPRPSUser ' 用户自定义
.ScaleMode = vbTwips
.FontSize = 10 '字体大小
.FontBold = False
.FontItalic = False '斜体字
.FontUnderline = False '下划线
.ScaleLeft = 0
.ScaleTop = 0
.Width = PapeSizeW '纸张大小
.Height = PapeSizeH
.CurrentX = 0
.CurrentY = 0
End With


[解决办法]
是不是该用户没有自定义纸张?
[解决办法]
对于激光打印机,驱动程序应该不接受用户自定义纸张(固定纸张大小)
另外,这位朋友既然设置了.Width = PapeSizeW .Height = PapeSizeH,就不需要设置PageSize参数,因为设置width、height时,VB会自动将PageSize更改为vbPRPSUser

读书人网 >VB

热点推荐