[VB6] Come stampare una picture e tutto il suo contenuto ?

[pascan2]

Salve, qualcuno potrebbe aiutarmi? ecco il problema:
devo stampare una picture che contiene a sua volta qualche label ed un' immagine.
grazie

[LMondi]

Ciao pascan2,
posto due esempi, vedi tu quale funziona meglio:

'Stampare un grafico prodotto con MsChart
'Se il grafico si chiama ad esempio MSChart1.
'Usa le seguenti istruzioni:
Private Sub Command1_Click()
Clipboard.Clear
MSChart1.EditCopy
Printer.PaintPicture Clipboard.GetData, 0, 5000
End Sub
'Si copia il grafico negli appunti e lo trasferisci alla stampante.
'I valori 0 e 5000 sono le coordinate di stampa.

'Secondo metodo per stampare un'Immagine:
Private Sub Command2_Click()

Dim imgStampa As StdPicture

Set imgStampa = LoadPicture("D:\Elaborazioni\VBEsempi\StampaGraf\Sfondo.Bmp")

Printer.ScaleMode = 3 '(pixel)
Printer.PaintPicture imgStampa, 50, 50, 380, 285
Printer.EndDoc

End Sub