 |
Створення інтерфейсу
|
|
|
|
1) Створіть новий проект, аналогічно як ви виконували в лабораторній роботі № 2.
2) Помістите у форму необхідні елементи керування.
3) Змініть значення властивостей для форми – властивість Caption замініть на «Простий калькулятор»; установите значення властивості BorderStyle рівним 1.
4) Змініть значення властивості Name полів тексту відповідно на txtOne, txtTwo, txtRez. У властивості Text видалите його значення
1) Змініть значення властивості Caption написів відповідно на «Перше число», «Друге число», «Результат».
2) Змініть значення властивості Name перемикачів відповідно на optAdd, optSub, optMulti, optDiv.
3) Змініть значення властивості Caption перемикачів відповідно на «Додавання», «Вирахування», «Множення», «Розподіл».
4) Змініть значення властивості Name кнопки на cmdOperation і значення властивості Caption на «Виконати».
Програмний код
Процедура обробки події Click для кнопки cmdOperation.
Private Sub cmdOperation Click()
'Оголошення перемінної для першого числа
Dim x As Double
'Оголошення перемінної для другого числа
Dim у As Double
'Оголошення перемінної для збереження результату
Dim z As Double
'Перетворення тексту, введеного в поле тексту,
'у числове значення і присвоєння його першій перемінній
х = CDbl(txtOne.Text)
'Перетворення тексту, введеного в поле тексту,
'у числове значення і присвоєння його другій перемінній
у = CDbl(txtTwo.Text)
'Виконання потрібної операції, обираної на основі оцінки значення властивості Value перемикача’
If optAdd.Value = True Then z = x + у
If optSub.Value = True Then z = x - у
If optMulti.Value = True Then z = x * у
'У випадку розподілу варто переконатися, що друге число
'не дорівнює нулю. На нуль поділяти не можна!
If optDiv.Value = True Then
If у <> 0 Then
z = x / у
Else
'Висновок повідомлення про помилку
MsgBox "На нуль поділяти не можна! ", vbCritical, "Помилка"
|
|
|
End If
End If
'Перетворення значення третьої перемінної (типу Double)
'у текстове значення і присвоєння його властивості Text
'полю тексту, призначеного для показу результату.
txtRez.Text = CStr(z)
End Sub
Запустіть програму, натиснувши клавішу <F5>.
Контрольні запитання
1. Перелічите типи даних, що використовуються у VB.
2. Як створювати і використовувати перемінні?
3. Оператор присвоювання, правила запису виражень.
4. Умовний оператор. Перелічите всі модифікації умовного оператора і поясните, як вони працюють.
5. Діалогове вікно MsgBox, перелічите всі його параметри і можливості.
6. Елемент керування перемикач, його властивості.
7. Елемент керування поле тексту, його властивості.
8. Елемент керування командна кнопка, її властивості.
Лабораторна робота № 5
Тема: MS WORD. Редактор формул.
Мета: Навчитися створювати формули вMS WORD.
Хід роботи
- Повторити вимоги техніки безпеки роботи на ПК.
- Завантажити MS WORD.
|
|
|
Актуальність створення програмно-методичного комплексу
Алгоритми створення ланцюжків
Архітектура як створення обрамлення
ВИДИ РОБІТ ЗІ СТВОРЕННЯ ТОПОГРАФІЧНИХ КАРТ
Види страхових компаній та порядок їх створення
Вказівний тип. Створення динамічних об’єктів. Операції над змінними вказівного типу та покажчиками. Знищення динамічних об’єктів.
Глобальна мережа Інтернет, історія створення, сервіси мережі Інтернет
Головні цілі створення SWIFT та основні етапи її розвитку
Діагностичний інструментарій для створення й оцінки професійно спрямованого проекту студентів
Для створення шаблону структури наукової роботи
