Revenir en arrière "Line Input"

Question

Bonjour voici le code que j'utilise je souhaiterais savoir s'il est possible de revenir en arrière dans la boucle

        Open (ListeDossier(num) & "\T_REPLI.LS") For Input As #1
        Line Input #1, LigneText
        While Not EOF(1)
            Line Input #1, LigneText
            LigneText = Trim(LigneText)
            If InStr(3, LigneText, "UFRAME", 1) <> 0 Then Check_Frame (9)
            If InStr(3, LigneText, "UTOOL", 1) <> 0 Then Check_Tool (1)
            If InStr(3, LigneText, "PAYLOAD", 1) <> 0 Then Check_Payload (1)
            If InStr(3, LigneText, "CTRLPOSITION", 1) <> 0 Then Check_CTRL (2)

        Wend

je m'explique :)

Par exemple je vais trouvé UFRAME mais je sais que la ligne juste avant (qui sera toujours présente) m'intéresse il y a t'il un moyen de revenir sur la ligne d'avant?

Invité · Accepted Answer

A ma connaissance, avec Line Input vous ne pouvez pas revenir en arrière Ce que vous pouvez faire, c'est mettre les lignes lues dans une variable tableau, vous pourrez ainsi naviguer comme bon vous semble A+...