我做了一个VB的打印的练习程序,使用的是图片框。
现在的问题是,我打印,只打印的出空白,上面的字,我却打不出来。
很初级的问题,希望大家帮助我。
程序在如下地址:
http://love.hs3w.com/vbp.rar代码如下:Private Sub cmd1_Click()
p2.Line (600, 2400)-(6000, 2400)
p2.CurrentX = 550
p2.CurrentY = 2200
p2.Print "你好"
End SubPrivate Sub cmd2_Click()
Printer.NewPage
Printer.Print p2
Printer.EndDoc
End SubPrivate Sub Command1_Click()
Unload Me
End SubPrivate Sub Form_Load()
p2.Line (600, 2400)-(6000, 2400)
p2.CurrentX = 950
p2.CurrentY = 2200
p2.Print "你好吗"
End Sub
现在的问题是,我打印,只打印的出空白,上面的字,我却打不出来。
很初级的问题,希望大家帮助我。
程序在如下地址:
http://love.hs3w.com/vbp.rar代码如下:Private Sub cmd1_Click()
p2.Line (600, 2400)-(6000, 2400)
p2.CurrentX = 550
p2.CurrentY = 2200
p2.Print "你好"
End SubPrivate Sub cmd2_Click()
Printer.NewPage
Printer.Print p2
Printer.EndDoc
End SubPrivate Sub Command1_Click()
Unload Me
End SubPrivate Sub Form_Load()
p2.Line (600, 2400)-(6000, 2400)
p2.CurrentX = 950
p2.CurrentY = 2200
p2.Print "你好吗"
End Sub
Private Sub cmd2_Click()
Printer.NewPage
Printer.Print p2
Printer.EndDoc
End Sub
这一段吗?
是改成Private Sub cmd2_Click()p2AutoRedraw=TruePrinter.NewPage
Printer.Print p2
Printer.EndDoc
End Sub这样吗?不好意思,我对VB不熟,我主要做网页的。向各位高手请教了!