JordyBarneveld
Gebruiker
- Lid geworden
- 12 sep 2007
- Berichten
- 49
Ik wil graag 3 tekst velden printen, wat nu wel lukt. Echter ik wil graag dat tekstveld 1 2 keer afgedrukt wordt. 1 keer vertical en 1 keer orizontaal.
Tot nu toe heb ik Orientation.vertical gevonden!
maar ik weet niet waar ik deze functie kan neerzetten?
(ben niet echt handig met deze taal!)
Private Sub PrintPageHandler(ByVal sender As Object, ByVal args As Printing.PrintPageEventArgs)
Dim myFont As New Font("Microsoft San Serif", 38)
args.Graphics.DrawString(TextToBePrinted, New Font(myFont, FontStyle.Bold), Brushes.Black, 5, 350)
'Dim myFont As New Font("Microsoft San Serif", 38)
args.Graphics.DrawString(Form1.TextBox2.Text, New Font(myFont, FontStyle.Bold), Brushes.Black, 5, 150)
args.Graphics.DrawString(Form1.TextBox3.Text, New Font(myFont, FontStyle.Bold), Brushes.Black, 5, 250)
End Sub
Tot nu toe heb ik Orientation.vertical gevonden!
maar ik weet niet waar ik deze functie kan neerzetten?
(ben niet echt handig met deze taal!)
Private Sub PrintPageHandler(ByVal sender As Object, ByVal args As Printing.PrintPageEventArgs)
Dim myFont As New Font("Microsoft San Serif", 38)
args.Graphics.DrawString(TextToBePrinted, New Font(myFont, FontStyle.Bold), Brushes.Black, 5, 350)
'Dim myFont As New Font("Microsoft San Serif", 38)
args.Graphics.DrawString(Form1.TextBox2.Text, New Font(myFont, FontStyle.Bold), Brushes.Black, 5, 150)
args.Graphics.DrawString(Form1.TextBox3.Text, New Font(myFont, FontStyle.Bold), Brushes.Black, 5, 250)
End Sub