怪!怪!帮我看看这是为什么?(在线等待)
with printer
.ScaleMode = vbMillimeters
.PaperSize = vbPRPSUser
.Height = 14 * 567
.Width = 14 * 567
Printer.Print ""
.CurrentX = 46
.CurrentY = 13
.FontSize = 17
.FontBold = True
Printer.Print "收据"
.DrawStyle = 2
Printer.Line (15, 77)-(113, 77), , B
.enddoc
end with
问题是:当打印第一次时,打出来的是所要的点滑线,但打印第二次后却是实线不知为什么?是不是要释放什么资源?请各位帮忙!!!