Логічні оператори VB.
В
Visual Basic можна виділити п'ять основних і важливих логічних операторів: And,
Or, Not, Xor і Eqv. Роль кожного з них я зараз і спробую пояснити!
Отже,
And!
Це,
напевно, найпростіший і потрібний логічний оператор серед інших.
Help:
Повертає
результат кон'юнкції (логічного І) для двох виразів.
Сінтксіс:
результат
= Вираз1 And вираженіе2
Тобто
результат буде дійсним тільки в тому випадку, коли істинні вираз1 І
вираженіе2. Повертаються оператором значення представлені в наступній таблиці:
вираз1
вираженіе2
результат
True
True
True
True
False
False
True
Null
Null
False
True
False
False
False
False
False
Null
False
Null
True
Null
Null
False
False
Null
Null
Null
А
тепер маленький приклад:
Уявімо
собі, що змінні User_Has_Computer і User_Has_Car оголошені як булеві
значення і в процесі яких-небудь дій взяли значення або True або
False. Ви встановлюєте умова, що перевіряють ці значення:
Ми
ж семуліруем це самі:) - впишіть куди - небудь наступні рядки:
Dim User_Has_Computer As Boolean
Dim User_Has_Car As Boolean
User_Has_Computer = True
User_Has_Car = True
If User_Has_Computer And
User_Has_Car Then
MsgBox
"Ви щаслива людина!"
End
If
При
перевірки даної умови на екран вискочить повідомлення, які сповіщають, що
користувач щаслива людина, тому що у нього є машінa І комп'ютер :-)! А
тепер перед третій або четвертій рядком поставте апостроф " '" --
закоменнтіруйте рядок. Тепер один із змінних буде False за замовчуванням.
Тепер повідомлення НЕ вискочить, тому що користувач не дуже щасливий, маючи
машину АБО комп'ютер ...
Наступний
оператор не менш простий - Or.
Help:
Виконує
операцію логічного АБО (додавання) для двох виразів.
Синтаксис:
результат
= Вираз1 Or вираженіе2
Результат
буде дійсним тільки в тому випадку, якщо тільки один з виразів неправдиве.
Повертаються оператором значення представлені в наступній таблиці:
вираз1
вираз1
результат
True
True
True
True
False
True
True
Null
True
False
True
True
False
False
False
False
Null
Null
Null
True
True
Null
False
Null
Null
Null
Null
І
знову маленький приклад з колишніми булеві перменнимі User_Has_Computer і
User_Has_Car, які в процесі яких-небудь дій взяли значення або
True або False.
Dim User_Has_Computer As Boolean
Dim User_Has_Car As Boolean
User_Has_Computer = False
User_Has_Car = True
If User_Has_Computer Or User_Has_Car
Then
MsgBox
"Ви майже щаслива людина!"
End
If
При
перевірки даної умови на екран вискочить повідомлення, які сповіщають, що
користувач майже щаслива людина, тому що у нього є машінa, але немає
комп'ютера :-|...
Оператор
Not.
Help:
Виконує
над виразом операцію логічного заперечення.
Синтаксис:
результат
= Not вираз
Тобто
результат стає протівополжним висловом (виключаючи Null). Повертаються
оператором значення представлені в наступній таблиці:
вираз
результат
True
False
False
True
Null
Null
Приклад:
Dim User_Has_Computer As Boolean
User_Has_Computer = False
If Not User_Has_Computer Then
MsgBox
"Співчуваю ...:)"
End
If
Пояснюю:
умова If ... Then виконується тоді, коли яка-небудь вираз (на місці
...) Одно True. Уявімо, що змінна User_Has_Computer = False. Тоді
рядок
Not
User_Has_Computer дає результат True і умова виконується!
Оператор
Xor.
Help:
Виконує
операцію виключає АБО для двох виразів.
Синтаксис:
[результат
=] Вираз1 Xor вираженіе2
В
принципі, цей оператор схожий на Or, але це не просто АБО, а що виключає АБО.
Якщо одне й тільки одне з виразів істинно (має значення True), результат
має значення True. А оператор Or допускає два справжніх вирази. Результат
визначається наступним чином:
вираз1
вираженіе2
результат
True
True
False
True
False
True
False
True
True
False
False
False
Приклад:
Dim User_Has_Computer As Boolean
Dim User_Has_Car As Boolean
User_Has_Computer = False
User_Has_Car = True
If User_Has_Computer Xor
User_Has_Car Then
MsgBox
"Вам потрібна машина І комп'ютер!"
End
If
Тут
так само, як і в попередньому прикладі умова виконується тільки тоді, коли
рядок User_Has_Computer Xor User_Has_Car істинна (= True). А істинна вона тоді
і тільки тоді, коли тільки одна з умова правдиве. Якщо обидва, то умова вже
не збудеться.
Оператор
Eqv.
Help:
Використовується
для перевірки логічної еквівалентності двох виразів.
Синтаксис:
результат
= Вираз1 Eqv вираженіе2
Тут
зовсім все просто: результат буде істинним в тому випадку, якщо обидва вирази
або істинні, або помилкові. Результат визначається наступним чином:
вираз1
вираженіе2
результат
True
True
True
True
False
Flase
False
True
False
False
False
True
Приклад:
Dim User_Has_Computer As Boolean
Dim User_Has_Car As Boolean
User_Has_Computer = True
User_Has_Car = True
If User_Has_Computer Eqv
User_Has_Car Then
MsgBox
"Ви або щасливий або нещасний чоловік!"
End
If
Тут
комп'ютер назве Вас людиною "щасливим або нещасним", тому що
умова виконується тільки тоді, коли користувач має і машину і комп'ютер
чи не того і не іншого.
Список літератури
Для
підготовки даної роботи були використані матеріали з сайту http://visualprogs.narod.ru/
