Конспект лекцій для студентів спеціальності 181 «Харчові технології»


Створення форми, що складається з декількох сторінок або вкладок



Сторінка52/54
Дата конвертації16.03.2017
Розмір9.99 Mb.
ТипКонспект
1   ...   46   47   48   49   50   51   52   53   54
Створення форми, що складається з декількох сторінок або вкладок.

Існує два способи для створення форм, що складаються з декількох сторінок: з використанням елемента управління «Набор вкладок» і з використанням елемента управління «Разрыв страницы». Використання елемента управління «Набор вкладок» при створенні фо- рми, що складається з декількох сторінок, є самим простим і ефективним способом. Перемикання між сторінками здійснюється вибором однієї з вкладок. Елемент управління «Разрыв страницы» використовується для вказівки горизонтальних розривів між елементами управління у формі.

Використання елемента управління «Набір вкладок»



  1. Відкрийте пусту форму в режимі конструктора.

  2. На панелі елементів виберіть елемент управління Набор вкладок і вкажіть область, в яку необхідно вмістити елемент управління. При доданні елемента управління «Набор вкладок» в ньому створюються дві сторінки. Першою сторінкою є верхня.

  3. Для додання елементів управління в «Набор вкладок» виберіть вкладку сторінки, на яку їх необхідно додати. Потім, використовуючи будь-який з перелічених нижче способів, додайте елемент управління.

  • Для виведення на екран списку полів натисніть кнопку Список полей на панелі інструментів, а потім перемістіть на вкладку сторінки одне або декілька полів.

  • Виберіть елемент управління на панелі елементів і натисніть кнопку миші на сторінці вкладки.

  • Скопіюйте елементи управління з іншої частини форми або з іншої сторінки.

  1. Також можна виконати такі дії:

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

  • Для додання, видалення або зміни порядку вкладок натисніть праву кнопку миші на межі елемента управління «Набор вкладок» і виберіть команду Вставить вкладку, Удалить вкладку або Последовательность вкладок.

  • Для зміни шрифту, його розміру, стилю і т.д., двічі клацніть кнопку миші на межі елемента управління «Набор вкладок», на екрані буде відкрите вікно властивостей, встановіть в ньому необхідні властивості.

  1. Встановіть необхідний розмір елемента управління «Набор вкладок». Перегляньте кожну вкладку, щоб пересвідчитися, що всі елементи управління розміщені.

  2. Для перевірки елемента управління перемкніться в режим форми.

  1. Створення форми, що містить декілька сторінок (екранів).

  1. Відкрийте форму в режимі конструктора.

  2. Натисніть кнопку Разрыв страницы на панелі елементів.

  3. На формі виберіть місце, в яке необхідно розмістить розрив сторінок. Вмістіть розрив сторінки над або під елементом управління, щоб уникнути в ньому розриву даних.

  4. Розрив сторінки позначається невеликою пунктирною лінією на лівій границі форми.

  5. Для відкриття вікна властивостей двічі клацніть кнопкою миші на області виділення форми і в полі властивості Цикл табуляции встановіть значення «Текущая страница».

  6. Видалити вертикальну смугу прокрутки можна, встановивши в поле властивості Смуги прокрутки значення «Відсутні» або «Тільки по горизонталі».

  7. Для перевірки форми і зміни її розміру, щоб на екрані була відображена тільки одна сторінка, перемкніться в режим форми. Для переміщення між сторінками використайте клавіші PAGE DOWN або PAGE UP.

  1. Робота з елементами управління.

Додання поля або елемента управління

Додання поля з таблиці, що є джерелом даних форми:



  • Натисніть кнопку Список полей на панелі інструментів для відображення списку всіх полів базової таблиці.

  • Виділіть поле в списку полів і перетягніть його у форму.

Для додання у форму таких елементів управління як напис або кнопки

служить панель елементів:

  • Щоб створити напис, натисніть кнопку Напис Аа на панелі елементів. Потім виберіть у формі місце, куди її потрібно вмістити, обкресліть покажчиком миші поле для тексту, введіть потрібний текст і натисніть клавішу ENTER.

  • Щоб створити елемент управління за допомогою майстра, натисніть кнопку Майстра на панелі елементів, а потім натисніть кнопку потрібного елемента управління.

Переміщення, зміна розмірів і вирівнювання виділених елементів управління

  1. Для виділення елемента управління, наприклад поля, встановіть на нього покажчик миші і натисніть кнопку миші. По контуру поля з'являться маркери розмірів і переміщення. Щоб виділити декілька елементів управління, натисніть клавішу SHIFT і, не відпускаючи її, виділіть всі потрібні елементи.

  2. Виділивши елемент управління, можна за допомогою миші:

  • Змінити розмір елемента управління.

  • Перемістити елемент управління і пов'язаний з ним підпис.

  • Перемістити тільки елемент управління або тільки один підпис.

  1. Щоб вирівняти елементи управління по одному з них, виділіть елементи, які потрібно вирівняти. Потім в меню Формат виберіть команду Выровнять і потрібну підкоманду.

Зміна зовнішнього вигляду всієї форми або її частини

  • Щоб змінити всю форму, натисніть кнопку Автоформат на панелі інструментів і виберіть новий зовнішній вигляд для форми.

  • Для зміни зовнішнього вигляду одного елемента управління, наприклад поля, виділіть його в режимі конструктор. Потім на панелі інструментів Формат (сторінка) виберіть інший шрифт, розмір шрифту або інші параметри.

  1. Способи створення звітів.

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

Для створення зв'язку між звітом і його початковими даними застосовуються елементи управління. Ними можуть бути поля, що містять імена або числа, написи для заголовків, декоративні лінії для графічного оформлення звіту. Користувач має можливість розробити звіт самостійно або створити звіт за допомогою майстра. Майстер з розробки звітів Microsoft Access виконує всю рутинну роботу і дозволяє швидко розробити звіт. Після виклику майстра виводяться діалогові вікна із запрошенням ввести необхідні дані, і звіт створюється на основі відповідей користувача. У будь-якому випадку створений макет можна відкоректувати в режимі конструктора. Нарівні з цим можна створити спрощений, без обробки таблиці (з виведенням всіх і полів) звіт в автоматичному режимі.

Звіти можуть бути відкриті в трьох режимах: в режимі конструктора, в режимі попереднього перегляду і в режимі перегляду зразка. Режим конструктора використовують для створення звіту або зміни структури існуючого звіту. Режим попереднього перегляду дозволяє переглядати дані в тому вигляді, в якому вони будуть розміщуватися на друкарських сторінках. У режимі перегляду зразка виводяться основні елементи макета звіту із зразками даних, що

демонструють представлення даних у звіті.



Перемикання між режимами відображення звіту

  • Відкрийте звіт в будь-якому режимі.

  • Натисніть кнопку Вид на панелі інструментів, щоб змінити режим відображення звіту. Щоб переглянути список всіх можливих режимів виведення на екран, натисніть кнопку розкриття списку поруч з кнопкою Вид.

  1. Способи створення звітів.

  • Створення звіту з допомогою автозвіту.

  • Створення звіту за допомогою майстра.

  • Створення звіту без допомоги майстра.

  • Створення звіту по декількох таблицях.

Створення звіту з однієї колонки за допомогою автозвіту.

Автозвіт є засобом створення звіту, в якому виводяться всі поля і записи з базової таблиці або запиту.



  1. У вікні База данных виберіть вкладку Отчеты.

  2. Натисніть кнопку Создать.

  3. У діалоговому вікні Новый отчет виберіть вигляд звіту.

  • Автозвіт: в стовпчик – кожне поле утворить окремий рядок із заголовком ліворуч.

  • Автозвіт: стрічковий – поля кожного запису утворять окремий рядок.

  • Заголовки друкуються зверху на кожній сторінці.

  1. Виберіть таблицю або запит з даними, що виводяться у звіті.

  2. Натисніть кнопку OK.

Створення звіту за допомогою майстра

  • У вікні бази даних виберіть вкладку Отчеты.

  • Натисніть кнопку Создать.

  • У діалоговому вікні Новый отчет виберіть Мастер отчетов. Опис дій, що виконуються майстром, виводиться в лівій половині діалогового вікна.

Крок 1. Вибір таблиці і полів.

  • Виберіть таблицю або/і запит, з даними, по яких будується звіт.

  • Виберіть поля для звіту.

  • Підтвердіть натисненням кнопки Далее.

Крок 2. Визначення опцій угрупування (при необхідності).

  • Виберіть поля угрупування.

  • Виберіть інтервали угрупування.

  • Підтвердіть натисненням кнопки Далее.

Крок 3. Визначення порядку сортування.

  • Укажіть в першій позиції поле (таблиці/запита) сортування записів.

  • Натисніть кнопку «Сортировка» для визначення порядку сортування по першій позиції.

  • Повторіть при необхідності вказівку полів і порядку сортування для інших полів (усього допускається сортування записів в зростаючому/убуваючому порядку, що включає до 4-х полів).

  • Підтвердіть натисненням кнопки Далее.

Крок 4. Визначення зовнішнього вигляду звіту.

  • Виберіть бажаний тип макета.

  • Виберіть орієнтацію сторінки.

  • Підтвердіть натисненням кнопки Далее.

Крок 5. Вибір стилю.

  • Виберіть у списку бажаний стиль текстового оформлення.

  • Підтвердіть натисненням кнопки Далее.

Крок 6. Визначення найменування звіту.

  • Наберіть найменування звіту або погодьтеся із запропонованим.

  • Підтвердіть натисненням кнопки Готово.

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

конструктора звіту.



Створення звіту без допомоги майстра (в режимі Конструктора)

  • У вікні бази даних виберіть вкладку Отчеты.

  • Натисніть кнопку Создать.

  • У діалоговому вікні Новый отчет виберіть пункт Конструктор.

  • Виберіть ім'я таблиці або запиту, що містить дані, по яких будується звіт.

  • Порада. Для того щоб використати у звіті дані з декількох таблиць, створюйте звіт на основі запиту.

  • Натисніть кнопку OK.

  • Новий звіт буде відкритий в режимі Конструктора. Створений звіт являє собою пустий макет, що вимагає настройки.

Створення звіту по декількох таблицях

  • Створення звіту за допомогою майстра є самим простим і швидким способом розробки звіту, в якому використовуються дані з декількох таблиць. У першому вікні, що відкривається майстром, потрібно вибрати поля, що включаються в новий звіт. Допускається вибір полів з однієї або з декількох таблиць.

  • Якщо користувач створює звіт у режимі Конструктора, необхідно спочатку створити запит, а потім звіт на базі цього запиту.

  1. Структура звіту.

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

У режимі конструктора на екрані відображається макет кожного розділу звіту в одному примірнику. При друкуванні деякі розділи можуть неодноразово повторюватися. Елементи



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

  • Заголовок звіту друкується один раз на початку звіту і може містити емблему, назву і дату друку звіту. Заголовок друкується на першій

  • сторінці звіту перед верхнім колонтитулом.

  • Верхній колонтитул друкується у верхній частині кожної сторінки звіту і може містити заголовки стовпчиків.

  • Область даних містить основну частину даних, які потрібно представити у звіті. Цей розділ повторюється для кожного запису з базового джерела даних звіту.

  • Нижній колонтитул друкується в нижній частині кожної сторінки звіту і може містити номери сторінок.

  • Примітка звіту друкується один раз в кінці звіту (на останній сторінці перед нижнім колонтитулом) і може містити результати обчислень над всіма записами звіту. Цей розділ є самим останнім у звіті.

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


Питання до лекції №12

  1. Що таке форма?

  2. Назвіть види форм.

  3. Назвіть способи створення форм.

  4. Як створити форму автоматично?

  5. Як створити форму за допомогою майстра?

  6. Назвіть елементи вікна конструктора форми?

  7. Як розмістити у формі поля базової таблиці?

  8. Як змінити розміщення, розміри об'єктів у формі?

  9. Як створити багатосторінкову форму?

  10. Як розмістити у формі текст?

  11. Як створити стандартну кнопку?

  12. Як ввести дані в таблицю через форму?

  13. Що таке звіт?

  14. Які є способи створення звіту?

  15. Як автоматично створити звіт?

  16. Як створити звіт за допомогою конструктора?

  17. Назвіть основні елементи вікна конструктора звіту.


Лекція №13. Елементарні конструкції та оператори мови VBA.
План

  1. Елементи головного вікна інтегрованого середовища VBA.

  2. Особливості мови VBA.

  3. Константи та змінні у мові VBA та їх опис.

  1. Область видимості змінних у проекті.

  1. Операції та порядок їх виконання у мові VBA.

  1. Стандартні (вбудовані) функції мови VBA.

  1. Функція MsgBox

  2. Функція InputBox.




  1. Елементи головного вікна інтегрованого середовища VBA.

Після завантаження інтегрованого середовища VBA, на екрані з’являється головне вікно програми (рис.13.1).

1 2 3 4 5 6 7 8 9



Рис. 13.1. Головне вікно інтегрованого середовища мови VBA
Головне вікно середовища VBA має наступні інтерфейсні елементи:

  1. заголовок вікна зі стандартними кнопками управління у правому куті;

  2. головне меню команд та панель інструментів Standard; головне меню містить як стандартні команди, характерні для більшості Windows–вікон, так і специфічні, характерні тільки для середовища VBA (Run, Debug, Tools, Add-Ins); панель інструментів Standard містить піктограми часто вживаних команд під час роботи над проектами; у разі відсутності панелі її можна встановити командою View -Toolbars-Standard;

  3. вікно проектів VBAProjects; у цьому вікні наводиться ієрархічна структура елементів, з яких складається проект, подібно до того, як це робиться у програмі Проводник; у нашому випадку проект містить лише одну форму UserForm1;

  4. вікно властивостей Properties Window; у цьому вікні наводяться за алфавітом всі назви властивостей активного об’єкта (вкладка Alphabetic) та відповідні значення кожної властивості ( вкладка Categorized);

  5. вікно форм Form служить для розміщення у ньому форм;

  6. палітра інструментів ToolBox містить усі потрібні для створення проектів інструменти;

  7. вікно негайного виконання операторів програмного коду Immediate; у цьому вікні можна задати або змінити значення та властивості змінних; відлагодити будь-який оператор і переглянути результат його виконання; ввести нові оператори і зразу ж їх виконати;

  8. вікно перегляду локальних змінних Locals; у цьому вікні відображуються імена, значення та типи змінних, які є доступними у виконуваній в даний момент процедурі;

  9. вікно перегляду значень контрольованих змінних Watches; у цьому вікні відображуються імена, значення та типи змінних, які контролюються користувачем.

  1. Особливості мови VBA.

Мова VBA є діалектом мови програмування високого рівня Visual Basic, тому вони багато в чому подібні. Але ці дві мови мають і принципові відмінності. Програми, створені у середовищі Visual Basic, є повністю самостійними програмними продуктами, які можуть бути виконані безпосередньо у середовищі цієї мови. Засобами мови VBA створюють проекти, які складаються з багатьох файлів, у середовищі певного офісного додатку (Word, Excel, Access і т.п.). VBA-проекти не є самостійними програмними продуктами - вони лише обслуговують документи тих додатків, у якому ці проекти створені. Наприклад, якщо VBA-проект створений у середовищі табличного процесора MS Excel, то він обслуговуватиме електронну таблицю, якщо ж VBA-проект створений у середовищі текстового процесора Word, то він обслуговуватиме текстовий документ і т.д. Головне призначення цих VBA-проектів – автоматизувати роботу з документами офісних додатків. Інакше кажучи, за допомогою мови VBA можна значно розширити можливості офісних додатків. Тому знання цієї мови є важливим для користувачів.

