If MsgBox .(-Write") = MsgBoxResult.OK _ Then f2.Label1.Text = TextBoxl.Text End Sub
Закроем форму с помощью диалогового окна:
Private Sub Forml_Closing (ByVal sender As Object, _ ByVal e As System.ComponentModel.CancelEventArgs) _ Handles MyBase.Closing
Создание диаграммы
е. Cancel = True
If MsgBox ("закрыть?-) = MsgBoxResult.OK Then e.Cancel = False End Sub
VB.NET располагает очень хорошей возможностью для демонстрации использования числовых данных. Используя элемент управления Microsoft Chart Control 6.0, можно создавать очень красивые двухмерные и трехмерные диаграммы. Чтобы эле мент управления Microsoft Chart Control 6.0 появился на панели Toolbox, необходимо выполнить команду Tools > Add/ Remove Toolbox Items, после чего откроется окно Customize Toolbox. Щелкните вкладку COM Components и в открывшемся списке найдите Microsoft Chart Control 6.0(SP4)(OLEDB). Щелкнете эту строку, а затем ОК. Инструмент для построения диаграмм появится на панели Toolbox. Поместите этот элемент на форму двойным щелчком (рис. 15.2).
Обратимся к свойствам этого элемента управления:
> Column Count - определяет количество элементов (столбцов или точек диаграммы);
> Column - элемент диаграммы, свойства которого определяются в данный момент;
Создание диаграммы
Рис. 15.2 ▼ Диаграмма
ГЛАВА 15 ▼ Несколько полезных программ
> Data - величина элемента диаграммы; >- Row Count - количество диаграмм;
> Row - диаграмма, с которой ведется работа; >- Row Label - надпись для каждой диаграммы;
> Chart ТУре - тип диаграммы.
На свойство Chart ТУре обратите особое внимание. Оно определяет вид диаграммы. В примере мы используем значение VtChChatt Туре 2D Ваг. Поместите на форму элементы управления Microsoft Chart Control, кнопку Button, два текстовых поля TextBox, можно добавить две надписи Label, хотя на работу программы они никак не повлияют. В свойствах элемента управления установите Column - 1, Column Count - 8, Data - 0, Row Count - 1. Суть программы заключается в том, что через текстовые поля мы вводим данные, которые придают диаграмме нужный вид. Восемь столбцов могут означать каждый час рабочего дня, а величина - процент выполнения плана или количество изготовленных изделий. В текстовое поле TextBoxl введите порядковый номер столбца, а в поле TextBox2 - искомую величину. После щелчка соответствующие изменения отображаются на диаграмме.