End Sub. 7. Напишите самостоятельно обработчик щелчка мыши по кнопке «Очистить», используя навыки, полученные при выполнении предыдущего задания

7. Напишите самостоятельно обработчик щелчка мыши по кнопке «Очистить», используя навыки, полученные при выполнении предыдущего задания.

8. Сохраните проект (выбрав File – Save frmДиаграмма.frm и Save Project1.vbp).

9. Проверьте работоспособность проекта, запустив его на выполнение.

10. Создайте exe-файл программы с помощью команды File → Make Круговая диаграмма.exe.

11. Выйдите из среды Visual Basic.

12. Запустите на выполнение файл Круговая диаграмма.exe и убедитесь, что проект работает автономно, как любые другие Windows-приложения.

Задание 3. Составить программу рисования графика функции

Постановка задачи.

Требуется составить программу, отображающую на экране график функции y = 5cos(x) + x для x в диапазоне от -5 до +5. Примерный внешний вид приложения представлен на Рис.11.3.

Ход работы.

1. Создайте в папке Лабораторная_работа_№11 папку 11.3.

2. Запустите программу Microsoft Visual Basic 6.0.

3. В появившемся окне выберите тип приложения STANDARD.exe и нажмите кнопку «Открыть».

4. Расположите на форме 1 компонент ComandButton.

5. Установите свойства компонентов в соответствии с Таблицей 11.3 (или ориентируясь на внешний вид формы).

Таблица 11.3 – Свойства компонентов приложения «График функции y = 5cos(x)+x»

Компонент	Свойство	Значение
Command1	Caption	Построить график
Form1	Caption	График функции y = 5cos(x)+x
Name	frmГрафик

6. Щелкнув мышью два раза на кнопке «Построить график», напишите обработчик события Click (необходимые комментарии приведены после знака апострофа):

Private Sub Command1_Click()

Scale (-5, 5)-(5, -5)

DrawWindth = 3

FontSize = 20

Line (-5, 0)-(5, 0), 0

Print "X"

Line (0, -5)-(0, 5), 0

Print "Y"

For x = -5 To 5 Step 0.05

y = 5 * Cos(x) + x

PSet (x, y), vbRed

Next x

Дата добавления: 2014-12-23