Мова VBA є мовою об’єктно-орієнтованого (ООП) та візуального програмування. Основна ідея ООП полягає в об’єднанні даних і засобів їх опрацювання (методів) у принципово новий тип даних, який називають об’єктом. В арсеналі мови VBA є багато стандартних об’єктів. Кожен з них має цілу низку властивостей, які можна підлаштовувати під потреби та смаки розробника проекту. Автоматизація програмування досягається завдяки тому, що є можливість перенести об’єкт з палітри інструментів у форму проекту і за необхідності змінити властивості об’єкту. Відпадає потреба писати цілі фрагменти програми – достатньо використати готовий об’єкт, налаштувавши його під свої потреби. Процес перенесення об’єктів з палітри на екран контролюється розробником проекту візуально, і в цьому полягає привабливість і ще одна перевага нового стилю програмування. Таким чином, об’єкт – це сукупність даних та деякого програмного коду, який має можливість на ці дані певним чином впливати, оформлена у вигляді однієї неподільної структурної одиниці. Одним із таких об’єктів є форма (рис.13.2).



Рис 13.2. Форма об’єкта VBA-проекту

Формою називається об’єкт, який володіє усіма властивостями Windows-вікна і призначений для розташування у ньому всіх інших компонентів (об’єктів) проекту. Розміщувані у формі компоненти (об’єкти) служать для того, щоб організувати діалог користувача проекту з комп’ютером під час роботи з проектом, тому форми називаються вікнами користувача, або ж вікнами UserForm. До об’єктів мови VBA належать також елементи керування, які в процесі створення проекту переносять з панелі інструментів на форму.

Розглянемо ці елементи детальніше.


- мітка або напис (Label) – це деякий текст, який містить яку-небудь пояснюючу інформацію (коментар) стосовно інших об’єктів, розміщених на формі.

- текстове поле (TextBox) – вікно, за допомогою якого під час виконання проекту вводять дані стрічкового типу;

- список(ListBox); - поле зі списком (ComboBox) – ці два компоненти проекту пропонують відповідно два варіанти вибору конкретного значення із багатьох можливих значень; якщо деякий набір значень (наприклад, список районів області) помістити в елемент ListBox, то потім із цього списку можна вибрати потрібне значення, однак самого списку змінити не можна; якщо ж цей набір значень помістити в елемент ComboBox, то потім із цього списку можна і потрібне значення вибрати, і список змінити, наприклад, додавши або вилучивши з нього ще кілька значень.

- командна кнопка (CommandButton) – використовується для запуску на виконання процедур проекту, зупинки їх виконання, очищення значень текстових вікон і т.п. Прикладами таких кнопок є кнопки Ok, Да, Нет, Отмена та інші; для кожної командної кнопки розробником проекту має бути написана відповідна підпрограма засобами мови VBA.

- рамка (Frame) – використовується для візуального об’єднання яких-небудь елементів управління в одну групу, стверджуючи тим самим, що ці елементи певним чином пов’язані між собою.

- прапорець (CheckBox); -перемикач (OptionButton) – використовуються тоді, коли користувачу потрібно зробити вибір із кількох варіантів; обидва компоненти мають два стійких стани: вкл. і викл; якщо прапорці об’єднані в групу, то користувач має право активізувати і один, і два, і більше прапорців; якщо перемикачі об’єднані в групу, то, активізувавши один зних, ми автоматично робимо пасивними інші.

- лінійка прокручування (ScrollBar); - лічильник (SpinButton) – ці два об’єкти дозволяють змінювати значення у певній комірці, якщо задані початкове та кінцеве значення та крок зміни цього значення.

- вимикач (ToggleButton); - набір вкладок (TabStrip);


- набір сторінок (MultiPage); - малюнок (Image);
- поле зі згоранням (RefEdit).
Форми та елементи керування - це далеко не повний перелік об’єктів, які використовує мова VBA. Якщо проекти створюються у середовищі табличного процесора Excel, то стають доступними об’єкти Excel, якщо ж проекти створюються у середовищі табличного процесора Word, то стають доступними об’єкти Word, і т. д. Зокрема, основними об’єктами Excel є:

  • Application (додаток ); використовується для налаштування середовища Excel;

  • Workbook (робоча книга); використовується для роботи з робочими книгами Excel;

  • Worksheet (робочий аркуш); використовується для роботи з робочими аркушами Excel;

  • Range (діапазон); використовується для роботи діапазонами електронної таблиці Excel;

  • Chart (діаграма); використовується для роботи діаграмами Excel.

Об’єкт характеризується певними властивостями, володіє певними методами, реагує на певні події. Властивості об’єкта – це параметри, які характеризують його кількісні або якісні сторони. Наприклад, вираз Label1.Font означає властивість Font (шрифт) об’єкта Label1. Цю властивість можна встановити на свій розсуд у вікні Properties Window або шляхом зміни програмного коду. Зазначимо, що комірка Cell не є самостійним об’єктом Excel, а є властивістю об’єкта Range. Методи, якими володіє об’єкт – це ті дії, які можна виконати за допомогою цього об’єкту. Наприклад, об’єкт Workbook має такі методи: Activate – робить активною зазначену робочу книгу, Close – закриває робочу книгу, Save - зберігає робочу книгу , PrintOut - друкує вміст робочої книги. Нарешті, об’єкт CommandButton реагує на таку подію, як клацання по кнопці; інші об’єкти можуть реагувати на інші події.

Під час розробки VBA–проектів оперують з такими базовими поняттями мови, як оператор, процедура, модуль.

Оператор VBA – це найменша виконувана одиниця програмного коду, яка являє собою вказівку комп’ютеру виконати яку-небудь дію щодо оброблення інформаціїї (оголосити змінну, присвоїти змінній певне значення, передати управління з одного місця програмного коду на інше, змінити параметри налаштування компілятора VBA). Як з цеглин будується будинок, так з операторів будуються процедури, а відтак – модулі і проекти.

Процедура VBA – це найменша поіменована одиниця програмного коду, яка може виконуватися самостійно. Процедура має власне ім’я, за яким до неї звертаються. Структурно являє собою один або декілька операторів VBA, розташованих між операторами оголошення процедури(Sub або Function) та оператором завершення процедури (відповідно End Sub або End Function).

Модуль VBA - це поіменована одиниця програмного коду, яка складається із однієї або більше процедур та оголошень змінних, що відносяться до всіх процедур цього модуля. Розбиття програмного коду на ряд модулів, кожен з яких вирішує певну частину загального проекту, є прогресивним напрямком у програмуванні.

Підсумовуючи, можна константувати, що VBA–проект складається з файлів модулів та файлів форм, причому функціонування і модулів, і форм забезпечується розробкою та використанням відповідних процедур.



  1. Константи та змінні у мові VBA та їх опис.

Якщо програмний код процедури передбачає використання деяких постійних значень, які в принципі не змінюватимуться за жодних обставин під час виконання цієї процедури, то з цією метою використовують константи. Константи зустрічаються у процедурах у явному вигляді або у вигляді імен. В останньому випадку оголошення констант здійснюють за допомогою оператора Const, який має такий формат:
Сonst <ім’я константи> [As<Type>] = <значення константи>

[, <ім’я константи> [As<Type>] = <значення константи>] …


У цьому форматі:

  • < ім’я константи>- це ім’я константи, яка оголошується, записане за правилами запису імен констант та змінних;

  • <Type> - тип константи, що оголошується; типи даних розглянемо у цьому розділі дещо нижче;

  • <значення константи> - конкретне значення константи.

Приклади опису констант:


Const Name As String = “Петро”

Const I As Integer = 10

Const Довжина As Single = 5.20

Const Ширина As Single = 6.40

Необхідно зазначити, що у мові VBA є багато власних констант, які користувач має право використовувати. Ці константи починаються з префікса vb:


  • vbBlue – константа , яка представляє числовий код для синього кольору , що дорівнює 16 711 680;

  • vbKeyTab – константа , яка представляє числовий код клавіші Tab, а саме 9;


VBA- програми, що працюють з додатками Excel, використовують також константи, які є характерними для цього середовища, наприклад:

xlBar Stacked –константа, яка представляє числовий код для лінійчатої діаграми, а саме 58.

Під змінною у мові VBA розуміють поіменовану частину пам’яті, у якій передбачається зберігати такі значення, які під час роботи проекту можуть змінюватися. Отже, принципова відмінність між константами та змінними полягає в тому, що перші під час роботи проекту ніколи не змінюють своїх значень, а другі можуть змінювати свої значення. Змінні у програмному коді проекту зустрічаються тільки у вигляді імен.

Імена констант та змінних записуються за певними правилами, наведеними нижче:


  • для запису імен констант та змінних можна використовувати:

  • букви;

  • арабські цифри;

  • знак нижнього підкреслювання;

  • в іменах констант та змінних можна використовувати як латинські букви, так і букви національних алфавітів;

  • заборонено використовувати в іменах констант та змінних спеціальні символи, як от: $, & та інші;

  • великі та малі букви в іменах використовуються, однак не розрізняються;

  • ім’я константи або змінної не може бути службовим словом, іменем функції або оператора;

  • довжина імен констант та змінних не повинна перевищувати 255 символів (40 символів – у випадку імен форм та елементів управління):

  • в іменах констант та змінних рекомендується вживати префікси та суфікси для позначення їх типів.

Перш ніж використати ім’я якої-небудь змінної у процедурі, рекомендується описати цю змінну у розділі оголошень процедури або у розділі оголошень модуля. З цією метою використовуються оператори Dim, Public, Private, Static. Найбільш уживаний із них - оператор Dim.

Формат оператора Dim наступний:
Dim <ім’я змінної> [As<Type>] [,<ім’я змінної> [As<Type>] ] …
У цьому форматі:
< ім’я змінної> - це ім’я тієї змінної, яка описується даним оператором Dim - зрозуміло, воно повинно бути записане за правилами запису імен простих змінних;

<Type> - тип даних, до якого належить дана змінна; це один із типів, наведених у таблиці 13.1.

Аналогічно оголошуються змінні за допомогою операторів Public, Private, Static, про що йтиметься далі.

Приклади опису імен змінних:

Dim sName As String

Dim I As Integer, J As Integer

Dim LessonNumber As Long

Dim Height As Single, Width As Single

Dim Ширина As Single, Довжина As Single

Будь-яка змінна, яка не оголошена за допомогою операторів Dim, Public, Private або Static, розуміється комп’ютером за замовчуванням як змінна типу Variant.


Таблиця 13.1. Стандартні типи даних VBA

Тип даних

Назва типу

Розмір пам’яті у байтах

Кількість значущих цифр

Що зберігає

Діапазон значень

Byte

Байт

1

3

Цілі числа без знаку

0...255

Boolean

Булівський, логічний

2

1

Логічні значення

True або False (Истина або Ложь)

Integer

Ціле

2

5

Цілі числа зі знаком

-32 768 … 32767

Long

Довге ціле

4

10

Цілі числа зі знаком

-2 147 483 648 …2 147 483 647

Single

Одинарної точності

4

7

Дробові числа з плаваючою комою одинарної точності

-3.402823 Е+38..-1.401298Е-45

-1.401298Е-45..3.402823Е+38



Double

Подвійної точності

8

15

Дробові числа з плаваючою комою подвійної точності

-1.797 693 134 862 32 Е+308..

-4.940 656 458 412 47 Е-324 та

4.940 656 458 412 47 Е-324 …

1.797 693 134 862 32 Е+308



Currency

Грошовий

8

19

Дробові числа з фіксованою комою з 4-ма знаками після коми

-922 337 203 685 477.5808 …

922 337 203 685 477.5807



Date

Дата

8




Дату

Від 1.01.100 р до 31.12.9999 р

Object

Об’єкт

4




Посилання на будь-який об’єкт




String

Стрічковий змінної довжини

10+1

байт на сим-вол






Стрічкове значення

Від 0 до приблизно 2 млрд. символів

String

Стрічковий фіксованої довжини

1 байт на сим-вол




Стрічкове значення

Від 0 до приблизно 65535 символів

Variant

Універса-

льний числовий

16




Числове значення

Будь-яке числове значення з діапазону типу Double

Variant

Універса-льний текстовий

22 + 1

байт на символ






Стрічкове значення

Той же діапазон, що і для стрічок змінної довжини

В іменах змінних та елементів управління рекомендується вживати префікси, які вказують на належність змінних до того чи іншого типу даних. Ця рекомендація, однак, не є обов’язковою до виконання.
Таблиця 13.2. Рекомендовані префікси в іменах змінних

Тип даних

Короткий префікс

Довгий префікс

Тип даних

Короткий префікс

Довгий префікс

Boolean

f

bool

Long

l

lng

Byte

b

byt

Object

o

obj

Currency

c

cur

Single

sng

sng

Date/Time

dt

dat

String

s

str

Double

d

dbl

Variant

v

var

Integer

i

int

Array

a

ary

Таблиця 13.3. Рекомендовані префікси в іменах елементів управління.



Назва елемента управління

Назва елемента управління у VBA

Префікс

Текстове поле

Text Box

Txt

Напис

Label

Lbl

Командна кнопка

CommandButton

Cmd

Меню

Menu

Mnu

Поле зі списком

ComboBox

Cmb

Рамка, фрейм

Frame

Fra

Перемикач

OptionButton

Opt

Прапорець

CheckBox

Chk

Оператор Private діє аналогічно до оператора Dim. Можна вважати, що оголошення змінної


Dim sName As String

Private sName As String

є рівносильними.

Якщо змінна оголошена за допомогою оператора Public, то це робить її видимою у всьому проекті. Щоб цього досягти, необхідно оголосити цю змінну у розділі Declarations модуля.

Оператор Static використовують для оголошення змінних тоді, коли потрібно зберегти значення змінних після завершення роботи проекту.



  1. Область видимості змінних у проекті.

Область видимості змінних складається з тих модулів і процедур, у яких вони можуть бути використані. Використання змінної передбачає можливість надати або змінити значення змінної в будь-якому місці області, і ці змінні можна побачити із будь-якого іншого місця області видимості. Проаналізуємо область видимості змінних проекту, зображеного на рис. 13.3.

Найнижчий рівень видимості змінних - рівень процедури. Змінні, оголошені оператором Dim у процедурі, видимі лише в цій процедурі. Таким чином, змінна var1, яка оголошена в оператором Dim процедури 1, може бути використана лише в цій процедурі. Таку ж природу мають змінні var2, var4, var5. До того ж змінна var2 у процедурі 2 є незалежною від змінної var2 в процедурі 3. Оголошення на рівні модуля (змінні var1 - в модулі 1, var2 - в модулі 2) створюють змінні, які можуть бути використані у будь-якій процедурі цього модуля. Такою є змінна var3, яка може використовуватися у процедурі 4 та процедурі 5; змінна var1 може використовуватися в процедурі 2 та процедурі 3, однак у процедурі 1 оголошена своя змінна var1, тому у цій процедурі не може бути використана змінна var1, оголошена на рівні модуля.



Рис. 13.3. Область видимості змінних
Таким чином, область видимості змінних залежить від двох наступних факторів:

  • місця оголошення змінної (в розділі оголошень модуля чи в розділі оголошень процедури);

  • оператора, використаного для оголошення констант та змінних (Dim, Public, Private, Static).

  1. Операції та порядок їх виконання у мові VBA.

Всі операції мови VBA умовно можна поділити на чотири категорії (таблиця 13.4):

  • арифметичні операції;

  • операції над стрічками;

  • операції порівняння;

  • логічні операції.

Таблиця 13.4. Операції мови VBA та порядок їх виконання

Знаки операції

Назви операції

Категорія 1. Арифметичні операції

^

Піднесення до степеня

-

Заперечення (зміна знаку на протилежний)

* або /

Множення або ділення

