Передать ссылку на текстовый файл в процедуру - VBA

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

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

Здравствуйте! Есть пример кода для добавления информации в текстовый файл
Как для такого формата передавать ссылку на файл в процедуру? P.S. Найти решение не получилось, гугл меня совершенно не так понимает

Решение задачи: «Передать ссылку на текстовый файл в процедуру»

textual
Листинг программы
Private Sub Test()
    Dim iFileNumber%
    iFileNumber = FreeFile
    
    Open "D:\1.txt" For Output As #iFileNumber
        PrintTextFile iFileNumber
    Close #iFileNumber
End Sub
 
Private Sub PrintTextFile(iFileNumber%)
    Print #iFileNumber, "Наш текст"
End Sub

ИИ для рефератов и докладов


  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

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

7   голосов , оценка 4.429 из 5