我想用VB打印一个JPG图片

来源:百度知道 编辑:UC知道 时间:2024/06/28 07:45:42
我有一个daisy.jpg文件放在D盘根目录,我想按一个command1按钮,就把它打印出来,打印机已经安装好,可以正常打印.
如何实现?
两位的方法都不行,生成.exe文件时,提示编译错误:类型不匹配.
语句停在"d:\daisy.jpg"上面.
谢谢两位,问题已经解决,原来是要用loadpicture.

'添加Picture1,并将其autoredraw和autosize属性设置为true,然后添加个按钮,下面是代码
Private Sub Command1_Click()
    Picture1.Picture = "d:\daisy.jpg"
    Printer.Orientation = 2
    Printer.PaintPicture Picture1.Image, 0, 0, Picture1.Width, Picture1.Height
    Printer.EndDoc
End Sub

在command1的click事件里写:

Printer.PaintPicture "D:\daisy.jpg"
Printer.EndDoc