\

Цілочисельне ділення

Mod

Ділення за модулем

+ або -

Додавання абовіднімання

Категорія 2. Операції над стрічками.

&

Конкатенація стрічок.

Знаки операції

Назви операції

Категорія 3. Операція порівняння

=

Дорівнює

< >

Не дорівнює

<

Менше

>

Більше

< =

Менше або більше

> =

Більше або менше

Like

Порівняння стрічок із заданим зразком

Is

Перевірка ідентичності посилання на об’єкти

Категорія 4. Логічні операції

Not

Логічне НІ (заперечення)

And

Логічне І (множення)

Or

Логічне АБО додавання)

Xor

Логічне викличне АБО

Eqv

Логічна еквівалентність

Imp

Логічна імплікація

За відсутності у виразі дужок, VBA виконує операції із різних категорій у такому порядку:



  • арифметичні операції та операція конкатенації;

  • операція порівняння;

  • логічні операції.

Всередині кожної категорії операції виконуються у тому порядку, в якому вони наведені у таблиці 13.2.

  1. Стандартні (вбудовані) функції мови VBA.

У мові VBA є великий набір стандартних (вбудованих) функцій, призначення яких полягає у тому, щоб для заданих значень аргументів (або аргументу, якщо він один) знайти (повернути) відповідне значення функції. Вбудовані функції можна поділити на такі категорії:

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


Таблиця 13.5. Математичні функції, реалізовані у VBA

Функція

Позначення у математиці абож призначення функції

sin(x)

sin(x)

cos(x)

cos(x)

tan(x)

tg(x)

atn(x)

arctg(x)

exp(x)

ex

log(x)

ln(x)

sqr(x)

квадратний корінь з х

abs(x)

[x]

sgn(x)

Знак числа(+1 або -1)

fix(x)

Заокруглює число відкиданням дробової частини

int(x)

Заокруглює число до найближчого меншого цілого числа

rindomize

Ініціює роботу генератора випадкових чисел

rnd(x)

Генерує випадкове число

  1. Функція MsgBox

Функція MsgBox служить для виводу на екран діалогового вікна з певним повідомленням. Тому ці вікна називають вікнами повідомлень: їх головне призначення – вивести на екран повідомлення. Однак у цьому вікні можуть бути розташовані і інші елементи , наприклад, піктограми, кнопки.

Синтаксис функції MsgBox такий:



MsgBox ( <запрошення > [,< кнопки>] [,<заголовок>] [,<файл довідки>,<зміст>]) ,

або, використовуючи англійську термінологію:



