Hey
Er ved at lave det tegne program fra VB6.0 bogen (kap 16).. men hvordan indsætter jeg en udskriftsfunktion i min menu (side 184) eller retter sagt hvad er commandoen for udskrift?
Ligesom "Åben" funktionene er skrevet på side 185 osv. hvordan skal udskrift koden så se ud??
Prøv det her:
Private Sub udskriv()
For x = 0 To picture1.ScaleWidth
For y = 0 To picture1.ScaleHeight
Printer.PSet (x, y), picture1.Point(x, y)
Next y
Next x
End Sub
Jeg har ikke prøvet den, men jeg tror det virker...