Hallo erstmal!
und grüße an alle!
Ich habe gerade erst angefangen mit VB zu lernen und versuche mir erstmal alles so einfach wie möglich zu machen. Deshalb benutze ich den CommonDialog, allerdings bin ich da auf ein paar Probleme gestoßen, denn wenn ich auf Abbrechen klicke im Open -, SaveDialog dann gibt der Editor einen Fehler aus. Das Konnte ich noch lösen, aber im PrintDialog ist das nicht mehr so einfach. Obwohl ich auf Abbrechen drücke, druckt er Trozdem noch eine Seite, hier ist mein Quelltext dazu:
Private Sub cmd_printer_Click()
Dim x As Printer
For Each x In Printers
Set Printer = x
Next
With CommonDialogprint
.Flags = cdlPDPrintSetup
.ShowPrinter
Printer.Print edited.Text 'ICh weis das hier ein Fehler ist, aber ich kann
'den niht lösen.
Printer.EndDoc
End With
End Sub
Da Ja jeder CommonDialog einen Abbruch Bottom hat, wie kann ich den nutzen
und grüße an alle!
Ich habe gerade erst angefangen mit VB zu lernen und versuche mir erstmal alles so einfach wie möglich zu machen. Deshalb benutze ich den CommonDialog, allerdings bin ich da auf ein paar Probleme gestoßen, denn wenn ich auf Abbrechen klicke im Open -, SaveDialog dann gibt der Editor einen Fehler aus. Das Konnte ich noch lösen, aber im PrintDialog ist das nicht mehr so einfach. Obwohl ich auf Abbrechen drücke, druckt er Trozdem noch eine Seite, hier ist mein Quelltext dazu:
Private Sub cmd_printer_Click()
Dim x As Printer
For Each x In Printers
Set Printer = x
Next
With CommonDialogprint
.Flags = cdlPDPrintSetup
.ShowPrinter
Printer.Print edited.Text 'ICh weis das hier ein Fehler ist, aber ich kann
'den niht lösen.
Printer.EndDoc
End With
End Sub
Da Ja jeder CommonDialog einen Abbruch Bottom hat, wie kann ich den nutzen