打印机支持自定义纸张,但我的程序代码不能控制实现,而且是在win98下,不是2000系统。
连个表头都打不出来。不改代码,在系统内设置一下打印机的自定义纸张,就可以正常打印了。但我只想在程序内设置内。求大侠指点迷津。我的代码如下: Dim myPrint As Printer
Set myPrint = Printer
With myPrint
.PaperSize = vbPRPSUser
.ScaleMode = 6
.Orientation = 2
.Width = 400
.Height = 550
.ScaleLeft = -5
.ScaleTop = 30
.CurrentX = 0
.CurrentY = 40
.Font = "黑体"
.FontSize = 26
Printer.Print Tab(30); "生 产 日 况 表"
连个表头都打不出来。不改代码,在系统内设置一下打印机的自定义纸张,就可以正常打印了。但我只想在程序内设置内。求大侠指点迷津。我的代码如下: Dim myPrint As Printer
Set myPrint = Printer
With myPrint
.PaperSize = vbPRPSUser
.ScaleMode = 6
.Orientation = 2
.Width = 400
.Height = 550
.ScaleLeft = -5
.ScaleTop = 30
.CurrentX = 0
.CurrentY = 40
.Font = "黑体"
.FontSize = 26
Printer.Print Tab(30); "生 产 日 况 表"
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货