麻烦大家帮我看看嘛,我的代码如下:Private Sub Command3_Click()DOC.ScaleMode = 7 'DOC为PICTURER控件
Printer.ScaleMode = 7Printer.DrawWidth = 2
DOC.DrawWidth = 2DOC.Line (2, 2)-(8, 8)
Printer.Line (2, 2)-(8, 8)
Printer.EndDoc
End Sub
在预览的时候,线条看上去粗,但打印出来时,却很细,字体也是一样的,怎么回事呢?谢谢帮我看看!
Printer.ScaleMode = 7Printer.DrawWidth = 2
DOC.DrawWidth = 2DOC.Line (2, 2)-(8, 8)
Printer.Line (2, 2)-(8, 8)
Printer.EndDoc
End Sub
在预览的时候,线条看上去粗,但打印出来时,却很细,字体也是一样的,怎么回事呢?谢谢帮我看看!
printer.paintpicture picture1.image, 0, 0
不过图形打印效果不好!!!!
建议你在实际打印的时候将线再调粗一点不就行了吗?