Студопедия

Главная страница Случайная страница

Разделы сайта

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






  • Логические операторы






     

    Оператор Описание
    AND логическое И, должны быть истинными оба условия
    OR логическое ИЛИ, должно быть истинным хотя бы одно из условий
    NOT логическое отрицание, возвращает TRUE, если условие ложно
    XOR логическое исключение. В выражении A XOR B возвращает TRUE, если только A = TRUE или только B = TRUE, иначе — FALSE
    EQV эквивалентность двух выражений, возвращает TRUE, если они имеют одинаковое значение
    IMP импликация, возвращает FALSE, если A = TRUE и B = FALSE, иначе — TRUE.

     

    Помнить нужно про AND, OR, NOT, остальные логические операторы используются редко.

     

     

    Условный оператор

    Позволяет выполнить один или несколько операторов, если условие истинно. Можно использовать однострочный или блочный вариант. Если необходимо выполнить более одной строки кода, нужно использовать блочный вариант с оператором End IF.

     

    Синтаксис:

    IF < логическое выражение > Then < оператор (код) >

    или

    IF < логическое выражение > Then

    < блок кода >

    End IF

     

     

    Пример

     

    Sub testIF()

    Dim x As Integer, y As Integer, z As Integer

    x = InputBox(" x=", " Ввод данных")

    y = InputBox(" y=", " Ввод данных")

    If x > y Then

    z = x

    MsgBox (" x> y z=" & z)

    End If

    If y > x Then

    z = y

    MsgBox (" x< y z=" & z)

    End If

    If x = y Then MsgBox (" x=y z=" & x)

    End Sub

     

    Пример:

    IF x < 10 Then z = 0

    IF x > 10 Then

    z = 2

    z = z + x

    End IF

     

    Пример ветвления по трём и более направлениям

    IF < условие > THEN < оператор 1 > ELSE < оператор 2 > End IF

     

    Позволяет определить два блока операторов. Первый выполняется, когда условие истинно, а второй, когда оно ложно.

     

     

    Пример:

    If x < > 0 Then

    y = Sin(x)/x

    Else

    y = 1

    End IF

     

    Пример ветвления по трём и более направлениям:

    IF < условие 1 > Then

    < блок кода 1 >

    ElseIF < условие 2 > Then

    < блок кода 2 >

    ElseIF < условие 3 > Then

    < блок кода 3 >

    Else < блок кода 4 >

    End IF

     

    В блоке IF допускается любое количество предложений ElseIF, но ни одно не может находиться после предложения Else.

    Пример:

    IF x = -1, 57 Then

    y = -1

    ElseIF x = 0 Then

    y = 0

    ElseIF x = 1, 57 Then

    y = 1

    Else y = Sin(x)

    End IF

     

    Оператор Select...Case

    Select...Case позволяет по определенному значению, диапазону или условию выполнить разные действия. Например:

    если а = 5 то выполнить действие 1

    если a в диапазоне между 7 и 9 то действие 2

    если a не подходит ни одно условие то действие 3

     

    Это можно записать условным оператором If, получается следующее:

    If a = 5 Then

    действие 1

    elseif (a > 7 And a < 9) Or (a = 7 Or a = 9) then

    действие 2

    Else действие 3

    End If

     

     

    Теперь запишем это же, но с помощью конструкции Select:

    Select Case a

    Case 5

    действие 1

    Case 7 To 9

    действие 2






    © 2023 :: MyLektsii.ru :: Мои Лекции
    Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав.
    Копирование текстов разрешено только с указанием индексируемой ссылки на источник.