
- •5.05150104 "Дизайн друкованої продукції"
- •Робота з модулями і класами
- •Модулі і класи
- •Створення програмної бібліотеки
- •Створення модулів
- •Мал. 4.1. Діалогове вікно Add Procedure.
- •Прискорений спосіб додавання процедур
- •Процедури
- •Функції
- •Мал. 4.2. Вікно програми з функцією для обчислення кубічного кореня.
- •Мал. 4.3. Код виклику функції CubeRoot.
- •Мал. 4.4. Функція повертає кубічний корінь 3.
- •Мал. 4.5. Змінене вікно програми і форма.
- •Мал. 4.6. Новий варіант додатка. Тестування у вікні відпадки
- •Оновлення програмної бібліотеки
- •Передача параметрів
- •Мал. 4.7. Вікно додатка-прикладу.
- •Мал. 4.8. Зміна властивості Caption в програмі.
- •Ключове слово Optional
- •Ключове слово ByRef
- •Ключове слово ByVal
- •Ключове слово ParamArray
- •Ключові слова Public і Private
- •Закриті процедури (Private)
- •Мал. 4.9. Сім форм у вікні проекту.
- •Відкриті процедури (Public)
- •Робота з модулями класів
- •Властивості
- •Створення класу SmartForm
- •Використання Class Builder
- •Мал. 4.10. Утиліта Class Builder.
- •Мал. 4.12. Діалогове вікно Property Builder.
- •Мал. 4.13. Діалогове вікно Event Builder.
- •Мал. 4.14. Клас Person з властивостями, подіями і методами.
- •Що нового ми дізналися?
- •5. Створення і використання меню і панелей інструментів
- •Для чого потрібні меню і панелі інструментів
- •Мал. 5.1. Меню і панелі інструментів Visual Basic.
- •Об'єкт меню
- •Мал. 5.2. Редактор меню.
- •Властивості меню
- •Методи меню
- •Створення меню в редакторові меню
- •Мал. 5.3 Створення меню в редакторові меню.
- •Мал. 5.4. Працююче меню.
- •Проектування меню
- •Створення панелей інструментів
- •Мал. 5.5. Завдання властивості Style. Створення кнопок на панелі інструментів
- •Мал. 5.6. Форма із панеллю інструментів. Створення малюнків на кнопках
- •Мал. 5.7. Вставка растрових зображень в список зображень.
- •Мал. 5.8. Зв'язування панелі інструментів із списком зображень.
- •Мал. 5.9. Панель інструментів зі значками.
- •Використання вдосконаленої панелі
- •Мал. 5.11. Вкладка General в сторінках властивостей вдосконаленої панелі.
- •5.12. Вкладка Bands в сторінках властивостей вдосконаленої панелі.
- •Мал. 5.14. Вдосконалена панель у дії.
- •Що нового ми дізналися?
- •Урок 6. Логіка і послідовність виконання програми
- •Як "думає" комп'ютер?
- •Логічні оператори
- •Логічний оператор and
- •Логічний оператор eqv
- •Логічний оператор or
- •Логічний оператор xor
- •Логічний оператор not
- •Порівняння
- •Перевірка умови "рівно"
- •Мал. 6.1. Гра із вгадуванням числа
- •Перевірка умови "більше"
- •Мал. 6.2. Назване число більше за загадане.
- •Перевірка умови "менше"
- •Мал. 6.3. Назване число менше за загадане. Перевірка умови "не рівно"
- •Перевірка умови "більше або рівно"
- •Мал. 6.5. Перевищення граничної швидкості. Перевірка умови "менше або рівно"
- •Ухвалення рішень в програмі
- •Оператор If..Then..Else
- •Функція iIf
- •Оператор Select Case..End Select
- •Виконання дій, що повторюються
- •Цикл For..Next
- •Цикл Do..Loop
- •Цикл While..Wend
- •Перебір колекцій
- •Приклад використання циклів
- •Мал. 6.7. Створення команди меню.
- •Мал. 6.8. Створення масиву елементів.
- •Мал. 6.9. Форма з масивом текстових полів.
- •Мал. 6.10. Приклад роботи з циклами. Що нового ми дізналися?
- •Урок 7. Змінні
- •Перше знайомство із змінними
- •Що таке пам'ять?
- •Типи змінних
- •Байтові змінні
- •Строкові змінні
- •Puc. 7.3. Діалогове вікно Options.
- •Мал. 7.4. Вікно програми для прикладу.
- •Мал. 7.5. Вікно додатка-прикладу.
- •Універсальні змінні
- •Зона видимості змінних
- •Мал. 7.6. Зона видимості змінних.
- •Мал. 7.7. Форма для реєстрації користувачів.
- •Ключове слово Static
- •Мал. 7.8. Використання циклу For..Next.
- •Динамічні масиви
- •Константи
- •Мал. 7.10. Результат обчислення площі круга.
- •Що нового ми дізналися?
Логічний оператор xor
Якщо ви хочете переконатися в тому, що істинно лише один з двох виразів, скористайтеся оператором XOR (операція OR, що виключає). На відміну від OR він дає істинний результат лише у тому випадку, якщо істинне одне вираження, але не обоє. У цьому неважко переконатися по таблиці. 6.6.
Таблиця 6.6. Результати виконання логічної операції XOR для двох виразів
-
Вираз 1
Вираз 2
Результат
Істина
Істина
Брехня
Істина
Брехня
Істина
Брехня
Істина
Істина
Брехня
Брехня
Брехня
Давайте використаємо операцію XOR для чисел з попереднього прикладу (см 6.7). Це наочно показує, чим відрізняються ці дві операції.
Таблиця 6.7. Застосування логічної операції XOR для двох чисел
-
Номер біта
7
6
5
4
3
2
1
0
Двійкове значення
27
26
25
24
23
22
21
2°
Ціле значення
128
64
32
16
8
4
2
1
Вираження 1
0
1
0
0
1
0
0
1
73
Вираження 2
1
1
1
0
1
0
0
0
232
Вираз 1 XOR Вираз 2
1
0
1
0
0
0
0
1
161
Перевірте правильність обчислень:
1. Відкрийте вікно безпосередніх обчислень клавішами Ctrl+G.
2. У вікні, що відкрилося, введіть наступний рядок:
? 73 XOR 232
Результат, як і в таблиці, дорівнюватиме 161.
3. Спробуйте скласти таблицю для наступних виразів і вичислити результат на папері, потім перевірте результат у вікні безпосередніх обчислень:
55 XOR 12
37 XOR 7
72 XOR 255
255 XOR 0
Результати мають дорівнювати 59, 34,183 і 255.
Логічний оператор not
Логічний оператор NOT повертає зворотне логічне значення. Він може згодитися при перевірці умови, протилежної до вказаного. Розглянемо наступний фрагмент:
Dim Successful As Boolean
Successful = True
If Not Successful Then
MsgBox "Операція завершилася невдало"
End If
Ми оголошуємо змінну Successful, що має логічний тип даних, і привласнюємо їй значення True (істина). Перевіряючи умову If Not Successful, ми фактично хочемо дізнатися, чи є ця змінна помилковою. У програмі змінну Successful можна замінити функцією, яка повертає True або False, і перевірити значення яке повертається. Як видно з таблиці. 6.8, результат операції NOT завжди протилежний до значення початкового вираження.
Таблиця 6.8. Результати виконання логічної операції NOT
-
Вираз
Результат
Істина
Брехня
Брехня
Істина
На практиці операція NOT зазвичай використовується для перевірки виняткових станів і, як ви незабаром переконаєтеся, при перевірці помилок. А доки розглянемо роботу оператора NOT в Visual Basic на наступному простому прикладі:
1. Введіть у вікні безпосередніх обчислень наступний рядок:
? NOT True
Результат буде рівний False.
2. Перевіримо протилежну умову:
? NOT False
Результат буде рівний True.