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

Складання проекту з використанням об¢єктів PictureBox (графічних вікон).

Скласти проект, що дозволяє формувати графічні зображення.
Операції Дії розробника
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 >r
13. Завантажити проект MyProg2.Exe на виконання > MyProg2.Exe у власній папці
           

Завдання для самостійної роботи

Додати до проекту ще одне графічне вікно та командну кнопку, за допомогою якої в цьому вікні малюється коло з забарвленим сектором.


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: