Und wieder die Loadfunktion -_-' Verfasst am: 23.05.2007, 19:47
Ja wieder..
Ich trage verschiedene Namen in die Listboxein, und speicher sie in einer TXT.
Jetzt lad ich die TXT in die Listbox und der gibt zwar die korrekte Anzahl, der vorher eingegeben Namen ein, jedoch immer nur den Namen des 2. Eintrags..
SAVE:
Name a
Name b
Name c
Name d
LOAD:
Name b
Name b
Name b
Name b
[code]Private Sub load_Click()
'Laden
Dim ff As Integer
Dim daten As String
Dim listdaten() As String
ff = FreeFile
Open "C:/test.txt" For Input As ff
daten = Input(LOF(ff), ff)
Close ff
listdaten = Split(daten, vbCrLf)
For i = 0 To UBound(listdaten) - 1
List1.AddItem listdaten(i)
Next i
End Sub[/code]
Ich schieß noch jmd. ab ey.. -_-
ZiG_ Überflieger
Anmeldedatum: 07.03.2007 Beiträge: 1248
Verfasst am: 23.05.2007, 20:48
Hat sich über ICQ geklärt. War ein Fehler beim speichern der Textdatei.
-closed- Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
Registrieren
Login
