Page 114 - 4450
P. 114
Рисунок 18.2 – Результат знаходження добутку матриць
15. Для закінчення розрахунків необхідно клацнути по
кнопці Конец на панелі інструментів.
16. Зберегти проект, клацнувши Сохранить (Save
Project).
Приклад. Створити додаток для обчислення
ймовірності події за алгоритмом, блок-схема якого
відображена на рис. 1.10.
1. Відкриваємо новий проект.
2. На формі встановимо 5 елементів TextBox.
3. Відкриваючи вікна їх властивостей, видалимо з вікон
текст по замовчуванню (Текст1, Текст2,…). Поруч з
текстовими вікнами розмістимо елементи Label з написами
про призначення тестових вікон. Подвійним клацанням на
вікні елемента Текст4 відкриємо вікно коду з рядками.
Private Sub Текст4_Exchange()
End Sub
4. Замінимо подію Exchange на LostFocus і введемо
наступний код головної процедури
Private Sub Текст4_LostFocus()
Dim u!, v!, R1!, R2!, R3!, p!, no%, n%, m%, k%, D!
112