2015-05-13
239
Складання проекту з використанням об¢єктів Option Button (перемикачі) та HscrollBar (лінійок прокрутки).
| Доповнити попередній проект новими об¢єктами та отримати проект, що дозволяє рахувати площу або периметр прямокутника. | ||||||||||||
| № | Операції | Дії розробника | ||||||||||
| 1. | Розробка інтерфейсу: Ескіз екранної форми буде вміщувати дві командні кнопки для початку та закінчення роботи додатку, три текстових поля (два для введення розмірів прямокутника і одне для виводу результату), поля міток для відповідних надписів, два перемикачі для визначення того, що потрібно рахувати – площу або периметр, та дві лінійки прокрутки поряд з текстовими полями, до яких вводяться розміри прямокутника. | |||||||||||
| 2. | Завантажити Visual Basic | >Пуск>Программы>Visual Basic | ||||||||||
| 3. | Відкрити попередній проект та відповідну форму у режимі View Form. | >Файл>Открыть, в діалоговому вікні вказати ім¢я проекту | ||||||||||
| 4. | Змінити ім’я форми | Ввести до поля Name вікна властивостей значення FRMCount, до поля Caption значення Параметри прямокутника | ||||||||||
| 5. | Доповнити форму об’єктами відповідно до ескізу інтерфейсу, враховуючи їх розмір та розміщення на ескізі. | (Option Button на панелі елементів) – перемикачі, (HscrollBar на панелі елементів) - лінійки прокрутки для введення за їхньою допомогою розмірів прямокутника | ||||||||||
| 6. | Наповнити об’єкти, які мають тип перемикача, змістом відповідно до таблиці. | >Option Button на формі | ||||||||||
| Ім’я об¢єкту | Значення поля Name | Значення поля Value | Значення поля Caption | |||||||||
| Option Button1 | OptS | False | Площа | |||||||||
| Option Button2 | OptP | False | Периметр | |||||||||
| 7. | Наповнити об’єкти, які мають тип мітки, змістом відповідно до таблиці. Встановити значення властивостей щодо кольору, шрифту та форматування. | > Labeln на формі, > Caption у вікні властивостей, ввести до поля необхідний текст | ||||||||||
| Ім’я мітки | Значення властивості Caption | |||||||||||
| Label1 | Параметри прямокутника | |||||||||||
| Label4 | Розрахунок | |||||||||||
| 8. | Наповнити об’єкти, які мають тип лінійки прокрутки, змістом відповідно до таблиці. Встановити значення властивостей. | >HscrollBar на формі | ||||||||||
| Ім’я об¢єкту | Значення поля Name | Значення поля Max | Значення поля Min | Значення поля SmallChange | Значення поля LargeChange | |||||||
| HscrollBar1 | HsbLine1 | |||||||||||
| HscrollBar2 | HsbLine2 | |||||||||||
| 9. | Програмування.Доповнити програмний код для командної кнопки, ввести програмний код для лінійок прокрутки. | >View Code, >(General на панелі елементів), вибрати у списку CmdStart, доповнити програмний код: Private Sub CmdStart_Click() A=Val(TxtA.Text) B=Val(TxtB.Text) If OptS.Value = True then S=A*B Label4.Caption = “Площа” Else If OptP.Value = True then S=2*(A+B) Label4.Caption = “Периметр” Else S=0 MsgBox “Необхідно вибрати перемикач!”, vbOKOnly+vbQuestion, “Увага:” EndIf EndIf TxtS.Text=Str(S) OptS.Value = False OptP.Value = False End Sub | ||||||||||
| >(General на панелі елементів), вибрати у списку HsbLine1, ввести програмний код: Private Sub HsbLine1_Change() TxtA.Text = HsbLine1.Value End Sub | ||||||||||||
| >(General на панелі елементів), вибрати у списку HsbLine2, ввести програмний код: Private Sub HsbLine2_Change() TxtB.Text = HsbLine2.Value End Sub | ||||||||||||
| 10. | Налагодження програми.Запустити проект на виконання, якщо необхідно, виправити помилки | >►(Start) на панелі інструментів для початку роботи >■ (End) на панелі інструментів або звертання до командної кнопки Вихід для завершення роботи | ||||||||||
| 11. | Збереження проекту.Зберегти проект та форму у власній папці. | >Файл>Сохранить в меню або відповідна кнопка на панелі інструментів, вказати власну папку для збереження | ||||||||||
| 12. | Створити виконавчий додаток. | >File >Make.exe, вказати власну папку для збереження, ввести і’мя MyProg. | ||||||||||
| 13. | Закрити вікно Visual Basic | >r | ||||||||||
| 14. | Завантажити проект MyProg1.Exe на виконання | > MyProg1.Exe у власній папці | ||||||||||
Завдання для самостійної роботи
- Змінити програму таким чином, щоб існував режим розрахунку площі за замовчуванням (тобто перемикач “Площа” повинен бути вибраний спочатку і завжди, якщо не був вибраний “Периметр”).
- Внести до програми зміни, які дозволять для наступного розрахунку залишати активним попередньо вибраний перемикач.
- Доповнити програму операторами, які дозволять змінювати колір текстового поля з результатом: якщо отримане значення більше, ніж 500, зробити колір фону текстового вікна червоним, у іншому випадку – зеленим.
