hi,
wie gebe ich die Zeile
„Hello World“
auf dem Drucker aus unter visual basic.
danke!
printer.CurrentX=100
printer.CurrentY=100
printer.Print "Hello World"
cu, holli
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Ich ergänze die Antwort von Markus:
Auswahl des Druckers:
’ vierten installierten Drucker auswählen
Set Printer = Printers(3)
Oder so:
Dim i as Byte
For i = 0 To Printers.Count - 1
Combo1.AddItem (Printers(i).Devicename)
Next i
Private Sub Combo1_Click()
Set Printer = Printers(Combo1.ListIndex)
End Sub
Alternativ mit Requester:
CommonDialog1.Flags = cdlPDPrintSetup
CommonDialog1.ShowPrinter
(Comdlg32.ocx einbinden)
Dann das Drucken selbst:
Printer.EndDoc 'zur Sicherheit
Printer.Print „Hello World!“
Printer.EndDoc 'und ab die Post
Das „Printer.EndDoc“ ist wichtig, weil es den Druckjob abschickt. Sonst wird erst nach Programmende gedruckt!
Ausprobiert habe ich das alles noch nicht, aber es müßte gehen.