打印问题，搞不明白

xiaoyimeimei · 发表于 2020-2-12 20:30:01

ObjPrint.Font.Name = "宋体"
ObjPrint.Font.Bold = False
ObjPrint.CurrentX = lCurx + lm
ObjPrint.CurrentY = lCurY
ObjPrint.Print sMtxt

ObjPrint 是object类型，传址引用的Printer对象
出现的现象是
ObjPrint.Print sMtxt这一句，马上就换页，而且无论sMtxt 有没有值，打出来的都是空白。
用Printer代替，也一样。
如查说是驱动问题，用写字板打印一段文章又好用，一点错都没有。
谁遇到过这个问题？帮个忙解决下？

entwine · 发表于 2020-4-12 19:00:01

Printer.Font.Name = "宋体"
Printer.Font.Bold = False
Printer.CurrentX = 10
Printer.CurrentY = 10
Printer.Print "你好啊!"
Printer.EndDoc
没问题
别忘加 EndDoc

呆呆龙 · 发表于 2020-4-18 14:15:01

还在搞打印啊,花100块钱买一个控件好了,比word,excel打印都全呢.

冰火之颠 · 发表于 2020-4-28 13:30:01

ObjPrint.CurrentX = lCurx + lm
ObjPrint.CurrentY = lCurY

有没有超出纸张范围阿？

xiaoyimeimei · 发表于 2020-6-5 19:45:01

lm是我写死的，以 tiwp为单位。
lCurx是从200开始，打印代码只在个别打印机上出错，一般打印机上不出错。
但客户用的就是这种能代码出错的打印机，而且客户严重不合作，坚决不换打印机。
超出纸张范围？难不成打印机能设置单位大小？以象素为单位？
可printer不能自动转吗？

xiaoyimeimei · 发表于 2020-6-6 00:30:01

lm跨度一般在900左右。

承认是马甲啦 · 发表于 2020-6-14 19:30:01

在最前面加一个：
ObjPrint.ScaleMode=vbtwips

xiaoyimeimei · 发表于 2020-7-15 16:15:01

谢谢我去试试看行不行。

xiaoyimeimei · 发表于 2020-8-3 03:00:01

还是不行，还有没有别的原因呢？

幽魂步者 · 发表于 2020-8-3 13:30:01

用控件吧 ActiveReport 很好用

		自动登录	找回密码
密码			立即注册