Question

我想用VB打印一个JPG图片

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

Answer 1

'添加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

Answer 2

'添加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

Answer 3

在command1的click事件里写：

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