Порядок виконання роботи 2.1

Скласти проект, що дозволяє формувати графічні зображення.

№

Операції

Дії розробника

1.

Розробка інтерфейсу: Ескіз екранної форми буде вміщувати три командні кнопки для створення графічних елементів: на формі, у першому та другому графічному вікні, одну командну кнопку для закінчення роботи додатку, та два обєкти PictureBox.

2.

Завантажити Visual Basic

>Пуск>Программы>Visual Basic

3.

Надати ім’я формі

Ввести до поля Name вікна властивостей значення FRMDraw, до поля Caption значення Графічні методи.

4.

Розташувати на формі об’єкти відповідно до ескізу інтерфейсу, враховуючи їх розмір та розміщення на ескізі.

(PictureBox на панелі елементів) – для створення графічних зображень

(Command Button На панелі елементів) – для розміщення кнопок керування

Для Picture1, Picture2

Для CommandButton

BackColor

За власним смаком

Name

CmdStart1 (або 2, 3)

Caption

Пуск1 (або 2,3)

Name

CmdEnd

Caption

Вихід

5.

Написати програмний код для командної кнопки CmdStart1.

Private Sub CmdStart1‗Click()

Print “Малюнок 1”: Pset (120,3900)

Print “Малюнок 2”

PSet (3210,3900):Print ”Малюнок 3”

‘отрезок горизонтальный красный:

Line (200,200)-(2200,200), 255

Print “1”

‘отрезок голубой вертикальный:

Line (200,400)-(200,1400), vbCyan

Print “2”

‘отрезок наклонный красный средней толщины:

DrawWidth=2

Line (200,1800)-(2000,1100), vbRed

Print “3”

‘прямоугольник незакрашенный:

Line (1400,1000)-(400,500), , В

Print “4”

‘прямоугольник закрашенный красный

Line (1600,500)-(2400,1000), 255, BF

Print “5”

End Sub

6.

Написати програмний код для командної кнопки CmdStart2

Private Sub CmdStart2‗Click()

Picture1.DrawWidth=10

Picture1.Scale (0,0)-(10,10)

Picture1.Pset (1,1),vbRed: Picture1.Pset (1,9), vbRed

Picture1.Pset (9,1),vbRed: Picture1.Pset (9,9), vbRed

Picture1.Pset (5,5),vbRed

End Sub

7.

Написати програмний код для командної кнопки CmdStart3.

Private Sub CmdStart3‗Click()

Picture2.Scale (0, 0)-(50,50)

Picture2.Print “коло, еліпс”

Picture2.Сircle (10,10), 8

Picture2.FillStyle = 0

Picture2.FillColor = vbRed: Picture2.ForeColor = vbRed

Picture2.Сircle (40,10), 8, 255

Picture2.Сircle (25,20), 12, 255, , , 1.5

Picture2.Сircle (25,30), 12, 255, , , 0.5

End Sub

8.

Написати програмний код для командної кнопки CmdEnd.

Private Sub CmdEnd_Click()

End

End Sub

9.

Налагодження програми. Запустити проект на виконання, якщо необхідно, виправити помилки

>►(Start) на панелі інструментів для початку роботи

>■ (End) на панелі інструментів або звертання до командної кнопки Вихід для завершення роботи

10.

Збереження проекту. Зберегти проект та форму у власній папці.

>Файл>Сохранить в меню або відповідна кнопка на панелі інструментів, вказати власну папку для збереження

11.

Створити виконавчий додаток.

>File >Make .exe, вказати власну папку для збереження, ввести і’мя MyProg2.

12.

Закрити вікно Visual Basic

>

13.

Завантажити проект MyProg2.Exe на виконання

> MyProg2.Exe у власній папці