Программирование
Веб программирование

Классы в VB.Net. Класс StreamWriter. Запись в файл

 
 

Для записи в файл есть класс StreamWriter(вобще классов для записи/чтения в .Net много, но этот наверное самый лучший), сейчас сделаем программу, которая будет записывать текст в файл. Код:

Imports System
Imports System.IO

Public Class Form1
Inherits System.Windows.Forms.Form

Windows Form Designer generated code

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load' При загрузке формы:
Dim f As New StreamWriter("D:Test1.txt", False, System.Text.Encoding.GetEncoding(1251)) ' Открываем файл "D:Test1.txt", Если поставить не False а True, то запись будет в конец файла. Т.е. если в файле уже есть текст, то этот текст стераться не будет, а новый будет добавляться в конец. Если файла не существует, то он создаваться не будет. А если же поставить False, то если в файле был текст, то он стерается, и запись идет в пустой файл. Если файла не существует, то он создается. Дальше идет тип кодировки, в нашем случае это стандартная 1251
f.Write("'Программируем на Visual Basic`e' - лучший учебник!")' Записываем в файл 1.txt текст
f.Close()' Закрываем файл
End Sub
End Class

Исходник


Есть вопросы? Спроси на нашем форуме!!
Алекс [20.12.2010 23:56]

А как в записываемый файл вставить enter?

Миша [15.05.2011 17:48]

Заработало только вот так:
Imports System
Imports System.IO

Public Class Form1
Inherits System.Windows.Forms.Form

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load ' При загрузке формы:
Dim f As New StreamWriter("D:\Test\1.txt", False, System.Text.Encoding.GetEncoding(1251)) ' Открываем файл "D:\Test\1.txt", Если поставить не False а True, то запись будет в конец файла. Т.е. если в файле уже есть текст, то этот текст стераться не будет, а новый будет добавляться в конец. Если файла не существует, то он создаваться не будет. А если же поставить False, то если в файле был текст, то он стерается, и запись идет в пустой файл. Если файла не существует, то он создается. Дальше идет тип кодировки, в нашем случае это стандартная 1251
f.Write("'Программируем на Visual Basic`e' - лучший учебник!") ' Записываем в файл 1.txt текст
f.Close() ' Закрываем файл
End Sub
End Class

Riga [24.05.2011 13:04]

вот
"Функция перевода" + vbCrLf + "строки"

Антон [22.03.2012 14:01]

а как в файл записать значение переменной????

Прохожий [06.04.2012 17:26]

Автору респект - ".GetEncoding(1251)" никогда бы не догадался... Или не слишком скоро - похоже MSDN даже на русском пишут для англоязычных, примеров использования национальных кодировок днём с огнём не сыщешь :)

2Алекс&Riga:
f.WriteLine("text") вам поможет. Хотя vbCrLf тоже сработает. Как и vbNewLine.

2Антон:
Вместо текста указать имя переменной. Возможно предварительно привести значение переменной к строке(CStr или .ToString, если доступно для этого типа данных).



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.