Print a user form image

A

Alberto Ast

I learn how to print a text as follows

Private Sub CommandButton3_Click()
Dim intOutFile As Integer 'number for the output file
intOutFile = FreeFile 'get a file number
Open "c:\temp\temp.txt" For Output As intOutFile
Print #intOutFile, Print_Dev.TextBox1.Text
Close intOutFile
Shell "c:\windows\notepad.exe /P c:\temp\temp.txt"
Kill "c:\temp\temp.txt" 'delete the file if desired
End Sub

Now I would like to print an image as well... I tried modifying this

Print #intOutFile, Print_Dev.TextBox1.Text

for this

Print #intOutFile, Print_Dev.image1.picture, Print_Dev.TextBox1.Text

but did not work... it just print a series of numbers.

Any idea?
 
A

Alberto Ast

Thanks... it does not print as good as previous function but it does it as
requeste...
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top