Практическое руководство. Запись текста в файлы в Visual Basic
Метод WriteAllText можно использовать для записи текста в файлы. Если заданный файл не существует, он будет создан.
Процедура
Запись текста в файл
Используйте метод WriteAllText для записи текста в файл, указывая файл и текст, который требуется записать. В этом примере строка "This is new text." записывается в файл test.txt, при этом текст добавляется к тексту, имеющемуся в файле.
My.Computer.FileSystem.WriteAllText("C:\TestFolder1\test.txt", "This is new text to be added.",True)
Запись набора строк в файл
Выполните цикл по коллекции строк. Используйте метод WriteAllText для записи текста в файл, указав конечный файл, строку, которую требуется добавить, и присвоив параметру append значение True.
В этом примере имена файлов в каталоге Documents and Settings записываются в файл FileList.txt, при этом между каждой записью вставляется символ перевода строки для удобства чтения.
For Each foundFile As String In My.Computer.FileSystem.GetFiles("C:\Documents and Settings") foundFile = foundFile & vbCrLf My.Computer.FileSystem.WriteAllText( "C:\Documents and Settings\FileList.txt", foundFile, True) Next
Отказоустойчивость
Исключение может возникнуть при следующих условиях.
Путь является недопустимым по одной из следующих причин: Он является строкой нулевой длины, содержит только пробелы, содержит недопустимые символы, или это путь устройства (начинается с \\. \) (ArgumentException).
Путь не является допустимым, поскольку он равен Nothing (ArgumentNullException).
Параметр File содержит несуществующий путь (FileNotFoundException или DirectoryNotFoundException).
Файл уже используется другим процессом или происходит ошибка ввода-вывода (IOException).
Длина пути превышает максимальную длину, определенную в системе (PathTooLongException).
Имя файла или каталога в пути содержит двоеточие (:) или имеет недопустимый формат (NotSupportedException).
У пользователя отсутствуют необходимые разрешения на просмотр пути (SecurityException).
Диск заполнен, и вызов метода WriteAllText завершился неудачно (IOException).
Если код выполняется в контексте частичного доверия, исключение может возникнуть из-за недостатка прав доступа. Дополнительные сведения см. в разделе Основы управления доступом для кода.
См. также
Задачи
Практическое руководство. Чтение из текстовых файлов в Visual Basic