Listen Problem

  • VB6

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von l1ttl3.

    Listen Problem

    Hallo!

    Visual Basic-Quellcode

    1. Dim xDat As String
    2. xDat = "results.txt"
    3. Dim FF As Integer
    4. FF = FreeFile
    5. If Dir(xDat) <> "" Then
    6. Open xDat For Input As #FF
    7. Do While Not EOF(FF)
    8. Line Input #FF, zeichen
    9. List2.AddItem zeichen
    10. Loop
    11. Close #FF


    Ich sitze zurzeit an einem Programm das u.a. jede Zeile aus einer Txt auslesen soll und anschließend in eine Liste einfügen soll.

    Bloß es fügt immer nur die oberste Zeile an und ich finde den Fehler immer noch nicht.


    Hat jemand eine Ahnung woran das liegen könnte???

    EDIT by Mad Andy:
    VB-Tag eingefügt.

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Mad Andy“ ()

Facebook
Telefonspende