Textfelder Speichern oder Ausdrucken

Computer: Software & Programmierung Visual Basic
#1

Guten Tag,

Ich will im Voraus zwei dinge Klarstellen:

  • Ich hab die Suchmaschine benutzt, und bin wegen Punkt 2 nicht fündig
    geworden
  • Ich hab von diesem Speziellen Thema (Speichern und/ oder Ausdrucken)
    keine Ahnung. Deshalb bitte ich um eine Verständliche Erklärung, die
    auch Leute verstehen, die sich nicht Tag und nacht damit
    beschäftigen. (z. B. ich :wink:

Ich danke euch schon mal für eure Hilfe!

MfG

Alex

#2

Hallo Alex,

jetzt hast Du nur noch vergessen zu erzählen, worum es geht. :smile:

Textfelder, deren Inhalt man drucken kann kenne ich in VB und VBA.

Die Codes sind unterschiedlich, welchen brauchst Du?

Gruß Rainer

#3

VB

Es soll ein oder mehrere Textfelder gedruckt werden.

#4

hallo,

in VB6 einfach mit dem Printer-Objekt.
Die Intelleisense hilft dabei. Nur mal ein Beispiel …

Option Explicit

Private Sub Command1\_Click()
 Dim txt As String
 txt = Text1.Text
 'hier kannst Du etwas einstellen, musst Du aber nicht
 '\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
 Printer.Orientation = 1
 Printer.ScaleMode = 3 'Millimeter
 Printer.CurrentX = 30
 Printer.CurrentY = 20
 '\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
 Printer.Print txt
 'Falls ein weiteres Blatt kommt ...
 Printer.NewPage
 Printer.Print "Druck mal etwas"
 Printer.EndDoc
End Sub

Gruß Rainer