Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.92
Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.92 Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста

Коды для пункта меню Файл

Открыть

Для работы этого кода необходимо разместить на форме элемент управления OpenFileDialog.

Private Sub MenuItem2_Click(ByVal sender As _

System.Object, ByVal e As System.EventArgs) Handles _

Menultem2.Click

Dim a As OpenFileDialog = New OpenFileDialog a.Filter = "All Filesl*.*ITXT Files I*.txf If a.ShowDialog() = DialogResult.OK Then

RichTextBoxl.LoadFile(a.FileName, _

RichTextBoxStreamType.PlainText) End If

End Sub

Для работы данного кода необходимо разместить на форме элемент управления $ауеГие01а1о^

ГЛАВА 18 Т Текстовый редактор

Private Sub MenuItem3_Click(ByVal sender As System. Object, _ ByVal e As System.EventArgs) Handles Menultem3.Click Dim a As SaveFileDialog = New SaveFileDialog a. Filter = "Все файлы I * . * I Текстовый файл|*^х^' If a.ShowDialog() = DialogResult.OK Then

RichTextBoxl.SaveFile(a.FileName, RichTextBoxStreamType.PlainText)

End If End Sub

Печать

В данном случае необходимо разместить на форме элемент управления PrintDocument.

Private Sub Menu I tem3_Click( ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Menultem4.Click

PrintDocument1.Print() End Sub

Но лучше применить следующий код:

Private Sub Menu I tem3_Click( ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Menultem4.Click PrintDialogl.Document = PrintDocument1 If PrintDialogl.ShowDialog = DialogResult.OK Then PrintDocumentl.Print() End If End Sub

Данный код не только выведет на печать документ, но и покажет окно Печать (Print), с помощью которого можно определить состояние принтера, количество копий, диапазон печати. Обратите внимание на примененный здесь условный оператор. Он дает команду приступить к печати документа после щелчка по кнопке ОК в окне Print. Однако эта команда выполняется только через объект PrintDocument, который предоставляет программе необходимые данные для вывода документа на печать. Для всех элементов управления, предназначенных для печати, основным свойством является Document. Поэтому кроме кодов, созданных для элементов управления PrintDialog, PageSetupDialog, PrintPreviewDialog, необходимо создать процедуру обработки события PrintDocumentl_PrintPage и добавить в нее соответствующий код. Для создания этой процедуры


⇐ Предыдущая Следующая ⇒
 
 
 
Powered by Exponenta