vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Array aus .txt Drucken ohne Trennzeichen dafür mit Tab 
Autor: Geo
Datum: 29.05.03 06:09

Hallo alle im Forum

Bitte um Hilfe komme nicht weiter
Eine Array aus ListBoxen in eine .txt schreiben geht,
genauso das einlesen in die ListBoxen Ok.
Aber das Drucken der Array ohne Trennzeichen dafür mit Tab bekomme ich einfach nicht in die reihe.

In .txt Schreiben

t = "|"
a = FreeFile
s = Text1.Text & ".txt"
Open s For Output As #a
For i = 0 To 4
If List1(i).ListCount = 0 Then
Print #a, String$(4, t)
Else
For save& = 0 To List1(i).ListCount - 1
Print #a, List1(0).List(save&); t; List1(1).List(save&); t; List1(2).List(save&); t; List1(3).List(save&); t; List1(4).List(save&)
Next save&
End If
Close #a
Next

Aus .txt lesen und in ListBoxen einfügen

ReDim myArray(4)
List1(0).Clear
List1(1).Clear
List1(2).Clear
List1(3).Clear
List1(4).Clear
t = "|"
a = FreeFile
s = Text1.Text & ".txt"
Open s For Input As #a
While Not EOF(a)
Line Input #a, s
myArray = Split(s, t)
For i = 0 To 4
List1(i).AddItem myArray(i)
Next i
Wend

Mein Versuch ?

Case "Drucken"
Dim i As Long
Dim a As Long
Dim myArray() As String

t = "|"
a = FreeFile
s = Text1.Text & ".txt"
Open s For Input As #a
While Not EOF(a)
ReDim Preserve myArray(i)
Input #a, s
myArray(i) = s
i = i + 1
Wend
Close #a
For i = 0 To (UBound(myArray) - LBound(myArray) - 1)
Clipboard.Clear
Clipboard.Set Text myArray(i) & vbCrLf
Next

Printer.Print Clipboard.Get.Text
End Doc
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Array aus .txt Drucken ohne Trennzeichen dafür mit Tab588Geo29.05.03 06:09
Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab334ModeratorDieter29.05.03 08:41
Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab327Geo29.05.03 09:19
Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab361ModeratorDieter29.05.03 09:54
Re: Array aus .txt Drucken ohne Trennzeichen dafür mit Tab320Geo29.05.03 14:10
Re: Texte und Array aus .txt Drucken308Geo29.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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel