Stampare un immagine

[Stacco]

Ciao a tutti, il mio problema è che devo stampare un tot di campi in una pagina e volevo stamparli come in una griglia.
Se creo la griglia come file immagine in formato A4, e tramite il posizionamento x e y dei campi glieli stampo sopra. Funziona?:master:
Anche se non funzionasse, potete dirmi come faccio a stampare un immagine che ho in C:\Immagine.bmp...
Grazie mille

[scancode]

Private Sub Command1_Click()
Dim myPict As Picture
Set myPict =
LoadPicture("C:\Immagine.bmp")
Printer.PaintPicture myPict, 10, 10
Printer.EndDoc
End Sub



ciao

[Stacco]

Grazie mille mille!

[tas]

Se creo la griglia come file immagine in formato A4, e tramite il posizionamento x e y dei campi glieli stampo sopra. Funziona?

Non mi sembra una buona idea, così facendo rischi di avere una stampa abbastanza lenta. Perchè non usi il metodo Line per costruirti la griglia?

Private Sub Command1_Click()
   Dim i As Integer
   Dim j As Integer
   Const w As Single = 30
   Const h As Single = 8

   Printer.ScaleMode = vbMillimeters
   Printer.DrawWidth = 2

   For i = 0 To 4
      For j = 0 To 9
         Printer.Line (i * w, j * h)-Step(w, h), RGB(0, 0, 0), B
      Next
   Next

   Printer.EndDoc
End Sub

[RAVALON]

Se stai usando un DB ti conviene interfacciarti con il DataEnvironment e associare poi un DataReport (trovi tutto sul VB)

Dopodichè dovrai solo disegnare il report(e quindi le griglie che vuoi) e associare ad ogni settore della pagina un campo dati

Trovi tutte le spiegazioni sull'MSDN

All'inizio è un pochino complicato ma funziona benone...