ПОНЯТНО О Visual Basic NET (том 3)




Простейший текстовый редактор


Создадим простейший текстовый редактор. Для этого разместим на форме текстовое поле, две кнопки и элементы управления SaveFileDialog и OpenFileDialog. Текстовое поле сделаем многострочным и снабдим его вертикальной полосой прокрутки (см. 3.4.2). В работе наш проект должен выглядеть так, как на Рис. 20.2.

Рис. 20.2

В текстовое поле мы вводим произвольный текст, затем нажатием на кнопку Сохранить помещаем на экран диалоговое окно сохранения файла, после чего обычным образом выбираем в нем произвольный текстовый файл (с расширением txt) из уже существующих или вводим обычным образом в диалоговое окно имя нового текстового файла и весь текст из текстового поля записываем в него.

Аналогично нажатием на кнопку Открыть помещаем на экран диалоговое окно открытия файла, затем обычным образом выбираем в нем произвольный текстовый файл (с расширением txt) и весь текст из него открываем в текстовом поле. После чего редактируем текст и снова сохраняем.

Вот программа:

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        SaveFileDialog1.ShowDialog()                                        'Показать диалоговое окно сохранения файла

        Dim Файл As String = SaveFileDialog1.FileName           'Это имя файла выбрано из диалогового окна

        Dim Запись As New System.IO.StreamWriter(Файл)        'Открываем выбранный файл для записи

        'Запись всего текста из текстового поля  в выбранный файл:

        Запись.Write(TextBox1.Text)

        Запись.Close()                                                                'Закрываем файл

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        OpenFileDialog1.ShowDialog()                                        'Показать диалоговое окно открытия файла

        Dim Файл As String = OpenFileDialog1.FileName          'Это имя файла выбрано из диалогового окна

        Dim Чтение As New System.IO.StreamReader(Файл)     'Открываем выбранный файл для чтения




Содержание  Назад  Вперед