Изменение разрешения доступа к файлу текстового файла при открытии VB

Question

Я ищу, чтобы изменить разрешение доступа текстового файла от Input to Append в зависимости от того, какая операция должна выполняться в коде. Он устанавливается на входе при открытии в качестве первой операции для чтения данных, но как мне изменить его на Append, не закрывая файл?

Мой код:

FileOpen(1, username & DateTime.Now.ToString(" hh-mm dd-MM-yyyy") & ".txt", OpenMode.Input) 
    'y = senArray.Count 

    For Each x In senArray 
      If LineInput(1) = senArray(x) Then 
       lineTemp = LineInput(1) 
       PrintLine(1, lineTemp & " " & j) 
       If LineInput(1) = "" Then 
        PrintLine(1, senArray(x) & " " & j) 
       End If 
      Else 
      End If 
      j += 1 
    Next 
    FileClose(1) 

Answer 1

свойства файла не может быть изменен, пока он открыт, я предлагаю использовать что-то такое, как File.AppendAllText или что-то больше подходит для того, что вам нужно сделать, которые в основном реализует FileOpen и все это, но лучше справляется с этим и, вероятно, быстрее.