MsgBox ( [,] [,] [,<help file>,<context>]) . <p>Аргументи функції <b>MsgBox</b> можуть бути взяті в дужки. Якщо дужки відсутні, то це означає, що функція ніяких значень не повертає, а лише виводить у вікно деяке повідомлення. Якщо ж аргументи беруться в дужки, функція <b>MsgBox</b> додатково повертає цілочисельне значення, як результат клацання по певній кнопці, розташованій у вікні. У цьому випадку після появи на екрані вікна повідомлення <b>ПК</b> чекає, доки користувач клацне по одній із кнопок, розташованих у ньому. Залежно від того, по якій кнопці клацне користувач, функція <b>MsgBox</b> поверне відповідне ціле число (табл. 13.6). </p> <br />Таблиця 13.6. Числові значення, <a href="/vesna-prijshla-v2.html">які повертаються функцією </a><b>MsgBox</b> <br /><center> <table width="505" cellpadding="7" cellspacing="0"> <col width="160"> <col width="123"> <col width="179"> <tr> <td width="160" bgcolor="#ffffff"> <br /><i><b>Натиснута кнопка</b></i> <br /></td> <td width="123" bgcolor="#ffffff"> <br /><i><b>Константа</b></i> <br /></td> <td width="179" bgcolor="#ffffff"> <br /><i><b>Значення, яке повертає функція </b></i><i><b>MsgBox</b></i> <br /></td> </tr> <tr valign="top"> <td width="160" bgcolor="#ffffff"> <br />Ok <br /></td> <td width="123" bgcolor="#ffffff"> <br />vbOk <br /></td> <td width="179" bgcolor="#ffffff"> <br />1 <br /></td> </tr> <tr valign="top"> <td width="160" bgcolor="#ffffff"> <br />Отмена <br /></td> <td width="123" bgcolor="#ffffff"> <br />vbCancel <br /></td> <td width="179" bgcolor="#ffffff"> <br />2 <br /></td> </tr> <tr valign="top"> <td width="160" bgcolor="#ffffff"> <br />Стоп <br /></td> <td width="123" bgcolor="#ffffff"> <br />vbAbort <br /></td> <td width="179" bgcolor="#ffffff"> <br />3 <br /></td> </tr> <tr valign="top"> <td width="160" bgcolor="#ffffff"> <br />Повтор <br /></td> <td width="123" bgcolor="#ffffff"> <br />vbRetry <br /></td> <td width="179" bgcolor="#ffffff"> <br />4 <br /></td> </tr> <tr valign="top"> <td width="160" bgcolor="#ffffff"> <br />Пропустить <br /></td> <td width="123" bgcolor="#ffffff"> <br />vbIgnore <br /></td> <td width="179" bgcolor="#ffffff"> <br />5 <br /></td> </tr> <tr valign="top"> <td width="160" bgcolor="#ffffff"> <br />Да <br /></td> <td width="123" bgcolor="#ffffff"> <br />vbYes <br /></td> <td width="179" bgcolor="#ffffff"> <br />6 <br /></td> </tr> <tr valign="top"> <td width="160" bgcolor="#ffffff"> <br />Нет <br /></td> <td width="123" bgcolor="#ffffff"> <br />vbNo <br /></td> <td width="179" bgcolor="#ffffff"> <br />7 <br /></td> </tr> </table> </center> <p>Розглянемо кожен аргумент функції <b>MsgBox</b> детальніше.</p> <p>Аргумент <b><</b><b>з</b><b>апрошення></b> <b>( </b>< <b>prompt</b><b> ></b>) - єдиний обов’язковий аргумент функції. Це стрічковий вираз або стрічкова константа, тобто набір символів клавіатури, взятий в лапки. Саме ця стрічкова константа або ж значення стрічкового виразу з’явиться у вікні повідомлення. </p> <p>Аргумент <b><кнопки> ( < </b><b>buttons</b><b> >)</b>- другий аргумент функції <b>MsgBox</b> - є цілочисельним виразом або константою. Цей аргумент не обов’язковий. Якщо аргумент <кнопки> відсутній, то вікно має лише одну кнопку <b>О</b><b>k</b>. Якщо ж аргумент <<b>кнопки</b>> є у списку аргументів функції <b>MsgBox</b>, то він дозволяє управляти наступними параметрами вікна:</p> <br /><ul> <li/> <br />кількістю кнопок у вікні; <br /><li/> <br />типом кнопок і їх розміщенням у вікні; <br /><li/> <br />піктограмою, яка виводиться у вікні; <br /><li/> <br />яка із кнопок призначається кнопкою за замовчуванням; <br /><li/> <br />режимом вікна – модальне воно чи ні. <br /></ul> <br />У таблиці 6.7 наведені константи мови <b>VBA</b> та їх значення для задання аргументу <<b>кнопки</b>>. Ці константи умовно можна розділити на чотири групи: <br /><ul> <li/> <br />перша група констант визначає, які саме кнопки будуть виведені у вікні, тим самим їх кількість і тип; <br /><li/> <br />друга група констант дозволяє вибрати стиль піктограми, яка відображується у вікні; <br /><li/> <br />третя група констант служить для задання кнопки, яка буде кнопкою за замовчуванням; <br /><li/> <br />четверта група констант визначає режим вікна повідомлення. <br /></ul> <br />Аргумент <<b>кнопки</b>> може використовувати лише по одній константі із кожної групи, об’єднавши їх знаком „плюс”. Щоб не помилитися при вводі значень аргументу <<b>кноп</b><b>ки</b>>, доцільно використовувати спливаючу підказку, яка з’являється після введення знаку „+”. <br />Таблиця 13.7. Константи мови <b>VBA</b> для задання аргументу <кнопки> <br /><table width="676" cellpadding="7" cellspacing="0"> <col width="45"> <col width="168"> <col width="4359"> <col width="54"> <col width="4355"> <col width="5"> <col width="327"> <tr valign="top"> <td width="45"> <br /><b>Група</b> <br /></td> <td colspan="2" width="172"> <br /><b>Константа</b> <br /></td> <td colspan="3" width="73"> <br /><b>Значення</b> <br /></td> <td width="327"> <br /><b>Опис</b> <br /></td> </tr> <tr> <td colspan="7" width="660" valign="top"> <br />Коди командних кнопок <br /></td> </tr> <tr> <td width="45"> <br />1 <br /></td> <td colspan="2" width="172" valign="top"> <br />vbOkOnly <br />vbOkCancel <p>vbAbortRetryIgnore</p> <p>vbYesNoCancel </p> <p>vbYesNo <br /></p> <br />vbRetryCancel <br /></td> <td colspan="2" width="54" valign="top"> <br />0 <br />1 <p>2 <p>3</p> <br /> <br />4 </p> <p>5 <br /></td> <td colspan="2" width="346" valign="top"> </p> <br />Відображає лише кнопку <b>Ok</b> (встановлюється за замовчуванням) <p>Відображає кнопку <b>Ok</b> і <b>Отмена</b></p> <p>Відображає кнопки <b>Стоп, Повтор</b> і <b>Пропустить</b> </p> <p>Відображає кнопки <b>Да, Нет, Отмена</b></p> <p>Відображає кнопки <b>Да, Нет</b> </p> <p>Відображає кнопки <b>Повтор і Отмена</b> </p> <br /></td> </tr> <tr> <td colspan="7" width="660" valign="top"> <br />Коди активності кнопок за замовчуванням <br /></td> </tr> <tr> <td width="45"> <br />2 <br /></td> <td colspan="2" width="172" valign="top"> <br />vbCritical <br />vbQuestion <br />vbExclamation <br />vbInformation <br /></td> <td colspan="2" width="54" valign="top"> <br />16 <br />32 <br />48 <br />64 <br /></td> <td colspan="2" width="346" valign="top"> <br />Відображає забороняючи піктограму (білий знак <b>Х</b> у червоному крузі) <p>Відображає запитальну піктограму (знак <b>?</b> у голубому крузі)</p> <p>Відображає попереджуючу піктограму (знак <b>! </b>у жовтому трикутнику) </p> <p>Відображає інформаційну піктограму (знак <b>І</b> у голубому крузі)</p> <br /></td> </tr> <tr> <td colspan="7" width="660" height="3" valign="top"> <br />Коди стилів піктограми <br /></td> </tr> <tr> <td width="45" height="1"> <br />3 <br /></td> <td width="168" valign="top"> <br />vbDefaultButton1 <p>vbDefaultButton2</p> <p>vbDefaultButton3 </p> <p>vbDefaultButton4</p> <br /></td> <td colspan="2" width="58" valign="top"> <br />0 <p>256 <br /></p> <br />512 <p>768 <br /></td> <td colspan="3" width="346" valign="top"> </p> <br />Перша кнопка активна за замовчуванням <p>Друга кнопка активна за замовчуванням</p> <p>Третя кнопка активна за замовчуванням </p> <p>Четверта кнопка активна за замовчуванням </p> <br /></td> </tr> </table> <br /> <br /> <br /><table width="676" cellpadding="7" cellspacing="0"> <col width="45"> <col width="168"> <col width="58"> <col width="346"> <tr> <td colspan="4" width="660" height="1" valign="top"> <br />Коди модальності вікна <br /></td> </tr> <tr> <td width="45" height="2"> <br />4 <br /></td> <td width="168" valign="top"> <br />VbApplicationModal <p>VbSystemModal</p> <br /></td> <td width="58" valign="top"> <br />0 <p>4096 <br /></td> <td width="346" valign="top"> </p> <br />Модальний режим додатку: користувач повинен закрити вікно повідомлення перед продовженням роботи у поточному додатку <p>Системний режим: всі додатки недоступні, поки не закриється вікно повідомлення</p> <br /></td> </tr> <tr> <td width="45" height="61"> <br />Додаткова <br /></td> <td width="168" valign="top"> <br />VbMsgboxHelpButton <p>VbMsgboxSetForeGround</p> <br />vbMsgboxRight <br />vbMsgboxRtlReading <br /></td> <td width="58" valign="top"> <br />16384 <p>65536 <br />524288</p> <br />1048576 <br /></td> <td width="346" valign="top"> <br />Відображає кнопку <b>Справка</b> <p>Робить вікно повідомлення вікном переднього краю</p> <p>Відображає вікно повідомлення, вирівненим по правому краю </p> <p>Для івриту і арабської мови вказує, що текст виводиться справа наліво</p> <br /></td> </tr> </table> <p>Розглянемо, як користуватися кодами, наведеними у таблиці !1.2. Звичайно, розробник проекту повинен чітко уявляти, яким він хоче бачити вікно повідомлення і які кнопки з першого розділу таблиці повинні бути у вікні. Якщо кнопок буде більше, ніж одна, потрібно визначитися з тим, яка з них буде активною за замовчуванням, вибравши відповідну константу з другого розділу таблиці. Командна кнопка, активна за замовчуванням, автоматично вважається натиснутою, якщо після відображення вікна повідомлення буде натиснута клавіша Enter. Командні кнопки розміщуються у <a href="/zvit-pro-rezuletati-gromadsekogo-obgovorennya-proektu-poryadku.html">вікні у тому порядку</a>, в якому вони наведені у першому розділі таблиці 10.7. Далі розробник проекту у третьому розділі таблиці вибирає константу, яка додає у вікно повідомлення підходящу піктограму, а з четвертого розділу вибирає константу, яка визначає, режим роботи додатку. Додавши ці константи або відповідні їм числові значення, отримаємо суму, яка і слід використати у якості аргументу <кнопки>. Наприклад, нехай потрібно вивести діалогове вікно повідомлення, розмістивши в ньому кнопки <b>Yes</b> та <b>No</b><b>, </b>кнопку <b>No</b> зробити активною за замовчуванням, додати попереджувальну піктограму і зробити це вікно програмним модальним. Наводимо процедуру MsgBox1(), яка розв’язує цю задачу.</p> <p>Public Sub MsgBox1() </p> <p>'Вивчаємо аргумент кнопки вікна повідомлення</p> <p>Dim theButtons As Integer </p> <p>Dim S As String * 10</p> <p>Dim SS As String * 15 </p> <p>theButtons = vbYesNo + vbDefaultButton2 + vbExclamation + _</p> <p>vbAhhlscationModal </p> <p>MsgBox "Вигляд вікна повідомлення", theButtons</p> <br /> <br />End Sub <br />Результат роботи процедури наведено на рис.13.4. <br /><img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAANgAAAByCAIAAAC+xYgyAAAACXBIWXMAAA7EAAAOxQGMMD9aAAAOH0lEQVR4nO2dCXzUVB7H/8mcnZlOWyhHoUA55JZD7kOgCIIciguCgAgKC67gAQoeqyIq6OIBCiyicihyiKhsVUTtQlFQwFVAQO5LBBEobWlnOp0r+zJp03SOdI5MJxP+3095vL68vPdP5jf/939Jmqc+uG9Xq7ZdAEFiipr779D+3bG1A7ne2LhpS05OzrZt27hf1fyGziM+IClVCpT9Ky8BfhOXo6nyTVC+V3kN8NmxdJtvLz77CvarUF+wmaoA34QwqdgRCPcSmlxxX+EBlR+DsDufk0P7Hregoyo5ObTA+vJNXgcZnZPDlYVEG+0RrxK133oIUsWgEJFIGd0pKciamZmZk+dv8rsJhYhIQDBzDBIUimyVoxD3fT6Ty3S44/Vo95W1eCxJhz28NtodIeJ4C7Ho2GKSmps/JCy8enABSau3mXFlP6uMmu0ej55B+7+YRdL2t79GAuBfstiOOt75hledHzeUm3fzmH9HzxgkVIjbGzFsoPBXkgpLAuHfI147siipxcNcPu/QQr48te1jpbMxGdDj7sXhTdmQqMJrkVPh7NmzIYixO+DQXHD4raSWj+T/9qawUOgRL/48nyus2/nJ83teJpl6XZ/+/ce5Dbo/Q/JndrzI79W49/Nc5tjW5/jCFv3nsvZ9/TRf0mbQv/j83qzHb7r9NS7/v89mkLTz8IWBTP1uzT9I2mfc2yTd9v4Ukt4y4V2SZq+YxNcZOHklSb9aNoEvGTJ1daAGkbAhEiT648PBSlW4fft2LuNHiInNHio8uohkCjwqTGn1qNApcvy199XaHWZ5XUU6t2selzm78yWSNuz5HNl26vs5J7c/36TPnOPbWJua9X2Rv4L12zf/JCWtBr5MCg5uefLXzU+0HVwqbm5o5iBDs1/Pt3P9NAg8NGevZFXYf+Jy/orXlncmkJJBD7xP8l8uvfeLJeOGTvsw0AlCwobTIgTnC3v37s1l/HtEEiOS0Zlkkls+EvzYRzxipWPl0a3PkrR5v5eCbFMEfmjuNXYpcYo5qx/gyvtOeEckeNj89vjIu0ZE4N3hnDlzgokOOQIOzWyMKGn8dUNmqVMkHMl+hhuaqx7OI/I3D2Jig4IR+kIiRK+5iwhVevmmad8XiK/inKKElMeIFJXzwZStqyZzMSISE/gRmY8Xw581V0qt9jNJmMjlyWTFa2uDHs+QMPH0jhe4X8lkhfge3h2CZ2gmJS1vnUvCxENbnuIKyWTFy0V1uOP1n//zWKDJiniM2O++90iY+O3yidyvZLIycPIqEiYKh2aMESXHKy4kEuSe7Qp51mxqOs13wKrWejo3lgkv3wgnK3U7P+U10GX0fFZ4Xx88Q7PwVjxXrdWAeRXu7QO0HTJfGGh2HPZG+a37MrqNXCS8405iRH73zPHLSnshWrz/vYr39eG2Kau87uvfPm0NRUkbg1zX+AouyAe75HhnBYk7xG/fBQMKEYmUzMzMyBtBISKREuiBmpBAISKyoFyIezbeG0M7kAAwnh/lgx4RkQUoREQWoBARWYBCRGQBChGRBShEJJaIPRiLIFVGJQ/GIkgVg0JEZAEKEZEFEguRpq2mxH3XCrpL2yyieKQUokZ3rknTiTRdUlTY7tjh13Q6jYSNI8pGMiFSlLNO+l0OO+j0YErc7YTx326eN2RQhlTtI8pGMiFWS51fXAyGZBVAC4CDnTufemX+usKiEaNH3iBVF4iCkUaINF2korMoBihVKkBPYM4CVThzxg+Dh7a8uUet9LpmSXpBFIw0QkxOWk4G5UQTUDQFsBuoVIe1sFv3y926Hl+7oc6s6Z0k6QVRMNIIUUWvAwp0OtJaCcARgAZqFVs+89Edg0c0un9cq9RUgyQdIUpFAiFWS1rodoIhAbRGojYbQDFAEaWrCZZLffpd7N391Op1J6c/dGPkHSEKJnIhutSqDYwbzInEB2oYm2XndrrngKsAaaC+DBQzdcru8VNa3HN3wxo1TBLYiyiUSIWYnLjcaXObicYMxvXr3KPHuD1/Y+E+9zuk16vmKsgdPOTcjS2Pf/xZvQcnt5HEYkSRRCpEDaygVGA0sO5w9JhCAL0BmlmBemqqa3WWQ6XKJbKc8cCu8VOb3jO6qTlRL4nRiPKISIgpxmUuOxsdQpLREx06AMxmSLUCU5R3kQ0WTTUh99LQwWfaLT2+4ZNGkyY0l8puRBlI8zyixvWRmwKDnnWHZIKSbNDkWxNcYCfT6HppZMpCIsWGQF0inUy65+dZL7QYOTxDcqfYul1XLnNw3y5pWw4bYlJMjIlVv5EgwfOISfp1DrvVlAAasxEYO1DuQf20a7OqJehNdeyurt0KyDwGiChNNZxXLo8ZdWz+kjOfb64/dpTETpE/9fL5GGJlhkwOPzzCF6LWuYShQWdQg0YD1/IhCcbcZVmb5U5Lq6/V/tmrVx47VhOnqE9T05dJpPjopB+fntdo+B2N9HqtdPZ7I5Qjl/dbwtfnNgVTAoG9r1e5V7/cVr+WBNOmX6v8GunVvrjx4saI9BjG6Q2G8IXosDsTdKBLSCA5sLkgEdLTyHzZktagZVHBhfQ2biBTF2cR6EvAXB1yc8cMPbxoxYkvvkofcaeUTjHIDxICaMurhKvj9xPlq/m2LOKVK/XTIvt62eBXOiKNC00NJDvfwxE5D8GoSuTUiRO+EGniFNUU6FRQZAE3CRGhbWtoVotOq9vckbyKnbc4PbMXSz4Ykx1/5WpTYOKoX15f1XDQwCaGBMketvB7pnxPsd+TLhUiX4aQvh4Sdh0MvD8TsSEYgyU5q2EKIlHzpcoOCSYduMjkxMG+F5NMTmpB+xvtS9d8t+HNP9jZi8tzSbHQSoSoNuhLrtgeHPPrghVd/rv15NDBzSI3PRBhuCUv/H42Io0EchteIxdU5uSCt9C3wSBNjbx98dE/7G97mEI0uBbqtKBK0IPNxrpDqvRtQR27MOuzrzapl++5qu35sTtJHSqlOpV3HrQw4/5db6xKH3xbU5qO1ktaRc5dGO1E+HX31aKsCN6wkI4ijFMXjhDN6i8d1sKUWjpQUVBYwqoNPEN1IXRvl6eDs/XTnWD1eEROi3kFkFZPa9RCkX3ckANLVnf6+tvTtw1oFEbXvkR++SYYD8o7ML8VxG0Q0WJI/kNYudJJiZepfvf1wm+QGurpDftbF44QExzvuBhQmQxgtYHT89I0Crgw8abWxTWTbdVruNmncFxlb1SzloDNArVqOY6fM6XC30fsXf5Rw1v7ZahUdBi9exEowOfz4iVB7uJV6DfAD6lfv82KWyVueaWmRn7Uwe/l91dxQhaimc5yWf7SqDyvaLfaSt0h5flxgi7R9cGCvWQIZoXI3XamPbOWy7lQr7Em2ei6anlk3N63P+qQve3sgH4NQ+09VkRyiquYODJVSMhC1FtedbnBkECDpbjcHYJHcEY232fkVXZcVnmmzFykSCpY7FCYD2l1qPzjZB4za8LOuSvr9++bEb1IEYkvQhNiImTZbQ69DnRGPVit5e6QqNAEe7K1Xe4mYrQ2S0s7lH1GZfLcf3aXyfHSJcgw0UYDFFhH9T+84MOzmzYf/duQ5tE4KiTuCE2ICbb3nRSQcZnSa+GatXTk5VI3jJ1OVJgHkHb0z2rPvkLNW3SadY38u3dLXJCbB0kp9lyroQaMGnBg/caMoQNu0GhU0TgwJL4IQYh6OOCwnFerwUhcIpmJuMvmKOBJbXDiz0KA6u3rDMwtMKs1V8F1utQXQpkWCwqgZm2VQevKtT88fM+ba7p+v/NM3z6NJT8qJO4IQYgGxzdOB2hVoFK5wFrMXrvhIVkdM7R76uc/MBcu0+s+WWi/PIwdl9lRu6wa0aLTCfl5Koay2iExGW7pdGbdp6koRARCEqLbttfpArsdruW7NCqG4RTmZsdlktXbIGvlxZcWNiyyFVrO9xrS43v7BSDTGqasDslRwFDXiuxOcLvA4ISOzc9/uqzxyVN5jRulROnwkHghBCEy6q7FthPEqZXYGYrVV4VlF2ga1Bp44r7TNHXaYoVzf4CbqLBiNcbjH1VqMOnZazo79tc36t0HDp1HIV63hPNgbEHCtMSUoyXXfsotoGmm4vofnskKRcGlK+xwzHjiQoYbk93lFcBz8VGvIW6Vfuvjjtk/NUoxW82sKpHrlDAfjC2stmjPqRPvvftDsc3qb0FPr6Vp/NdQ0y67U336QorZWNyhXc0ePeLmsjYSPUK+oN25Y5P69escOHhJxcWInNgYgeoYQSH45JmySozLYNR0aF8XL98gEN695to1DbX7ZkhtCXJdg2+MRWQBChGRBShERBagEBFZgEJEZAEKEZEFKEREFqAQEVmAQkRkAQoRkQUoREQWoBARWYBCRGIJrmCPyAJcwR6RFyhERBZEV4it2naJavsxJDMzc/HCV4QlUXoLqEyI9jt0ou4RD+3fHe0uqp6Nm7b4LWcYxm95XEO+cjk5OdHuBYdmiVHYFy/QV05yUIiILEAhIrIAhYjIAhQiIgviXoj8uk6xNiQq+L41XqlHGt9C9LuwD5dR6gfGIb4WWmxsioz4FqIvoS7ZJX/Elx4Srl4R18erNCEq7/aG37UqlHeYcSxE8YV6lPdRCYlr5+eXOBYiAvEfgcT984iVLvSlYMJYmUy2KOF5xOBXw4tfglnkLFBJfBHHQkSURLwKMU5XnEMCEa9CRBQGChGRBShEiamyJ0kVRtSFeF19MJmZmbE2IV6JrhCvtw+mCv62Q6lEV4hef+embHDmHgkYIyKyAIWIyAIUIiILUIiILEAhIrIAhYjIAhQiEkvi/sFYRBko4cFYREmgEBFZgEJEZMH/AZPD59v7E7cYAAAAAElFTkSuQmCC" name="Рисунок 33" align="bottom" width="216" height="114" border="0"> <br />Рис. 13.4. Вікно повідомлення, отримане за допомогою функції MsgBox. <br />Цю процедуру можна подати і в іншому вигляді, враховуючи, що константі vbYesNo відповідає значення 4, константі vbDefaultButton2 відповідає значення 256, константі vbExclamation відповідає значення 48, константі vbApplicationModal відповідає значення 0, отже, сума всіх значень дорівнює 4+256+48+0 =308. <p>Аргумент <<b>заголовок</b>> (<<b>title</b>>) є необов’язковим. Це стрічковий вираз або стрічкова константа, значення якої виводиться у заголовку вікна. Інакше кажучи, у такий спосіб формується назва вікна повідомлення. Якщо цей аргумент не задано, то у заголовку вікна виводиться назва того додатку, у якому створюється проект, наприклад, Microsoft Excel.</p> <p>Аргументи <b><файл довідки>,<зміст></b> (<<<b>help</b> <b>file</b>>,<<b>context</b>>>) також є необов’язковими і можуть бути одночасно присутніми у списку аргументів, або ж одночасно бути відсутніми. Аргумент <<b>файл довідки</b>> це стрічковий вираз або стрічкова константа, яка ідентифікує назву файла довідки. У цьому файлі розробник проекту розміщує довідкову систему проекту у вигляді пронумерованих повідомлень. Аргумент <<b>зміст</b>> - це цілочисельний вираз або константа, яка означає номер повідомлення із довідкової системи. <br /><ol start="8"> <li/> <br /><b>Функція</b> <b>InputBox</b><b>.</b> <br /></ol> <br />Під час виконання проекту доводиться вводити з клавіатури в оперативну пам’ять певну інформацію (вхідні дані). Це можуть бути числові або стрічкові значення, логічні значення, значення дати або часу тощо. Функція <b>InputBox</b> виводить на екран діалогове вікно, з допомогою якого і здійснюється введення вхідних даних. Дані вводяться у текстове поле, яке має вигляд світлої смуги. Вікно може мати також пояснювальний текст, з якого користувач зрозуміє, які саме дані він повинен ввести. Слід мати на увазі, що функція <b>InputBox</b> повертає значення стрічкового типу навіть тоді, коли в текстове поле буде введено число. Тому результат роботи функції (стрічку) рекомендується перетворити в тип, який і передбачався розробником проекту. </p> <p>Функція <b>InputBox</b> має такий формат:</p> <br /> <br /><b>InputBox</b> ( <запрошення> [,<заголовок>] [,<за замовчуванням>] [,<хпоз>] [,<упоз>] [,<файл довідки>,<зміст>]) , <p>або, використовуючи англійську термінологію:</p> <br /> <br /><b>InputBox</b> ( <prompt> [,<title>] [,<defaults>] [,<xpos>][,<ypos>] [,<help file>,<context>]) . <p>Аргументи <запрошення>, <заголовок>, <файл довідки>,<зміст> мають таке ж призначення, що й у функції <b>MsgBox</b><b>. </b> </p> <p>Аргумент<b> <за замовчуванням> - </b>це необов’язковий аргумент стрічкового типу, який на початку з’являється у полі введення діалогового вікна у вигляді тексту, поки користувач не введе в це поле потрібне значення. </p> <p>Аргумент <b><хпоз> , <упоз> </b>- це необов’язкові цілочисельні аргументи, які у разі їч присутності у функції визначають відповідно положення лівого і верхнього кутів діалогового вікна введення.</p> <br /> <br />Приклад. Оператор x= InputBox <b>(“</b>Введіть значення аргумента <b>x</b><b>!”) </b>виведе на екран діалогове вікно (рис.13.5). <br /><img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAW0AAACaCAIAAADtg45gAAAACXBIWXMAAA7EAAAOwwHaapjcAAAUX0lEQVR4nO2dbawc1XnHz5mZ3b0vtsEGv12cRCgvoKKkkfKhH6IATUiVlDQooJDYUCjUWFhEBUGFUI0iIpW2oIaUFCsGHFNIZFJQk5CoDYkj1SalVkRVqc2HJEVp1BCba19b9/r63r27Oy+nz3PO7Ozc2d3Z2Z29u3ev/z+ZZebMmXPOnd3zn+c5r45SSnTPsWPHrrnmmh5uXCWg/MMF5R8ufS+/0xwkP/WfUtp0oNwSn9syvFAc4+OSLRxbeO8Rh6albStfCS8QliUsIYJ6Ep7VxyKuDFeJA2eGXYYIu/tbPiAOzPa/IIOj1/LLWr9L0htXiqdPDbsMnVDx3xUd+7HTq8ST5vdPz7Moap4o6tpbs0TR4TDh8T9X1/2CqguFI1wlqtPq6PsTWTmkTNHJ7//txfRZ3HGFnBxfN2aVxjhwnHRjTExQUmNiXJfE1mla7bUiCNpeAs2kPEmQAD+trkj8tOjp+R7X3+izHUtuMmS+yp9zi+L8/CZ57c/E/MLRrzQ03YnMG+uP/ktu3O5MTHoFv2CxDlUrgqRkyRclT6tWVdSMwOk8inVTpta+NACAYeHV7Q/Hbpx6lXrgWLLmWp4IYv5JtbrsarV+o7Rl6YNXVU+Vr933a/VvoWES3ic/+oa4aJsqn3PHLFEVVXfWJGIVHGk5QhacglNVylasb46l6LgktdboQBNCpxSofEEfnsBLFvSfoNZLc96FiVWU9LhUiWuoLxuGnFzypauk7QrfD1xHUY11bVHwyY+RBd2gwXW4rjFeQBVeKEeUK2ETh6M/vSUxJuXVv1KvvVssax9xZ8TEJrW4EJ6SXpE8BEFgeVbBc30tDBbH97SzZfIxBgodW4EnPbshcH7cGQOgP+Dt1AVV/bi0RRC2lATalQhUIJSosCIrP6BTDizrU/I7VF1xzIHP4dL3FFdoz5yyoFRdsVAR//cLIeo6Ij/0mth2mRDn+JqhVNAG0Bjf5FO2gQo9LbIzCo2CBg0vSpLiuPV2HQ9ebFdAc8HK0NyeRKrhq3HLO7h78oYPXzw53l0b/+Efndn9+G+WSHTIMHTLYmqL3PK8On173R6ZPiEuGpeyrEoTLe+X9QIp4SYCSdKkktxxIwLusjExA9ifAAyVqIFEaiPA2Bce19OD96z77Pvmzu3/68W5s0F5UVUrynOVW+OGWY9bT5X2J1RNN4qQ+1OreJWlhQ2b//DRQwcffOctD70ppCsqZeEtmhy0jsyfEBsuaypFoSlEF6muHbpkoXywZkQujVEQHzqSGQXzLTN4Vj1Dj86XVD/JSdl13SVnn3jc2fYOednlwcI5//ycqlVFraZ0j44WESVIWXxfeTW6ZJFkLJ4X52aPP3DbDS//R5hgxRJWTVR/JUIdWSiIDTzoQ1aFKi3Lmg0NSSkq/r+tVc3TAiFFaIMEsWEjkQ3iwVAHYBXAr3NL2EZBZKyuCn9+1tlxubRtYTvSKYjAV4HWDqVbU5VSFld9RbaMFcaxnMLC9InQFaqRUlSi1JaNQwssrSKlAhsj3FnEwkF6YT65W0joRheSEsdYIiaKlXTDJJrDugHvWLAShNphDuq4VIe51qvF88HCvHQcVSmr6pKqVhXZIy79c9nHIVlxudGVP30dQkaKZVm2FpFiQbi+CC4S1lmTal1HVEFYRW6G9Ys8SqRok6iQPpBYSLtRCIvcmrqUaAtJNBpEGqWHR9MlkN3s4FllJ+AGiMYpq0ljVCsJRLAwR7aGWlqc/Ohnxj/0kekHdgkKJCnxqoLVpEpVe8fh4wtH/mn22UfJWpGWxZYL30wGR5kPSDQ0ZmjqRhYYT5+SatS/KvX8Fnn7aXNsaWHzDl3q3HmGjREv8F/YQiH2bacH9jJVL02ZA3nzySzRskTuKuu+JAVygUGPXSHNELQWdZTtjvKisC1VrZGIUMi2Lx8+uffTyqsJlhK2Td7xj29Q+LqP3zR74Ets2jRbCEE4pDWyR0qioHtqwqbd0AYhKWHh0JCI0GfpBweqn7w7SmfsyDOVj+8JwkYTySY6GzX9N0lMTZ7c/pf0SQVdfPthkVqxTUwTufyRO/tShomfHOpXUqBHWkwIA21I1VzlVoNajUwMEpRTD92+9W+ep8Cpr33vxJ3XicAXvmdEhHjrhivJbJFSz6CLpvX6Y9w+ssweieNb9bCwY5mF4/q9iVjSsZzbzpaOfI2Phc1j9cmCIvmgzFZMSgzxmpxesVHnwQWNqchxNVlul3B3r6UbN31/+t7PbnvyZQq87NCPf/vHH97x4k9NnLc+/V6OwJWa3JC6TaKK8UZWkdSRYlGUtF8TaxMR7NQsc0oty64d3KgPHyY14aK+cEl0Ve4y8yAt9dLmRuDNM5x7U0g8sDmk+UYyQygkcSraUognmEg/nk567i3TBGBEcHlgu9BzeS09Ft0M8KqU7VqVp+spwQNNpTr5hRumnnqFLu34xuvmzhM3Xkn2itL9ACwiQWMcmVhv8cxdOWnOtI4U17F9Uhxjx8TXTSSkO06oHVRXnT3z3jMbonIFll3cPWukhEwS42IYP4KO1eGtcueZaCo8hVPgxE+eTkZ7aTNFUy9eGsVJhMSjxcPJT5E7746flq9t+FkRoeOz84z5pPiJ9FVqeeKBy9JdrrD9AS3TYAUpxv7v8EIBprnEc8kekYVi6EPw0A518u5PTB141UQ/+fn3S0txOM/NITXhbmB2eYiCFK42SbxFUdggWvg1VE8cGc7MqVP6/lfJ9GhEsWzuUm6i/LF75c7ZiaP7dd2+JwrnwHi0+qWJoweiZKMbo5B4tHhq8ePm04ioJcVEoPTVixvjMhFPIXvuPa0V0okVSBIAxrcbVdwzbaJFE6JcN/Bq3I/LI8G0x2KJqf2vRrdOfetn0zdfwQLCfg1ZIr7w6VO7SVIPHqmR+xK3R9SEKDjRmQ5x1D+sF3VLwYSZY/pXuoe7lFsUWrG+kJokw21nWaDdUCh563n1zfWh7XDrvYm7Oh83n8ZoUZKWl3QK8ZDoT+6cOxgw/grYg2uY6BXlB8LRhokXGr/KrapaVVk2DyEhLVFq+99/z1ya3nP1tmdeo4Mtz70x8ycfJKtE+TxhWHqBFdkj5NRMenqGLg86M+sYbaovPFBgY8QuiuUk6pXz7ce9Gx9sUeaSDLg5N/l6NZORW57SsXVHefzVJ9iJ+OZ6Om4XLUtq6fmmlCFxNWGwpEfOj1olS3yNBBg+kgdWk3pXLPfsVpXj8IgOaW3/6ndM+PTej9HFU3/6e1u//lNrcsPWl//39Gem9Jh6X/IweW1AsD3S+NWShuh1jJyf69Oi8KSYYBEx6yqm0cqvCWw7eFbffseymqGWe0/x0+C5CR0/VCUSlMiziEdrd9x82u6Seo4LFplU8RJSNHM1Hlj+xIPNgenZ9U5StwHoB16rk7pBx8YI/eNxZXLqwL+YwLf3/gH7OGwNqJnbP7D5+f+mwC3fOXn6+k2W7ykvEMavKVj8qyWPZYnrL2lIrFYUfFHSywhI25IN69H5guc95SRf0bHmRvse5e+XcfeH0l76VMNgkWaw2101Upl4tCgwquTtoslYMROp0UHLZxilYGI259ic0QRffbA5kP6WjtmBwaA8NCZlxjFDV80YVkf7ILrfRY8B4SHw1QrbI1RZXvvnyauvf3vPdTxHTnncFMLTbfyZXe/dfPjNpR++wKeeJ1ySEp2mLPC6Jv6YnmWjs+IPz+TgRC6Jcmxnr1v67mNcCinH7gt44aKd+8YeCOzDf2XKVrpfOS8+ymk60rlXlF5qCE3lxn1S68vYt3WEYthXGoW0jNYypGNq4zpC/Oklbh/nkH0mJJ5UPLxj7inZgUGi+wxARpzGgRtZ0r6ZdEO6oGpL5ENYSs19/bG5Q4+R8yLNvFvl8kBVcmF8l52aWoXkQ+l5wI3tJcgkWaLPIJaT2xiEb4wRE7d600O2o3hmryVJRDjYkv6tYS2SWlnCI4q86+HIdJJcSk6jucq1rIT9jZYlZnSaMaP0cDAwrALaWbsjcHVtNs+N1SS0FVy3FlSWLPIsgkDajrQk9+lSbSfPR3lWQCJSk16Ne3nIDHE9z/VdLwilouDoZYhcXoVE08LbJ8vGIutFj1HVY9KEDFTLvklp8zwgWynf+EFOwwuTDr7vrCgP71iwUpDyhlIizLgPPl5c8hc3TanZGTq1i3o0Gnf8BpL7gAOpfJvMFt8lB0fRp8fujOeqc6Qb29+VzCDghRuTOqJcP1zrVQ+OIj/JJhGxePaeuR5GUw2Z8KPGlLqIoGIAsEpoiEiMV/59/pNf/tbxP/v8ubdPFAsODzWTPEDetIyyjpBtEPiWCnxewJVOg5qvgm3vuubAdw//eLZ5VHekI42R96pS9W3HVtpi8Qp+iRKStlmjyI16akhnWpRP6a13wsEqIBu+j7ZDsGKEOlJvu9BVc/dzxYN3vHPXkZ93lRJZMa+8Pr97Pxk1nlDLRpAtt0cWF0VJb3dBRo2vx5I4vlhy7OJSuPy7bcfWdi4GTZ35yiW7iK0RBSXpAphv2cFSe5nxdF32zARaX0+3s4X2HpaUdcvTxVv2LzbaIuJKwF0zip0gR/fyGCVyTby688FdNg0pid09tyguFuLUGVG0JcNhQYH31OMW3vo4TsXtJraw6z99Olg+xFBhxCFYOarQkcyw82HHe1Ea+F4oyNFFqXfX9WPDSAMdQp+mmYLbN3TziulHLo7paSchTe2sRZ2M0gPuyYlx67OD69ITiUTDrVHR4iP1A9ANvW3VfmGC31YX+KmGrh37TAQmIsQbQ8brB5UxUZ5n/TDj4um/0tTkRb+7YX5m9rdPubGIAADQjsqlN1ri5LRZEg2zzgAAeYGOAADyAh0BAOSFdQRTsQEAXcObeC6ZQ9gjAIC8mHWMpjpHBACAVtTXMRJvDrskAIBRJVzHSGG9cgBADtA+AgDIC3QEgAFx6dYrh12Erjlz6hdZokFHABgcIzSX6v777vrKkwczRtbtI5i3DsCgmJ97a9hF6MyRH/4gU7z6vMms9kjcJMto6qQklTMFkB98C0PErZU7RxopuvBrop9dzp8gfr4ArDF6bx9paaFEgXGxSAQaGUq0OZmQdhLTMoXoUhSYP076XaJJBJsTTMRMhHSbY0o5E0+v+a54Ifv1DgCgJV3oSPPPNEuViGK2++ln+VlnqQYd4/RWnRJ3dcw0JSQ9iyjxLOVs+fTSH366UoMRot0rfIhvi1x+TbOy5OzZavdGjS6lZJQl6yx3dfUndPv3tqzS8cA8pUqJAxFZMyS+x+avdShfdK5+3yzv3q7+qhRBTbyBE4LSbDU0W0Ati5fikaWk01zI/g4NyFLOgRUGjBDDelvoDX1XIN3V8PZLN166Kl5zY0eeUrVTyWb69RhbGkH5kwWrikFXOt43MxSPXO0jiZD4qzte8Vp6/hmzSA+PSLEaWsbJ/rjTW2RSHJCev9HeypnFbopLyWoQerBmyKojKZZ29miJNo6U4/RkW96V5faO6WQJSSlYehaGdo2jXZUzY17ZswBrgCG2gq3suPiMP3QAQF8YlpTwOkZKbBtwrmuVLN8fxBSsKIOTEhXu+h2tY/TLFc8SANAPEg1h7ZoXBmmVhOsYAQBGiCxNk6t3HBoAALRkpcaPAADWOira5Rv2CAAgL9ARAEBeoCMADJSsS42NFEZH0EICwCC4/767hl2EvtLtuooAgPxkXzl5tICOADAg1vBQZugIACAvet8JNI8AALqmIRywRwAAeYGOADAgLtlyxbCL0B3333fXvr/48ywxoSMADI6R2EzP0NU4Fz2/ZnT2HAVg1FlDm+k1dIPXMRJYxwgA0CtYxwgAkBesYwQA6ANm/AgGkACwuui4eGKelPs+shb2CACrjo6bb642oCMArHZWuYgI9PsCMEI071cZLR/fcadq0Xc9kiIaGg97BICRIS4Nif1Vm7dwbheyEgWDjgAwMjRv4ZxlO9q+7G+fDnQEgNEgYVlkv3EAzStYVxGA1U5v/kjzXfBrALiAaLn5ZiKw443Nd62cYQIdAWA10u3mm9Fx840D2LITOgIAyAt0BACQF+gIACAv0BEAQF7MOkbbh10MAMCoEq1j9D/DLgkAFwRrcnNfrGMEwOBYa5v7xoCOADAgMu7hMIpARwAAeYGOAADyAh0BAOQFOgIAyAt0BACQF+gIACAv0BEAQF6gIwCAvEBHAAB5gY4AAHpDivrOV9ARAEBeoCMAgLxARwAAecE6RgCAnlDK7HyFdYwAAHnBOkYAgD7AOqI6xgIAgPbAHgEA5AU6AgDIC3QEAJAX6AgAoDckd/1qoCMAgLxARwAAeYGOAADyAh0BAPSKDP8PHQEA5AU6AgDIC3QEAJAX6AgAoCdkY2YedAQAkJes6xgd/ddjAygNAGD1cNPn9pw9/cuO0bpbx+j142/kLhgAYDR45JEvZozZ9TpGT/zds92XBwAweszPvdUpiowGkKB9BACQF+gIACAvveiIlDJ+qhQWZgTggoZ1RHaM1QS0AwCA9UcAAH2jRx2JXBsYJgCAHnUkkg8SFEgJABc4Zv+a7oQAwgEA0PtyYvwIAKBP9NjvC5MEABDRi46QiKCdFQAQYcaPdD2CBPIBAIg2B0f7CAAgL9ARAEBeeB0jJTuvYwQAAMuQ5NZwk0h36xg98sgXMyxJAAC4sOhiHaObPrdnRYsCABhdsupIlmUaAQAXJrrfF324AIBuUQ3tQH8NACAv0BEAQF6gIwCAvEBHAAC9Um9ahY4AAPICHQEA5AU6AgDIC+tIZbosjs9MXL7ud760cX5mVtXWt4tdrZYGWDYAwGplcUbM/SY60/aI/+vK2fnKWWFm3vSacMoiJj2l2VtBeiuFTF2BJWWxlbQb29+l2t+VNiiwh42Gen6MvRW+p7wG+k0PMsFeGeTPo0eoGLYQgQhcc651JJgRi+cHWAgAwJpCrxc/0/UcvGPHjumJwqMKyj9cUP7h0vfy/z/gI7C9Tdp7gAAAAABJRU5ErkJggg==" name="Рисунок 34" align="bottom" width="365" height="154" border="0"> <br />Рис. 13.5. Вікно введення даних, отримане за допомогою функції <i><b>InputBox</b></i><i><b> .</b></i> <br /><i><b>Питання до лекції №13</b></i> <br /><ol> <li/> <br />Що таке панель інструментів? <br /><li/> <br />З якою метою використовують вікно форми? <br /><li/> <br />З якою метою використовують вікно властивостей? Що відображає вікно проекту? <br /><li/> <br />Що відображає вікно коду? <br /><li/> <br />З якою метою використовують вікно розкладки? <br /><li/> <br />Як розділити логічний рядок програми на два фізичні?Як задати явне оголошення змінних? <br /><li/> <br />Що таке неявне оголошення змінних?Опишіть тип Variant. <br /><li/> <br />Як формується назва процедури опрацювання події? Що таке загальна процедура? <br /><li/> <br />Що таке модуль форми? <br /><li/> <br />Що таке програмний модуль? <br /><li/> <br />Опишіть функцію MsgBox. <br /><li/> <br />Опишіть функцію InputBox. <br /></ol> <br /> <p> <b>Лекція №14-15. Оператори мови </b><b>VBA</b><b> та програмування типових обчислювальних процесів.</b></p> <br /><b>План</b> <br /><ol> <li/> <br /><b>Оператор присвоєння.</b> <br /><li/> <br /><b>Програмування лінійних обчислювальних процесів.</b> <br /><li/> <br /><b>Логічні операції та логічні вирази.</b> <br /><li/> <br /><b>Умовний оператор альтернативи </b><b>If</b><b> … </b><b>Then</b><b> … </b><b>Else</b><b>.</b> <br /><li/> <br /><b>Програмування розгалужених обчислювальних процесів з використанням оператора If.</b> <br /><li/> <br /><b>Умовний оператор вибору </b><b>Select</b> <b>Case</b><b>.</b> <br /><li/> <br /><b>Програмування розгалужених обчислювальних процесів з використанням оператора </b><b>Select</b> <b>Case</b><b>.</b> <br /><li/> <br /><b>Оператор циклу </b><b>For</b><b> … </b><b>Next</b><b>.</b> <br /><li/> <br /><b>Програмування </b><b>циклічних</b><b> обчислювальних процесів з використанням оператора </b><b>For</b><b> … </b><b>Next</b><b>.</b> <br /><li/> <br /><b>Оператор циклу </b><b>Do</b><b> … </b><b>Loop</b><b>.</b> <br /><li/> <br /><b>Програмування </b><b>циклічних</b><b> обчислювальних процесів з використанням оператора </b><b>Do</b><b> … </b><b>Loop</b><b>.</b> <br /><li/> <br /><b>Оператор циклу </b><b>For</b><b> … </b><b>Each</b><b>.</b> <br /></ol> <br /> <br /> <br /><ol> <li/> <br /><b>Оператор присвоєння.</b> <br /></ol> <br />Оператор присвоєння має такий формат: <b>А</b> <b>=</b> <b>В</b>, де <b>А</b> – проста змінна, елемент масиву або властивість об’єкту; <b>В </b>– константа, <a href="/meta-uroku-dati-ponyattya-pro-chislivnik.html">змінна або вираз</a>, значення якого присвоюється елементу <b>А.</b> <p>Таким чином, наведений вище формат означає: елементу <b>А</b> присвоїти значення елементу <b>В</b>.</p> <p>Приклади операторів присвоєння: </p> <p>V = Pi * R^2 * H</p> <p>I = I + 1 </p> <p>A(3, 4) = 12.5;</p> <p>Workbooks(“Книга 1”).Worksheets(“Лист 2”).Cells(1,5) = -8,9 </p> <p>Range(“D5”).Formula = “=D2+D3”</p> <p>theFilename = “C:\VBA\Examples\Examp.xls” </p> <p>У більшості випадків елементи <b>А </b>та <b>В </b>у форматі оператора присвоєння повинні бути одного і того ж типу. З метою перетворення даних з одного типу в інший можна використати функції перетворення типів, наведені у табл.11.1.</p> <br />Таблиця 14.1. Функції перетворення типів <br /><table width="471" cellpadding="7" cellspacing="0"> <col width="22"> <col width="127"> <col width="278"> <tr> <td width="22" bgcolor="#ffffff"> <br />№ <i><b>з/п</b></i> <br /></td> <td width="127" bgcolor="#ffffff"> <br /><i><b>Функція</b></i> <br /></td> <td width="278" bgcolor="#ffffff"> <br /><i><b>Що виконує функція</b></i> <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />1 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СBool(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип Boolean <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />2 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СCur(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип Currency <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />3 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СDate(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип Date <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />4 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СDbl(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип Double <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />5 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СInt(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип Integer <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />6 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СLng(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип Long <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />7 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СSng(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип Single <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />8 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СStr(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип String <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />9 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СVar(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в тип Variant <br /></td> </tr> <tr valign="top"> <td width="22" bgcolor="#ffffff"> <br />10 <br /></td> <td width="127" bgcolor="#ffffff"> <br />СVErr(аргумент) <br /></td> <td width="278" bgcolor="#ffffff"> <br />Перетворює аргумент в номер помилки <br /></td> </tr> </table> <br />Використовуючи функції перетворення типів, варто слідкувати за тим, щоб таке перетворення мало смисл. Наприклад, дадуть результати функції СSng(7), СSng(“45,34”), СSng(False), але функція СSng(“Луцьк”), СSng(“-54, Б33”) позбавлені смислу. <br /><ol start="2"> <li/> <br /><b>Програмування лінійних обчислювальних процесів.</b> <br /></ol> <br /><i><b>Формулювання задачі. </b></i>Скласти підпрограму розв’язування такої задачі. Дано: <i><b>R</b></i>- радіус основи прямого кругового циліндра; <i><b>H</b></i>- радіус основи прямого кругового циліндра . Обчислити: площу бічної поверхні прямого кругового циліндра <img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAADAAAAAMCAIAAACr2KkGAAAC2ElEQVR4nM2US0hqYRDHiywiCFJS0xYtMjdGhgsXRlLQpk3SY2EEEm0yJFKQyIXRC4VaSGASFdKlwAckPVBDV7URI+i1SCgStQeFiwgKKtP+9F3OPfa6m8ulWc2ZM9/M7/vPnMPIZDI5P8kYlOd2uw0Gw/n5uUAgqKqqWl9fR5DFYtnt9paWlm9KVFdXn52dsdns0dHR7u5u+quOjg6PxwOHx+Ohfl1dnUKh2NjY6O/vn56ebmtrW11d7evrm5mZ+QRIo9Fsbm6i+uzsbGNjYywW29vb29/fb2pqSiaT3wAVFxff3t4eHx83NDS8AwLi6ekpiuzs7LS2tl5cXIyPj8fjcdDg7cjIyMnJCZ0mC6i8vNzlcolEooGBgaWlpdra2peXl0QiIZFIqJz7+3v64aKiotzc3FAoRDTgcrnvWLe2tiorK5+eniKRCFRH5ODgAJXJ28PDQ8qXy+Xb29tZQD6fT6vVYl6YEVJ/vRl6eL1ekgC+iYkJej+dTsfhcIg/Pz8/OTlJ/J6enuXl5fz8/HQ6/fj4WFhYODg4iOkQCFKZZFJHCE0WEJ/Px5gxYJVKVVNTEwgEMAJcsb29PRqNIiEvL89sNud8ZisrK0KhkKza5eWl3+/HEalUCr2B4nQ6oURJSQlRCJWxBvCbm5vFYvG7Ur+BTCYTFq2goAAfHZPJxD3ABB8zSqVSlEJ6vZ5+eGhoCBI6HI6KigqZTIbI0dHR3NycWq1eW1u7urq6u7tDHew7IkqlkiiECDmO3foSKBwOT01NPT8/I7u+vn5hYaGsrAySYPBoQHLwaLFYPsrT1dVF+b29vWgTDAaNRmNpaSm+Bii0uLiI8Q0PD2OFb25uxsbGrFZrZ2fn9fU19tpms+Eg+oL1DxAuRO8BCMAxGAzs7KczohsW5WPQ8mbUI7UikJNyKB9yPDw8ZCn00XCnv6L8K8MfB3tG/C+B/qft7u5S/o8AotsrZn5U4Svr2YYAAAAASUVORK5CYII="> площу повної поверхні прямого кругового циліндра <img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAEAAAAAOCAIAAAAQWY2VAAADFUlEQVR4nNVVTUgqYRTN0oIgyCizWrQpQY0oFy0CpaBdoJQtgiCkTUFEBhG2MOiHAlu0aREW4iNJi1Iz+iFBMAgpgsoWFYgiqRm4aFOBWXZoHtPXWLZ4xMO7unxzz51z7j3fDDuZTGZlcrD/N4F/jYwRcH19/fT0VFdXxzj/ELC2tjY6OhoKhaqqqoRCodVqxSGfz5+fn29vb0/fncRWV1c7HA4cFhUVGQwGuVz+Haqmpsbv95eUlIyPj6tUKsbTjo4OikNZWRn6CwSC/f19Ho9XXl7+tYD+/v69vT00XVhYaGlp8fl8Z2dnR0dHra2tPwogsc3NzcFg8PT0FHD0icVi36EKCgru7+8vLy+bmppSBUAVxeH4+LitrS0cDr++vjLYfxJQUVGxuroqFosHBwdXVlZqa2ufn59BBaLpmoeHBxKcn5/PYrEY2OXlZSz65eXl5uZGIpGkke3xeLLeB1xaWsp4dHt763K5wCEej19dXWGrs7OzhYWFGEdxcTEKZDLZwcHBJwE7OztqtRoewN7Pz89NJtP6+jpaGI1GqgCcpqamyNcMDQ1R8kis1+v98x6gtb29TdZnZ2djigyui4uLOp2Oynt6evBeDoeTl5enUChM7zEyMmK328GeRFHsPwnAdmC1ra2t7u5ujBCGgwFITE5OzszMzJezJLHQDCxc4Xa7lUplIBCg2adq2NjYgLmpexKJRHZ3d1Hf0NAA88A26GOxWECGwZ6MvwKmp6cHBgZyc3PxW+ByudgAeDBKsYHh4WHyRKPRYMwMLDYALHL4LZFI0MXgzWBvNpsrKysbGxuRX1xc6PX6vr6+zc1N+GdycpLigCuOw87Ozh8E4LLCZDA9MCKRyGazYQCHh4dkKTYwNzeX2oLESqXSpaUlfLtQDOOCE1nJ8E9XVxed9/b24r46nU6tVltfXx+NRu/u7mAeGBiOGhsbm5iYILF4Fyb1IQC6v5P4YzCwIA0xbDabut9pIvU+IOgZ4TpRCW13OjCyx8dHKv+VHxlm9htt6cBXG3eDyjPmT0zGyckJnWekADLeANpmkEesP9XLAAAAAElFTkSuQmCC"> об’єм прямого кругового циліндра <img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAACsAAAAMCAIAAAB0ltMZAAACNElEQVR4nMVUT2jxcRwmU9pJC0XmIqcVTi6uIieRA5d35cRhhzWkFvlXhKWVUS68RUTJclhtp6124YIToZW/WTspicL7RNnvnb3l8rbn9Pw+38/3+zzfz/Ptd7Rer0k/iqOflf9fDprN5mw2E4vFhzq4ubmxWCzn5+eJRMJqtYZCIY/Hc319faCeVqstFAogbDY7l8tJpdKTk5PHx0cWi8XhcFBXqVSlUuni4uL29laj0RSLRZPJdHd39+ng6uoKktFoFFwul7darcPlAZfL1W63q9VquVxWq9WDwYDJZK5Wq608gMO73S7kwZ1OJ87fyZN2KZyenvb7fYFAgO50Ok0UmE6nxM/j42MymUysPD8/8/n8xWLRaDRwAirBYJBOp398fDAYDHzWarVdIvV6/Us6nw56vV6lUsHEuFzubnm5XHq9XuKGy8tLjBfEYDCkUikqlYrrzudzGo2GBDFhLCFT4hao/t5g+xkIBL5xwOPxOp3Ow8NDPp8nLlMoFJ/PR9rDcDhE89vbm0QiOTs7g3Y2m8XlcPX9ZswAz0Imk4ErlUqRSPT9DPx+fyaTgSRxGTMwm83Eis1me39/j8fjRqPx/v5+NBpNJhOhUIjsUdHpdPsOMAM0bDmeyz8dKBQKXOjLZhgKh8NfinhNOOjp6clutyNp5I0ZJJNJJOJwONxuN7FZr9fDMYqRSAR8PB5jO6by+vr6l4NfG+zb/xaxWGxLwhvs6i8vL/vNmQ32+Q4//0/8A5NuAnl+gMtDAAAAAElFTkSuQmCC"> <br />Нижче наведені форма та програмний код розв’язування даної задачі. <br /><img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAkoAAAFQCAIAAADP5MauAAAACXBIWXMAAA7DAAAOxAGILj6jAAAiZ0lEQVR4nO3dfczkxmHf8SGXu8+jO0euZL2eFRhpEFhAkDRA/iiK1i9tnMKFE6exUNkyEqd2YNmCiyiwgySIDEcp6iJ2ECMvDixLiA5OCytVkJemTWxDbi3ZNQTHQIDGf8RGkKKFovOdXnKn091zz+6SnM6Qu3z4kMPZIZf77O7s9wPpER8+w+GQD8UfZ8jlE73hDW946qmnpJRiCwVBsNXtV1Tj1SasuxXd0f71ov3rRfvXy97+qPJ98CN/GQQDNSGne/r7QTD7wWhfT+8NRDQQcaK+BoOBTKSIUxGGIhQinVcRh71vQ6N3PP+U/iqCe144uZX27HvFQ9vbeLGo/YOTa0hH3y8eurjuNixje9ofTExz7xSfvnDSLekT7W9Plk8Lajo59tNx/h91tIzEJBajLFomoRhFep6I9T/TLJiGqlfzWvFr53WQTaUYn5dPfl+5pqN4C3/0f6uvozteG5y+7hX74d6+nnmdirN9cUpVsi+uy9owyJYImyMsTRt/hF1jOU6wazgzoFA5M6hjI4l1uBRfm1ybVudczuLw0lXx8uUbgzd+Q1y+Iv/yn+Q/msWbyrbghtujU6fjYTIMdTCOD4VKuGuJ2IuzGB2LSZ64We2jeSxOmtsBAEBFPO+tRYOjb+PD+cz9aqyEsUhL44zj8bGfjucLBoNg7we+d3zhIPhn35D/S3fjsoX++V/I6EZ58NJ0P1Qdw/H0Yr54OIyCMBLBMBpGYykHUgduFEo1vRdkEZjNzOeob9VMmQj1JRZctAM4Jp1s6w1y9CscBepgkHs6PpLgqFMfXEuCqQwGU5Ek6TSSKk6mAzFMRKxSKLtlpgNmHn1xqtJIyEgcHM5uokXZ1/ia2A+C1/+t/PJ3zzNx+rw4daO8emX2rQpQlVppmoZxOIynSZZXoS4cZ2Ol+Rry7pyaDtM4iAdHiZscH0sFsPO45sXMODsYsl7U7C5cmo0KpjIVUhzqyyCZpOpbPfMg+3ai/p0HYT6R6PlBEkudNnH+rc658VRcORT/75tCfHf01Mv/Xtx2oxAv6bm5vWHWUdzXxRO1wlTOBkpVr2x41MT0aBA0UEE4nd8tjBliR4ELHQA19TuxKswSOQySd79u9Mv3vOrMq6qPPdq97+P/9+zn/n6qQm4ixfRAnLkluOUzWRXnnxWvvC4IDuTeKeOSwbwpUkwrM1XGBjLQj1CKVD88mZdMGYUAAJgUN9+CrOOU98ZiHSLvfuPok2+98tLZX3vu0ovpwVU5PpTxVE4n+lmUWD83KbOhQTnJbrglSTo5jA+vXbn+5o999FGR3vDw4+dFMBWHByK+KvS9t8vPiutfXVv/sDYna8w80rI2zVJNR1kxLpkHW0K8ISPpymOOgwFG6sBIAhUeQRJ/+v7XvPiJX4hu+87g1d+VXnkpefmSnIzFZCKzZyuzbJNCBV6SyHiifhSqJLv6snjp4tMfetcvn/2ajjflMBThRIz/NhJXhuJ6/WG1YCzk3rGV6m5ZoOqS+r+DLGbjLLcCMeuxpaWPuxU9tpjxKABAM90FCsUgD7agFCQiuXwxuuO7gsFADKIgGoo0kWkWaTJ7gERKGepckqrnF87KhNHwyvlnz9w80stPVIzNHqY8Gt9Mwyzc9oa666Yf2NR5pmIs/6ofzRTZrTyVcFHeb8uLhNVR1IBbyJjjgh1AxSzS8om5qQoYnUfy6svplctBFMnDAzm+JsdjqXpvU/XPVA9UqrSb6udM9Nckm6O6dGEYDrKHP0ZDMU1E+koRvihm8SaHIhzpZ06Skf5022igsk7FlsqwYHC0+lAERcJlPUlxdLPtqN0MS6KEax0UOBiQS/UtrqNvdcgdvbtE5VZ65ZLqmclrV0//ix+/7gdfd/5D7xRqpkq4eCx0yI1V7tzx2aevPPGHFx/5qOrbBWGo+3l6YdVJO9AToe7JRSK8QSdenE2rMJsfgqHUAZY+enO5VdF7XlBdt/jRm9T04F3PqQBuujiXj59RX4O7z+XT+URlukl5WXf5Uh0W3Hbddhdw0ngFBApB/oluQ4DoXtrBVTEI5Xiisk3Nue3XP3vuvrfKeCJ0wume3Hf+l6+r+a/44bsuPvQruiNY71Wl+jmUvPe2J4bZM5Oz51h0j01lW951O337f1Bfr377w+rr3uceGv+r9+eL7z/x8OEP3xsOwnR2Qy7QI1G6C3i0qlNfefTgde9RZ95y9uQzF26+YzFRCra8qWpLHBf0ifvuAtaj3ZPe8Jf1QkdOx+lkojpkKucu/OJP3fqrn1Ezz3zqT599z5tEmogkzrNNeebH7lSdvCDIXnlcvFU/2df33ma9t7IknM8YCFX7vPz4LfeVS6k+nMo5oUNTJ7B+RZjqaapUU6uZJ1weY8Uixbcu2VNZ1lGebTt4iu+2uwBgPfKUKYfc8V6c/jxAmD3VkSTn7/83t/3mH6iZr370i3/3k//0jse+lpd55q3fowvoxIkCOe/ByVHxXIk4Fm+jkdjLBidL99tyYemFA/nIpBAfjt6l793Fv/cq9TX4yRf1Ay2P6R8F77wgH781LxPc/bxe4+N6hDO4+32zpj9+8/H5x6bziWLZY9v8+NFIafHTfKbKtrx/WZlvWZGxMZXKK/MtFdZX7TLTpf5KyW67q165Ywvtu9G+OcZKRGmfA9hhU/1WLZH9NYAwex1W/qnpw4PBZKy7TVLol4oE8ty/+7Ezn/yv6kd3/Kev5ks++7Y7df8re3JNZ1t69OFs8R2h/gsAwWmh4230Ct2PG+3r0cUku/2mgjDST1wWrUjDo+no3svxw9erib0nPjV+88/kM0998VMHb5r18E596ZHgnvfnUXfqK58+eONsMDOfbppfTBuXVfKZxUipPkWW/giOmqO+VWUq8y0rKjcmj8amysvDs5VKigWNS5Vnqq+nnnyobf3lPdBqdy2svLKx9t3btNWVwoZKSjGmK3nd+/Koy6frrQWwM0al/0b6L+Dkt+Liqeq9BcPRbDhQfzBNnnv/m8889Pm8+Ll3fF8QSj1fv69ShZz+nIAet1SGgZhmHbj4qhhef3xwUmVbFOTvqUyDQXr2lAoz/XGBwVG8DcKGv+AlR6VvBsbp/PRnL9M8PXPwxg/kEyotiml1Ss1uHn64Mt+5MUeVB/dcPPXk75wqrUgcn7b8DbPaqo9mysduyJtnLGmsf9Yfvaf+17xa7C5L48t7smibcfc2Vd5UuGk3Hus4DrgVA+yqZHA0dBjnfwhwNHsUZDpN44l+0F9/vDobdgzFmd/5fLHomd//xvm7X6tzTQ9Oqn5bIhL1NRvrDLIPvU1GYi/vvclTYpjVWqxMRkEwCLO/CbD3337r8Ed/PhCl4cpB6YUmwWw6PxGXykT16aYyLsu6FDj4ofsXV9K00uMFjlXVtpLjP827Mlm2HetIuTRy1v977IbgJ14ufth6dzmsqFvhhS2p7EZbeeyCpHrXA7uruFpOUhFlXaN49qyHnI7lZCzDgf7om4o4KW//7T/Nf3T+3tff9vCX1cQtZ7/+/L/9AdWHk4n+kwNBnIZF703si9Nx9qb/vewUM/tbOkPddRtka1L1zg/FoHYrriCjWRsrJ+78jxfUp4s7ZOX5jssaZ1qmw3cfqN5n5ZTa1Bj7GptWZK8h/6n6R7Wk+Om1N3+w1YbkTv2P3ywWbLu7Wq2oVeG8JfbCclJd5GiPSXNr4S0+9oYmOuRmQZM9+j+WUaR7VUF4+2/9cT7//H0/pH544af/8a2/+7Xw9PW3/sH/ee7Hz2Qv9EoC/Y6u7H3Iuvd2dNKJVJJlEyMRB+KUzrYg+0RC8vAoum+qyspQdeZKH8ErDU6Wk+/aj/x8MS1LT6wU05WzYbnMwZsXLNu0oH06ePfk1Oc/Lkph0NSY8oLy7ChfVn97dqQrcWiV5afXff4TxdBfpR73+jvvLkuZzru33JLy7ioXrs+v7vORbTcC8FZs+mbeudddN/WP/ph2cOahP89nfvu+f6kHKvXT/PL5n/r+mz/zV2rmLX987rm33BgmsYxTkQ9ODkOdZd+hAknfrZqfYoaJyHpy+bBk/EiWbX/ysfFdvxjp23dHMXasMzcqDVSOSmVKJ658Oj+1lSOwXsY+Hb53kj4yKoIqr1AVaJqfK6/R0ph6JaeyUFTzVUCqkkGtkvqClVWXZ1bqz6kAsNdvrNZxur7VxsqbWmjclmLauLvUVjTNF4sOAOwCGdNfRybK+0v5m0qibCAxewIy+yyafv/W+FBm/a6rX/6z069/y7fvfZN+qbGM9W02/QrK5Pl3fs/Nn/2ba1/4Pf1tHIupSrisTn2/bKw/+qbfPKmrzuuOitFQGQ2KbBsEKu8CGQZ7H5TRYx/VPx4G+x9KB5/9j7p1AxndH+w9nl2Vh9HgA3L/j3SZYDSsTgtx+LYH9KtXLGVM0+V9UszP5RVa5tcXdGlMUYmac91//3h9LU2tFbVqLTPzChfWb6yh7e4ylin3pVo1W6WXavbgAw+4/y6a9rnALsmebwNE6UGPSEyLgaEk70epuJKTa+lgEEp56Xc/dunRjwmZBvn7++VUv44knopkqkcmJ4cq1WT2lwRk8TFt1YG7pr6mee1HA4951y0vpbNN34ALVbZlP5LJTzwwKxcGanr2zrBIjN+pr9bDLCXHd2dX7tlNQnU6K2peZrqs7fwlV1qZ03nBJevv0IBujXRsdof5Lq2F38Ihj5bgSDrNoiY/KnTIzfpX0+kkPbwWqn5VmgaDKFABpDpt+vnGJJBxmKpsmwTxRD9vqTpt0zieJtM4neXYMMr+JulU/9W3+ntyVA8wVL287E0k2Ue8RZBK4wPnwUC/FXMgZZI9Y6lrmg+iBhHH8Rbo9muK7hd7zsvKmAt2AAbqcmeWcCL/vJqePvf3ydUbz8iLz6tvB6Psw936kwFpoD8kkKpO1kB18pJpkKpO2zSI9ZhkPJUvqTi7/TXVFaTjY/Emp0n+zFv+924SkQ5UtoWD+QcD5g9uyqNT2yzbxFG2cUbbcIMPiHx4sPNvSne/+C0DWMJRtpX8yuMHv/rrv//0z7zjpW8/OxpG+pPbgX47V/5JNR1vqj+VJqFMkyRVvbqBTCeJTG97zRse+pP3/fZLlY/n5vF29MIveThOBtFAZg9ZxsNkT1URDPI/VTotHptU8Wdomcwe9Z59vA4bbPyvf0GcyG8qSXiaAIDJLN7md8eys9HZr0Qi/YeffuKvW9V07sXkw//5ytn/qbqAscjDK1PqvV29qkedoqzzl2SfgYsScS0ajK4ls+dcBipw56VHae1TLHKq+o/6ql4ScJihk4dCsrgIdkGcBU2cv4g/yd6MPBDZQKCKvIefDB/+4tWju13lEUb9kKTUI5lR9rxlHpDTIm/yv10zzLpi5UUvXRX/QIgLL4iRflgyH3FMh/sif5xl/oIJqe/JDcRgfs5SE8ffRCB5MQEAozHxhox+aHpQfqrxSBLProKKHwapCEP9bTESlGZz1Nf8Fom+g5bduss/aDDaz/4yjXb80ZJRVoHM3vMlRDid/2WBeZ+tyK6jsUlZ/LG3+QQwJ02D2NhNnBowk1hHdQalr5WZlQLlzxZdN5843BcHl3WyhXvR3pnTr/xH119+/uLffXJaKgIAwNY5vOltoTh3XqQTXh0BAPAQ8QYA8BDxBgDwEPEGAPAQ8QYA8BDxBgDwEPEGAPAQ8QZoT37pqXU3AYB219vvffG5by1fD/EGzHz16a+vuwnArnvwwY/0VVVUezEysLs+8RuPrLsJwE67fOmZZasIQxFfE/TeAABeIt4AAB4i3gAAHiLeAAAeIt4AV0Hpzxm2+lN2akH+9N0uW90B0PaYLMoXhRfOCY7/Fc/6WlzqXAviDWih/D+w+/+6ZNuOW+kB4H5Mlgvk0y5zhLX9jjWsBfEGLMV4oVq//m36377pOtd+RexSVf263nLeqV+hG7sFlZmdm9G0yeUCxjYYT6b2+u0bskwjLXvVuKOa9n+HBsMF8QYspSkwKmdeo6ZrW/sV8cKq6hfd9jCrb4hx04xn5ErGLLz2X3hpX9+NlsKVMo77YflGGhkH8RYeA0XhplSz/ypdWlKps4MtDdeTi7ebbr2zmH7hwjebyjT9aMnCJ1APdoGlU7WQ8Sp++Za4lKmfu92bbVfeqOVrW7hnuu3DEzg7O+6EznvJsmB96/rdzKbg33yRTE6urUWKNCVKq5jpK5PINrhrGqoStQ7NibXEcuIzDpp1bluPoWhfRe97b9W3gtyr7Xa0GA+zSp3l+b333rbUOgcnyyGXT1fm5BP5HHvhcp3lpVrVQzcOq7ai03erBvRSg3EkrRcLd9Ha92HdJjSmvFv6bY/LGPJmOtF4qyRNES2Wzlx5SNNRZamFXUags3qHJv/W8dq8vHjTfbvihGUfYTMWWHJQrv7Iw8J6urXTWMb+iEerBvSyMwsLf7ltb9fVK7Q02MLxyqCpZvc5betclxONt3rSWLKtrkPUGZdqqofwg13TqdAyJ5g/BFh8Wynv8rhEfY5xemHNTTV0qLDeS+jWjLZtEM3PnjTNcfmtdWtk5ZcrmneL4+6yp8jC9liKWQp0m7NM+ROzoU9OGjOvPt64cCnLaKelHqCztqcbbK++Rnp7rPBkbMXIpFh7vNkHJ9fSmHW3Aj7bipNCbhOa6thd9szmb+DmtzC3zntvTUOUebGisGPqGJfqdvcOALDtTi7eLIONovSwSf1HeT5ZChsrrA9FtlopAGCrbeK9N0sg9b4U4G51T8NjLVZ3D6n+mpimB0EXzjG+DKWyroV17qZNjDdgY1megcTWOeHfoP1da01zjI9WtqpzdVu04SIpdnfjgSUZTyVNV9+Wi/Gmy+164aY3E1bKuLfKpQ3lAsY2GE+y9vrtG7JMI5ua1LSjmvKgQ4NXasezqp3s10LvDWhhYQ41jUoV0/WTr7B2Cu2jWPWzc+VHTc2obMLCS373BtfLLGyAJWZaNdLIfj1hZ7meMG6CZb04ecQb0ELTZb50e69Ek95PheWuyfK1LcwSY0/Ipdpi8WWb2LwKl53QeS9ZFrQPKnZYEV23tog3YCnLn3eM3S93fWXYwlX0fnpd9S0i92qbur/u9dNX20DEG7CUDbmmttwf6qt++xl/RRG4jI1qzDKMI5/ebN3qEG9ACwvH0+Tx98lKh9fLtu1+1R95WHimW9gM93baH/Fo1YDKnCUbubDj1fZ2Xb1CS4Nd1NvvMmf5OncW8Qa4qp8sjE9bND0bYpnp8nSGS/31xzHcW7VMGwRvOnbbEJca3NfSrfzuIN4AeGX5k7vjxce6MDLpiHgDtskmnNdcOl7+2ZwN3JyWbDjiDQDgIeINAOAh4g0A4CHiDQDgIeINAOAh4g0A4CHiDQDgIeINAOAh4g0A4CHiDQDgoYg/UgQA8IdKNamTjd4bAMBDxBsAwEPEGwDAQ8QbAMBDxBsAwEPEGwDAQ8QbAMBDxBsAwEPEGwDAQ5FcdwsAAOiNDET2Oi56bwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA9FwbpbAABAf6SQ+n1c9N4AAB4i3gAAHiLeAAAeIt4AAB4i3gAAHiLeAAAeIt4AAB4i3gAAHiLeAAAeUvHGe0sAAB7JYo3eGwDAQ8QbAMBDxBsAwEPEGwDAQ8QbAMBDxBsAwEPEGwDAQ8QbAMBDxBsAwEOR5KUlAAB/zFKN3hsAwEPEGwDAQ8QbAMBDxBsAwEPEGzDz4IMfuXzpmXW3AkA/iDdAu+vt9667CQD6RLwB2ovPfWvdTQDQJ+INAOAh4g0A4KEokHLdbQAAoC+zUKP3BgDwEPEGAPAQ8QYA8BDxBgDwEPEGAPAQ8QYA8BDxBgDwEPEGAPAQ8QYA8FAkg2DdbQAAoGf03gAAHiLeAAAeIt4A7ckvPbXuJgDQ7nr7vb38/UXiDZj56tNfX3cTgF334IMf6asq4q27m269M5944cI319sS9OUTv/HIupsA7LTLl57pq6qTi7ciDIQXeaA2x4OtAABfnWjvrciDbc+GbW8/AHhvzYOTlfG9+rf1RKz0AutJUy5gqblSxriupna6NNXeeOO2tK223DziFgDKokDKda27fu527N4ZI6r+03INxhU1RcXCdtYrtG+mpWR5W+wRi90UzF+8INf3vyqwTYLZvyfae7P0gSpligixdFks1VrKLGxhvjqXwquosGmHGOcU20sQnoyg9oqfVUeOWmN5FZVv29bTefHe9dKSlW5O+Xed77ryt6uuoX5NY7zKqR8elvpdavDMeu69LZzTqu+ysMdT6RU11bNMh8mYYR0qtOwi48UBwXbCjGeTFamfejqfifIFN+dE1ktLVppt9crLSeOST51rKP+0fl1STFcOP2MZ+09XfQCv3aZ8MKDpTL2w69ajJddiyaEOWm01Obde9QvzypVy+YRSmagXNtZcXqrt6a++RlE7tTUtUingUsaleU290qb9Y1yXZdu7bUtbJ9b1Ma6l0iPsVq3fCbfOeCv3eIwPVtTZ75Y1LbXkeGO9nfU5Heqpb4tjtXzebgOVz6H26+imZY2FW9VT5tKGylneuIhLjlbmGIOnM3sM2zUNCTa13Lhgtyx0qcG4FfbK/R5L7N3JxVtT58xepukJEVFKGpfVLVx707T7HEvDjDfJFhYwlnHZjdguvVxBr+gy3HKOtjD2z7qt3aWH0XnbLQu6ZKE9aVyuA9q21rKIfUd531Ez2pTBSWA3GcfT7IynqraVOGp7Tnepx3ER955KvfK2t8fWcupv1XtrOwzQ9qde2vR4o18C1G3Cqcpywu1lcHLzR+FObANbrcj9GRPvbXq8ARvOeMPMMqZX6WFYRo2M9TjqsKzL7SLHW0rlwo5rX9jxaltVvULLtjQ1RjRvpksbutVg38mitJ9FLcwsldd/Wq/BM8Qb4Mr43EflkQRLyQqXk93Cejq3oXOzm9pgqdk+R5jOue6VLNwQy35u2vOOJd1/cfbCCxfv9ovot0nbSMXbrozDAhvF+5NLN8vvFpds2AUed8sc0XsD0N22nEC3pZ092sFNriDeAAAeIt4AAB4i3gBXlk+bbZEeXynSi75ebrK6zam/DKz87SoWFKYnYuwvPXF5fnLJV7FsHeINaMH4SN52MT67uEa9tGSl2WZ55nDhh/86LChqj/tL0+vQjIeiY3ssr1jzCfEGLKvpM0nlb5sm6oWN1Vpqrheon7Oa2rPMiro1xj7HZV8Z12U/X3fYlrZWHQ8uWehlRC2DeAN6UD5vtr0othSunHyNNS9cl0t7OqzIpYwxeDqzx7Bd09jgwt0ou3643mVBY+PtSeZSoG1TfUW8AWu25CCn/Q0XPeq2ImP/rNva5ca8Xrm+KxZeNBgXbBtClu5s0xrLP6pfH2zpALsj4g1YJ+MYWiv2jkgfbVy8os71OC7i3vmrV+6ybNvfQue+kX38ecnK3dd+YpdE60W8AVjWwicalhyc3Pyhtm4b6L6Isf62ye0+xw/EG7AU+yiQsTNRXrDVAJG95qYzVIe7Ry4rcilT7ue5n0MXdrzaVlWv0LItTY0RLVO284LCtG9dfokLy9Rv3S28mbfViDfAlfG5D+Odj6YnRMpczlYdau6wVOdNsK/dWLN9jlh08rVXsnBDLPvc5bdgKelSrFWKdKvQvoolm7R1iDdgPfw+s/Ri+V3kEtIe83XU0RHxBqAf23Im3ZZ2Lm93ttSIeAMAeIh4A/pRvq+z44NCwCYg3oB2jI8nrCXPVrdSxxevtHo/i+XNWKJ5Z1oeBrG/xITLCxBvQAvGE/q6+mpbdAa3v8GrUtK+VKH+SGSruIX3iDfAlfFthE2foyoWqReuV1VPyqYcra+9qVpLb8n9M3OWzV8FxzdvGZdaUZOwvYg3oAdNAVM57XY4fduH4Ba2qinV6jFsTG57ctSLtXrLVNNnwDtb+Llm7BTiDVihygeTy3nguLhL4c4vDGy1oEtguIdKU+e1PMdx2x2vLbBriDdghZY5w7qfoOuDjW3fRtjXG3Vb9d6aipUb1nsLsTuIN8CV/f6ZeyW9l1yF+sikcXsrxdzb3Grv0UVDB8Qb0ILx7k7TLZ9Wt4I26j3CvavvCsed0+qdv9x7QxnxBrRjPG82nUwraddUvv6Me71w0xxjtfUKjY20Z4Clke6VWIq13WnL1IkdRLwBm2X5E7RjLG0jRiPhjngDdoIfqeDHVuBkEG8AAA8RbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAAnwRC6v8QbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAADxFvAAAPEW8AAA8RbwAAj0gpAv1f4g0A4CHiDZh58MGPXL70zLpbAaAfxBug3fX2e9fdBAB9It4A7cXnvrXuJgDoE/EGAPAQ8QYA8BDxBgDwEPEGAPBQJNfdAgAAekfvDQDgIeINAOAh4g0A4CHiDQDgIeINAOAh4g0A4CHiDQDgIeINAOAh4g0A4CHiDQDgk0BI/T4u4g0A4CHiDQDgIeINAOAh4g0A4CHiDQDgIeINAOAh4g0A4CHiDQDgIeINAOAh4g0A4JdAfyHeAAAeIt4AAB4i3gAAHiLeAAAeIt4AAB4i3gAAHiLeAAAeIt4AAB4i3gAAHiLeAAAeCWT+X+INAOAh4g0A4CHiDQDgIeINAOCh/uPtVbe8tvc6sSE++LPvfeCXfq73ajlmPMYxg7b6OmZW0nu7fOmZVVSL9XriC59bXeUcM17imEFbPR4zqxqcnE4OVlQzfMUxg7Y4ZmDBvTcAgIeINwCAh4g3AIBPguwf4g0A4CPiDQDgIeINAOAh4g0A4CHiDQDgIeINAOAh4g0A4CHiDQDgIeINAOChKFh3CwAA6JOUgt4bAMBLxBsAwEPEGwDAQ8QbAMBDxFujm269szLnhQvfXEtLsDmKo4KDAT0qn204tPpCvNmUj7N62mHXqGOgOCTK08AyOJZWhHhrx3iCK1/RV2Zy1Hqjcg4qftf1Q8LlICnX3FTJwjL9byROnPFXWf/ti9rIgbEMyoi3ZTUdnRxtKE5A9Wisz6ws4lIGvqr/9o3T5TnraOamI97aMV6zV5BtEA2dsOUX6VAtsJsiKeS62+Abe/jBM8aw6XAAuCzCcQUsJqUI9Pu46L215pJeJJx/LHe/6mNEHX71LotwRPmHc8XqEG/LKl+8Gx89WFO70L+m3/XqFsQuqAwAGI8QDqEOiLdGlWPI8tBa/akBYw3wwMJeu2g4BuoLuhw2HFo7oinSHL/leDAi3gAAHiLeWuNCCQA2H/EGAPAQ8QYA8BDxBgDwEPEGAPBQFIhg3W0AAKBH+m1c9N4AAB4i3gAAHiLeAAAeIt4AAB4i3gAAHiLeAAAeIt4AAB4i3gAAHookn+oGAHhDhVoWbPTeAAAeWkm8PfGFz62iWniMYwZtcczArv94++DPvrf3OuE3jhm0xTGDhfqPtwd+6ed6rxN+45hBWxwzWIh7bwAADxFvAAAPEW8AAA8RbwAADxFvAAAPRYFcdxMAAOiLCrUs2Oi9AQA8RLwBADxEvAEAPES8AQA8RLwBADxEvAEAPES8AQA8RLwBADxEvAEAPES8AQD8kr2Ni3gDAHiIeAMAeIh4AwB4iHgDAHiIeAMAeIh4AwB4iHgDAHiIeAMAeIh4AwB46P8Dc80f9k23YA0AAAAASUVORK5CYII=" name="Рисунок 38" align="bottom" width="586" height="336" border="0"> <p>Private Sub CommandButton1_Click()</p> <p>'Завдання. Дано радіус основи та висоту прямого </p> <p>'кругового циліндра.</p> <p>'Необхідно обчислити: </p> <p>'Площу бічної поверхні циліндра SB: SB=2*PI*R*H;</p> <p>'Площу повної поверхні циліндра SP: SP=SB+2*PI*R^2; </p> <p>'Об'єм циліндра V: V=PI*R^2*H.</p> <p>Const PI As Single = 3.14159 </p> <p>Dim R, h, SB, SP, V As Single</p> <p>R = Val(InputBox("Введіть радіус основи циліндра R!")) </p> <p>h = Val(InputBox("Введіть висоту циліндра H!"))</p> <p>SB = 2 * PI * R * h </p> <p>SP = SB + 2 * PI * R ^ 2</p> <p>V = PI * R ^ 2 * h </p> <p>MsgBox "Площа бічної поверхні циліндра SB: SB= " & _</p> <p>Format(SB, "0000.00") </p> <p>MsgBox "Площа повної поверхні циліндра SP: SP=" & _</p> <p>Format(SP, "0000.00") </p> <p>MsgBox "Об'єм циліндра V: V=" & Format(V, "0000.00")</p> <p>TextBox1.Text = TextBox1.Text _ </p> <p>+ "Радіус основи прямого кругового циліндра R=" + _</p> <p>Format(R, "0000.00") + vbCr </p> <p>TextBox1.Text = TextBox1.Text _</p> <p>+ "Висота прямого кругового циліндра H" + _ </p> <p>Format(h, "0000.00") + vbCr</p> <p>TextBox2.Text = TextBox2.Text _ </p> <p>+ "Площа бічної поверхні циліндра SB: SB=" + _</p> <p>Format(SB, "0000.00") + vbCr </p> <p>TextBox2.Text = TextBox2.Text _</p> <p>+ "Площа повної поверхні циліндра SP: SP=" + _ </p> <p>Format(SP, "0000.00") + vbCr</p> <p>TextBox2.Text = TextBox2.Text _ </p> <p>+ "Об'єм циліндра V: V=" + Format(V, "0000.00") + vbCr</p> <p>End Sub <p>Private Sub CommandButton2_Click()</p> <br /> <br />TextBox1.Text = "" </p> <p>TextBox2.Text = ""</p> <p>End Sub <p>Private Sub CommandButton3_Click()</p> <br /> <br />End </p> <p>End Sub <br /><ol start="3"> <li/> </p> <br /><b>Логічні операції та логічні вирази.</b> <br /></ol> <br />У мові <b>VBA</b> використовують такі логічні операції (табл.7.2): <p> Таблиця 14.2. Логічні операції мови VBA</p> <br /><center> <table width="326" cellpadding="7" cellspacing="0"> <col width="80"> <col width="216"> <tr> <td width="80"> <br /><i><b>Функція</b></i> <br /></td> <td width="216"> <br /><i><b>Назва функції</b></i> <br /></td> </tr> <tr valign="top"> <td width="80"> <br /><b>Not</b> <br /></td> <td width="216"> <br />Заперечення або інверсія <br /></td> </tr> <tr valign="top"> <td width="80"> <br /><b>And</b> <br /></td> <td width="216"> <br />Логічне „І” або множення <br /></td> </tr> <tr valign="top"> <td width="80"> <br /><b>Or</b> <br /></td> <td width="216"> <br />Логічне „АБО” або додавання <br /></td> </tr> <tr valign="top"> <td width="80" height="1"> <br /><b>Хо</b><b>r</b> <br /></td> <td width="216"> <br />Виключне логічне „АБО” <br /></td> </tr> <tr valign="top"> <td width="80"> <br /><b>Imp</b> <br /></td> <td width="216"> <br />Імплікація <br /></td> </tr> <tr valign="top"> <td width="80"> <br /><b>Eqv</b> <br /></td> <td width="216"> <br />Еквівалентність <br /></td> </tr> </table> </center> <p>Результати виконання логічних операцій наведені у табл.14.3.</p> <br />Таблиця 14.3. Таблиця істинності для логічних операцій (<b>Т</b>-<b>true</b><b>,</b> <b>F</b>-<b>false</b>) <br /><table width="657" cellpadding="7" cellspacing="0"> <col width="67"> <col width="68"> <col width="4355"> <col width="68"> <col width="68"> <col width="68"> <col width="68"> <col width="68"> <col width="67"> <tr> <td colspan="3" width="149" bgcolor="#ffffff"> <br /><i><b>Значення аргументів А та В</b></i> <br /></td> <td colspan="6" width="478"> <br /><i><b>Значення логічних функцій</b></i> <br /></td> </tr> <tr> <td width="67" bgcolor="#ffffff"> <br /><i><b>А</b></i> <br /></td> <td width="68" bgcolor="#ffffff"> <br /><i><b>В</b></i> <br /></td> <td colspan="2" width="68"> <br /><i><b>Not</b></i><i><b> А</b></i> <br /></td> <td width="68"> <br /><i><b>А </b></i><i><b>And</b></i><i><b> В</b></i> <br /></td> <td width="68"> <br /><i><b>А </b></i><i><b>Or</b></i><i><b> В</b></i> <br /></td> <td width="68"> <br /><i><b>А Хо</b></i><i><b>r</b></i><i><b> В</b></i> <br /></td> <td width="68"> <br /><i><b>А</b></i><i><b> Imp</b></i><i><b> В</b></i> <br /></td> <td width="67"> <br /><i><b>А</b></i><i><b> Eqv</b></i><i><b> В</b></i> <br /></td> </tr> <tr> <td width="67"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td colspan="2" width="68"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="67"> <br /><b>T</b> <br /></td> </tr> <tr> <td width="67"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td colspan="2" width="68"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="67"> <br /><b>F</b> <br /></td> </tr> <tr> <td width="67"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td colspan="2" width="68"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td width="67"> <br /><b>F</b> <br /></td> </tr> <tr> <td width="67"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td colspan="2" width="68"> <br /><b>T</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>F</b> <br /></td> <td width="68"> <br /><b>T</b> <br /></td> <td width="67"> <br /><b>T</b> <br /></td> </tr> </table> <p>Операція <b>Not</b> повертає логічну величину, протилежну даній.</p> <p>Операція <b>And</b> повертає <b>True</b> лише тоді, коли обидва операнди дорівнюють<b>True</b><b>.</b> </p> <p>Операція <b>Or</b> повертає <b>False</b> лише тоді, коли обидва операнди дорівнюють <b>False</b><b>.</b></p> <p>Операція <b>Хо</b><b>r</b> повертає <b>True</b>, якщо один із операндів дорівнює <b>True</b>, але не обидва одночасно. </p> <p>Операція <b>Eqv</b> повертає <b>True</b>, якщо обидва операнди мають однакові значення.</p> <p>Операція <b>Imp</b> повертає значення <b>False</b> лише тоді, коли перший операнд має значення <b>True</b>, а другий <b>False</b><b>.</b> <br /> <br /><ol start="4"> <li/> <br /><b>Умовний оператор альтернативи </b><b>If</b><b> … </b><b>Then</b><b> … </b><b>Else</b><b>.</b> <br /></ol> <br />Повний формат цього оператора такий:<span dir="ltr"> <br /><b>If</b> <умова 1> <b>Then</b> <br /> <br /><блок операторів 1> <br /> <br /><b>ElseIf</b> < умова 2> <b>Then</b> <br /> <br /><блок операторів 2> <br /> <br /><b>ElseIf</b> < умова 3> <b>Then</b> <br /> <br /><блок операторів 3> </p> <p>……………………..</p> <br /> <br /><b>ElseIf</b> < умова n> <b>Then</b> <br /> <br /><блок операторів n> <br /></context></help></ypos></xpos></defaults>


Поділіться з Вашими друзьями:
1   ...   46   47   48   49   50   51   52   53   54




База даних захищена авторським правом ©uchika.in.ua 2020
звернутися до адміністрації

    Головна сторінка