Можно ли через 'Line Input #' читать построчно файлы без CR с одним лишь LF ? - VBA

Узнай цену своей работы

Формулировка задачи:

Майкрософт говорчит, что Line Input # парсит текст по строкам ориентируясь на CR или CR+LF. У меня есть логи, где строки разделяются лишь LF-ами. Можно ли чрез Line Input # построчно читать такие логи, без предварительного реплейса Chr10 на Chr13 или сплита по Chr10? Логи весят очень много, и доп время на изменение структуры весьма критично.

Решение задачи: «Можно ли через 'Line Input #' читать построчно файлы без CR с одним лишь LF ?»

textual
Листинг программы
Sub Test_Print_chr10()
    Dim MyFullName$, S$, i%
    MyFullName = "C:\temp\Test_Binary.txt"
    Open MyFullName For Binary Access Write As #1
    For i = 1 To 5
        S = String$(9, Format$(i)) & Chr$(10)
        Put #1, i * 10 - 9, S
    Next i
    Close #1
End Sub
 
Sub Test_Line_input_chr10()
    Dim MyFullName$, TextLine$
    MyFullName = "C:\temp\Test_Binary.txt"
    Open MyFullName For Input As #1
    Do While Not EOF(1)
        Line Input #1, TextLine
        Debug.Print TextLine
    Loop
    Close #1
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 4.4 из 5
Похожие ответы