Запись текста в текстовый файл

Будем записывать текст из TextBox1 в текстовый файл.

На форму кидаем один TextBox и две кнопки (Button).

Первый способ записи:

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim сохранить As New SaveFileDialog ' Создаем новый элемент "диалог сохранения"
        сохранить.Filter = "Файлы .txt|*.txt" ' Фильтр для сохранения(.txt)
        If сохранить.ShowDialog = DialogResult.Cancel Then Exit Sub ' Обезопасим себя от ошибки, если мы не нажали на ок, то диалог закроется.
        Dim запись As String ' Переменная для хранения текста
        запись = TextBox1.Text ' Заполняем переменную
        FileOpen(1, сохранить.FileName, OpenMode.Output) ' Создает и открывает файл
        Print(1, запись, "") ' Записывает текст в файл
        FileClose(1) ' Закрывает файл
        MsgBox("Сохранился в - " & сохранить.FileName, , "Запись текста в текстовый файл") ' Показываем сообщение куда сохранился файл
    End Sub
End Class

filestreet Запись текста в текстовый файл

Второй способ:

  Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim сохранить As New SaveFileDialog ' Создаем новый элемент "диалог сохранения"
        сохранить.Filter = "Файлы .txt|*.txt" ' Фильтр для сохранения(.txt)
        If сохранить.ShowDialog = DialogResult.Cancel Then Exit Sub ' Обезопасим себя от ошибки, если мы не нажали на ок, то диалог закроется.
        Dim запись As New System.IO.StreamWriter(сохранить.FileName) ' Реазилзует запись символов в файл
        запись.Write(TextBox1.Text) ' Записываем в файл текст
        запись.Close() ' Закрываем файл
        MsgBox("Сохранился в - " & сохранить.FileName, , "Запись текста в текстовый файл") ' Показываем сообщение куда сохранился файл
    End Sub

filestreet2 Запись текста в текстовый файл

Полная статья - Запись и чтение в VB.NET

  Метки:
  Евгений
  Просмотров: 13 187
  Запись опубликована в 14:03

5 комментариев

  • Здравствуй дорогой друг!
    Специально зарегистрировался, чтобы поблагодарить за статью.
    Осталось немного - постараться перевести с VB на C#.

    Если слышишь меня, можешь положить конец моим мучениям и дать тот же код на C#? А то я боюсь не смогу перевести(хоть они и похожи)
    Спасибо в любом случае, по коду в статье я хоть смогу разобраться: кто-куда-кому-чего.
    С уважением, Юрий.

Есть что сказать? Тогда действуй!


:wink: :twisted: :roll: :oops: :mrgreen: :lol: :idea: :evil: :cry: :arrow: :?: :-| :-o :-P :-D :-? :) :( :!: 8-O 8)