Hallo Elitepvpers! heute zeige ich euch wie ihr in Visual Basic 2008 in 8 Schritten ganz einfach ein Programm Programmiert, dass Texte aus einem Textfeld druckt!
Fangen wir an!
Schritt 1
Wähle das Label-SteuerElement aus und ziehe es oben auf die Form! Dieses Label ist dazu adr, das der Benutzer weiss was er zu tuen hat (Anweisung)
Schritt 2
Nun Ziehe das Textbox-SteuerElement auf die Form, unterhalb des Labels, stellen die EIgenschaften auf Multi-Line und machen es etwas größer! Diese textbox beinhaltet später den Text, der gedruckt werden soll!
Schritt 3
Ziehe nun das Button - SteuerElement auf die Form, unter die Textbox in die Mitte! Der Button ist dazu dar, das der Druckvorgang später ausgeführt wird!
Schritt 4
Nun musst du die Eigenschaften so festlegen :
Label1 >> Text >> "Gebe hier den Text ein, der gedruckt werden soll"
Textbox1 >> ScrollBars >> Vertical
Button1 >> Text >> "Text drucken"
Form1 >> Text >> "Dein Fenster Titel"
Deine Form sollte jetzt ungefähr so aussehen :
[Only registered and activated users can see links. Click Here To Register...]
Schritt 5
Mache einen Doppelklick auf den Button1, um in den Code Editor zu kommen!
Schritt 6
Nun Blättere im Code Editor ganz nach oben und schreibe :
Damit wird der NameSpace-System.drawing.printing eingebunden, was ermöglicht, das die Druckfunktion genutzt werden kann!
Schritt 7
Nun blätterst du wieder in die Ereignisprozedur Button1_click herunter, um folgenden Code einzutragen :
Erläuterung steht ja im Code ;)
Schritt 8
Jetzt Blätterst du nach oben, und fügst deine eigene Sub ein :
So das wars von Mir Leute :D 80% Me Credits
20% gehen an mein Buch, von dem Ich gelernt habe ! Ich kann es euch nur empfehlen! Visual Basic schritt für schritt!
MFG JUsikid!
Fangen wir an!
Schritt 1
Wähle das Label-SteuerElement aus und ziehe es oben auf die Form! Dieses Label ist dazu adr, das der Benutzer weiss was er zu tuen hat (Anweisung)
Schritt 2
Nun Ziehe das Textbox-SteuerElement auf die Form, unterhalb des Labels, stellen die EIgenschaften auf Multi-Line und machen es etwas größer! Diese textbox beinhaltet später den Text, der gedruckt werden soll!
Schritt 3
Ziehe nun das Button - SteuerElement auf die Form, unter die Textbox in die Mitte! Der Button ist dazu dar, das der Druckvorgang später ausgeführt wird!
Schritt 4
Nun musst du die Eigenschaften so festlegen :
Label1 >> Text >> "Gebe hier den Text ein, der gedruckt werden soll"
Textbox1 >> ScrollBars >> Vertical
Button1 >> Text >> "Text drucken"
Form1 >> Text >> "Dein Fenster Titel"
Deine Form sollte jetzt ungefähr so aussehen :
[Only registered and activated users can see links. Click Here To Register...]
Schritt 5
Mache einen Doppelklick auf den Button1, um in den Code Editor zu kommen!
Schritt 6
Nun Blättere im Code Editor ganz nach oben und schreibe :
Code:
Imports System.Drawing.printing
Schritt 7
Nun blätterst du wieder in die Ereignisprozedur Button1_click herunter, um folgenden Code einzutragen :
Code:
'Fehlerhandler verwenden, um Druckprobleme abzufangen
Try
'PrintDoc-Variable mit dem Typ PrintDocument deklarieren
Dim PrintDoc As New PrintDocument()
AddHandler PrintDoc.PrintPage, AddressOf Me.PrintText
PrintDoc.Print() 'Text drucken
Catch ex As Exception 'Druckausnahme abfangen
MessageBox.Show("Leider ist beim Drucken ein Fehler aufgetreten", _
ex.ToString())
End Try
Schritt 8
Jetzt Blätterst du nach oben, und fügst deine eigene Sub ein :
Code:
'Sub-Prozedur zum Drucken von Text
Private Sub PrintText(ByVal sender As Object, _
ByVal ev As PrintPageEventArgs)
'Mit DrawString Text in einem Graphics-Objekt erstellen'
ev.Graphics.DrawString(TextBox1.Text, New Font("Arial", _
11, FontStyle.Regular), Brushes.Black, 120, 120)
'Angabe, dass dies die letzte auszudruckende Seite ist'
ev.HasMorePages = False
End Sub
So das wars von Mir Leute :D 80% Me Credits
20% gehen an mein Buch, von dem Ich gelernt habe ! Ich kann es euch nur empfehlen! Visual Basic schritt für schritt!
MFG JUsikid!