IBM Lotus Symphony
|
Wykonuje dysjunkcję logiczną OR na dwóch wyrażeniach.
Wynik = Wyrażenie_1 Or Wyrażenie_2
Wynik: Dowolna zmienna liczbowa zawierająca wynik dysjunkcji.
Wyrażenie_1, Wyrażenie_2: Wyrażenia liczbowe, które mają być porównane.
Logiczna dysjunkcja dwóch wyrażeń logicznych zwraca wartość True, jeśli przynajmniej jedno wyrażenie ma wartość True.
Porównanie bitowe ustawia bit w wyniku, jeśli odpowiedni bit jest ustawiony w przynajmniej jednym z dwóch wyrażeń.
Sub Przyklad_Or
Dim vA as Variant, vB as Variant, vC as Variant, vD as Variant
Dim vOut as Variant
vA = 10: vB = 8: vC = 6: vD = Null
vOut = vA > vB Or vB > vC REM Wartość -1
vOut = vB > vA Or vB > vC REM Wartość -1
vOut = vA > vB Or vB > vD REM Wartość -1
vOut = (vB > vD Or vB > vA) REM Wartość 0
vOut = vB Or vA REM Wartość 10
End Sub