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

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

Итак, мы выяснили, как открывать Internet Explorer. Теперь разберем коды для открытия других приложений:

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

Dim a As System.Diagnostics.Process

a = New System.Diagnostics.Process

a.Start("notePad.exe")

и a.Start(иWordPad.exeи)

и a.Start(и Excel.exe")

и a.Start("WinZip.exe")

и a.Start(и WinRAR.exe")

и a.Start(и Outlook.exe")

"a.Start("C:\3axaT.jpg")

и a.Start("С:\Текст.txtи)

"a.Start("С:\3вук Wav.wav") End Sub

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

Цвет

Для работы этого кода необходимо разместить на форме элемент управления ColorDialog. Он откроет диалоговое окно Цвет, с помощью которого можно изменить цвет выделенного текста.

Private Sub MenuIteml7_Click (ByVal sender As System.Object,_ ByVal e As System.EventArgs) Handles Menulteml7.Click ColorDialogl.ShowDialog()

RichTextBoxl.SelectionColor = ColorDialogl.Color End Sub

Шрифт

Для работы кода необходимо разместить на форме элемент управления FontDialog, который выведет диалоговое окно Шрифт. В нем можно изменить шрифт выделенного текста.

Private Sub MenuIteml5_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Menulteml5.Click FontDialogl.ShowDialog()

RichTextBoxl.SelectionFont = FontDialogl.Font End Sub

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

Функции для перевода числовых данных в строковые

Будем считать, что этого достаточно для несложного текстового редактора. При желании его можно усовершенствовать.

Функции для перевода числовых данных в строковые

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

> CBool - преобразует аргумент в логический (Boolean) тип данных;

> CByte - преобразует аргумент в байтовый (Byte) тип данных;

> ССиг - преобразует аргумент в денежный (Currency) тип данных;

> CDate - преобразует аргумент в тип данных Date;


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