Drucken,Oeffnen,Speichern?

Hallo

Ich habe drei Textfelder, wie schaffe ich es jetzt ganz einfach
wenn ich auf einen Button Klicke diese auszudrucken.

Und wie sie zu Speichern und zu Öffnen!!!

Gruss Beni

private sub btnSave\_Click ()
 open "dateiname" for Output as #1
 print #1, text1
 print #1, text2
 print #1, text3
 close #1
end sub

private sub btnLoad\_Click ()
 open "dateiname" for Input as #1
 line input #1, l: text1=l
 line input #1, l: text2=l
 line input #1, l: text3=l
 close #1
end sub

private sub btnPrint\_Click ()
 Printer.print text1
 Printer.print text2
 Printer.print text3
end sub

DRUCKEN GEHT NICHT!!!
Hallo

Ich habe noch ein Problem, das Speichern und Laden geht perfekt!!!
Aber beim Drucken, kommt nach einer bestimmten Zeit „Druckerfehler“
kann es sein das es nicht geht, weil mein Drucker an einem Printserver
angeschlossen ist. Und es zuerst über das Netzwerkkabel zum Printserver
geht???

BITTE HELFT MIR!!!

Gruss Beni

Speichern geht nicht!!!
Hallo

Das Speichern geht nicht!!!
Es funktioniert aber sehr heufig tut es nicht alles abspeichern!!! Was ist da los!!

Gruss Beni