Смекни!
smekni.com

Знайомство з середовищем розроблення проектів Visual Basic (стр. 3 из 3)

Розв’язання задачі виконується за допомогою форми, наведеної на рис.2

Код програми

Процедуру, що обробляє подію Клацання на кнопці «Обчислити», подано нижче.


Реалізація проекту

Для реалізації проекту потрібно виконати наступне:

1. Запустити на виконання VB для створення нового проекту.

2. Задати заголовок форми «Плата за электроэнергию» та її ім'я frmПлата_за_электроэнергию.

3. На формі створити написи і текстові поля для вхідних даних План і Факт, Цена1, Цена2, Штраф.

4. Створити кнопку «Вычислить».

5. Під кнопкою «Вычислить» створити напис для області результату «Сумма».

6. Ввести код процедури, що обробляє натискання кнопки «Вычислить».

7. Зберегти форму і проект у папці.

Аналіз проекту

При формуванні повідомлення про результати обчислень вживається операція зчеплення рядків &.

Функція Format забезпечує форматний вивід згідно з шаблоном. Використаний шаблон «0,00» передбачає вивід числових значень з фіксованою комою, при цьому для цілої частини числа відведено одна позиція й для дробової – дві. В цьому шаблоні кожний знак «0» передбачає місце під одну цифру. Слід зазначити, що при відображенні від’ємних чисел необхідно передбачити місце й для знака мінус.

Виконання програми й аналіз отриманих результатів

На рис.3. наведено результат розв’язання задачі при таких значеннях показників.

план: 100,

факт: 120,

цена1: 20,

цена2: 30,

штраф: 10

тобто плата за електроенегрію складає 2600 грн.

Рис.3. Результат обчислення плати за електроенергію

Для перевірки працездатності програми по інших гілках потрібно зробити обчислення за даними. Вхідні дані і відповідні значення результату наведено в табл.1.

Таблиця 1.

Дані перевірки працездатності програми
Норма Факт Цена1 Цена2 Штраф Результат
100 120 30 20 10 3400
100 90 30 20 10 2800
100 100 30 20 10 3000

Після перевірки розроблений додаток можна використовувати для реальних даних при аналізі виконання виробничої програми з метою прийняття відповідних управлінських рішень.

ЛАБОРАТОРНА РОБОТА № 4

Тема: Проектування додатка на базі циклу з лічильником

Мета: набути уміння і навички застосування оператора циклу з лічильником.

Призначення: навчитися створювати додатки на базі циклів, число повторень яких наперед задане. Здобуті вміння являються базовими для реалізації додатків з використанням масивів даних і масивів елементів керування у наступних роботах. Вони дозволять краще зрозуміти сутність циклічних процесів, які зустрічаються як під час розв’язання різних задач на комп’ютері, так і в повсякденній професійній діяльності.

Розв'язання задачі

Постановка задачі

Підприємство випускає N найменувань продукції. Визначити обсяг нормативно чистої продукції за формулою:

Qнчп= K1*H1+ K2*H2+…+ Ki*Hi+…+ KN*HN, де

Кi - виробництво продукції i-го виду в натуральному вираженні,

Нi - норматив чистої продукції на одиницю виробів i-го найменування.

Економіко-математична модель:

Обсяг нормативно чистої продукції (Qнчп) визначається за формулою:

Qнчп= K1*H1+ K2*H2+…+ Ki*Hi+…+ KN*HN, де

Кi - виробництво продукції i-го виду в натуральному вираженні,

Нi - норматив чистої продукції на одиницю виробів i-го найменування.

Алгоритм розв'язання задачі

Розв'язання задачі здійснюється відповідно до алгоритму, що наведено на рис.1.


Рис.1 Схема алгоритму визначення обсягу нормативно чистої продукції

Інтерфейс з користувачем

Розв’язання задачі виконується за допомогою форми, наведеної на рис.2

Код програми

У процедурі, що обробляє подію Клацання на кнопці «Обчислиш використовуються наступні оператори:


Виконання програми й аналіз отриманих результатів

Підприємство випускає N найменувань продукції. Визначити обсяг нормативно чистої продукції. У табл. 1 наведено перелік товарів, що підприємство випускає.

Таблиця 1

Найменування Кількість
Ручка 1000
Олівець 2000
Зошит 5000
Гумка 2000
Лінійка 3000
Обсяг 43000

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

Рис.3. Результат розв'язання задачі