Структура даних проекту

Реквізити	Ім'я змінної	Тип даних
1	2	3
Ціна	CurZina	Currency
Вартість	CurVartist	Currency
Кількість купленого товару	IntKilkist	Integer

Закінчення табл. 5.12

1	2	3
Готівка	CurGotivka	Currency
Решта	CurReshta	Currency
Номер товару	IntІ	Integer
Повідомлення	StrPovidoml	String
Повідомлення1	StrVid	String
Повідомлення2	StrText	String

Рис. 5.29. Схема алгоритму роботи касового апарата

Значення змінних CurZina, CurGotivka, IntKilkist уводяться із клавіатури (можуть приймати значення при запуску програми на виконання), а змінні CurVartist, CurReshta є тими що обчислюються.

Для підказок користувачеві про дані по кожному з товарів, які вводяться в поточний момент, можна використовувати змінну цілого типу IntІ. У ній буде зберігатися номер поточного товару.

Змінна StrText у даному програмному коді застосовується для організації введення даних у діалоговому режимі. Цій змінній надається значення з використанням функції InputBox(), при введенні ціни й кількості товару, який придбається.

У проекті потрібно забезпечити узгодження в реченнях при формуванні відповіді з результатами вирішення задачі. З цією метою змінній StrVid залежно від кількості товару, що придбається, присвоюються текстові значення, наприклад, "вид товару", "виду товару", "видів товару".

Результат вирішення задачі разом з пояснювальним текстом містить у собі змінна StrPovidoml.

Інтерфейс проекту.

Для відображення результатів розрахунків і організації взаємодії користувача з програмним кодом розробляється форма (рис. 5.30).

Рис. 5.30. Проект форми для вирішення задачі

На формі розміщуються такі елементи управління:

Label (написи) – для позначення найменування даних, що вводяться, і результатів розрахунків;

TextBox (текстові поля) – для введення вхідних даних і виводу проміжних результатів;

CommandButton (кнопки) – для запуску процедур розрахунку (Розрахунок) і скидання результатів обчислень (Очистити).

Основні властивості форми й елементів управління представляються таблицею, аналогічної табл. 5.8.

Взаємодія користувача з формою починається при запуску програми на виконання (подія CmdРозрахунок_Click()) у діалоговому режимі, що здійснюється за допомогою функцій MsgBox(). У разі клацання користувачем по кнопці "Да" пропонується введення ціни й кількості товару, що придбається, за допомогою спеціальних діалогових вікон введення. Таким етапом буде відбуватися обчислення вартості поточного товару. Ця вартість додається до сумарної вартості всіх товарів, що були придбані.

Якщо користувач клацане по кнопці "Нет" або "Отмена" накопичування сумарної вартості припиняється і результат розрахунку буде виведено в текстове поле TxtОплата, а також формується повідомлення про результати покупки, яке буде подане у напису – LblРезультат.

Користувачу потрібно ввести у текстове поле TxtГотівка кількість готівки для розрахунку і виводу значення здачі в текстове поле TxtРешта. Процедура розрахунку решти виконується згідно події Exit текстового поля TxtГотівка.

При клацанні по кнопці CmdОчистити відбувається підготовка касового апарату до роботи.