Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab
Autor: Geo
Datum: 29.05.03 14:10
Dieter meine Schuld habe das Problem gefunden, aber noch keine Lösung. Die ersten 10 reihen sind keine Arrays. Endschuldigung für den Aufwand. Geo Dim sLine As String Dim F As Integer Dim sFile As String sFile = Text1.Text & ".txt" F = FreeFile Open sFile For Input As #F Input #a, Nr Input #a, Nam Input #a, Strasse Input #a, Ort Input #a, Telefon Input #a, Anfahrt Input #a, Bemerkung Input #a, melden Input #a, Größe Input #a, Erste Input #a, Nr1 Input #a, Nam1 Input #a, Strasse1 Input #a, Ort1 Input #a, Telefon1 Input #a, Anfahrt1 Input #a, Bemerkung1 Input #a, melden1 While Not EOF(F) Line Input #F, sLine Wend Close #F With Printer .ScaleMode = 6 .Font = "Ariel" .FontSize = 12 .CurrentX = 8 .CurrentY = 8 Printer.Print "Nr. :"; Tab(30); Nr & Chr(10) .CurrentX = 8 Printer.Print "Name :"; Tab(30); Nam & Chr(10) .CurrentX = 8 Printer.Print "Strasse :"; Tab(30); Strasse & Chr(10) .CurrentX = 8 Printer.Print "Ort :"; Tab(30); Ort & Chr(10) .CurrentX = 8 Printer.Print "Telefon :"; Tab(30); Telefon & Chr(10) .CurrentX = 8 Printer.Print "Anfahrt :"; Tab(30); Anfahrt & Chr(10) .CurrentX = 8 Printer.Print "Bemerkung :"; Tab(30); Bemerkung & Chr(10) .CurrentX = 8 Printer.Print "melden :"; Tab(30); melden & Chr(10) .CurrentX = 8 Printer.Print "Größe :"; Tab(30); Größe & Chr(10) .CurrentX = 8 Printer.Print Replace(sLine, "|", vbTab) Printer.EndDoc End With

Array aus .txt Drucken ohne Trennzeichen dafür mit Tab	588	Geo	29.05.03 06:09
Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab	335	Dieter	29.05.03 08:41
Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab	327	Geo	29.05.03 09:19
Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab	362	Dieter	29.05.03 09:54
Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab	321	Geo	29.05.03 14:10
Re: Texte und Array aus .txt Drucken	308	Geo	29.05.03 19:24

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen