VBA võimaldab väärtuste võrdlemiseks kasutada võrdlusoperaatoreid. Neid operaatoreid kasutades saate väärtusi võrrelda ja selle tulemusel tagastada Boole'i tõene või vale.
VBA peamiste võrdlusoperaatorite loend
Esiteks kuvame võrdlusoperaatorite loendi, mida saab VBA -koodis kasutada:
Võrdlusoperaator | Selgitus |
= |
Võrdne |
Mitte võrdne |
|
> |
Suurem kui |
>= |
Suurem või võrdne |
< |
Vähem kui |
<= |
Vähem või võrdne |
Võrdne
The Võrdne operaator kontrollib, kas kaks väärtust on võrdsed ja tagastab tõese või vale. Siin on näite kood:
123456789101112 | Dim intA täisarvunaDim intB Nagu täisarvDim blnTulemus BooleaninaintA = 5intB = 5Kui intA = intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Selles näites tahame kontrollida, kas intA on võrdne intB. Kui see on tõsi, siis Booleani väärtus blnTulemus on tõsi, vastasel juhul on see vale.
Esiteks määrame väärtused intA ja intB kuni 5:
12 | intA = 5intB = 5 |
Pärast seda kasutame = operaator If -lauses, et kontrollida, kas intA ja intB on võrdsed:
12345 | Kui intA = intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Mõlemad muutujad on võrdsed 5 -ga, seega blnTulemus tagastab tõene:
Pilt 1. Operaatori Equal To kasutamine
Mitte võrdne
The Mitte Võrdne operaator kontrollib, kas kaks väärtust pole võrdsed ja tagastab tõese või vale. Siin on näite kood:
Tekkis viga. Palun proovi hiljem uuesti. |
Selles näites tahame kontrollida, kas intA ei ole võrdne intB. Kui see on tõsi, siis Booleani väärtus blnTulemus on tõsi, vastasel juhul on see vale.
Me kasutame operaator If -lauses, et kontrollida, kas intA ja intB on erinevad:
12345 | Kui intA intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Väärtus intA on 5 ja väärtus intB on 6, muutujad pole võrdsed, seega blnTulemus tagastab tõene:
Pilt 2. Operaatori Not Equal To kasutamine
Suurem kui
The Suurem kui operaator kontrollib, kas esimene väärtus on suurem kui teine, ja tagastab tõese või vale. Siin on näite kood:
123456789101112 | Dim intA täisarvunaDim intB Nagu täisarvDim blnTulemus BooleaninaintA = 6intB = 5Kui intA> intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Selles näites tahame kontrollida, kas intA on suurem kui intB. Kui see on tõsi, siis Booleani väärtus blnTulemus on tõsi, vastasel juhul on see vale.
Lisaks kasutame > operaator If -lauses, et kontrollida, kas intA on suurem kui intB:
12345 | Kui intA> intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Kokkuvõtteks, naguintA on suurem kui intB, blnTulemus tagastab tõene:
Pilt 3. Operaatori Greater Than kasutamine
Suurem või võrdne
The Suurem või võrdne operaator kontrollib, kas esimene väärtus on suurem või võrdne teise väärtusega ja tagastab tõese või vale. Siin on näite kood:
123456789101112 | Dim intA täisarvunaDim intB Nagu täisarvDim blnTulemus BooleaninaintA = 5intB = 5Kui intA> = intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Selles näites tahame kontrollida, kas intA on suurem või võrdne intB. Kui see on tõsi, siis Booleani väärtus blnTulemus on tõsi, vastasel juhul on see vale.
Me kasutame>= operaator If -lauses, et kontrollida, kas intA on suurem või võrdne intB:
12345 | Kui intA> = intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Kokkuvõtteks võib öelda, et kuna mõlemad muutujad on 5, siis blnTulemus tagastab tõene:
Pilt 4. Operaatori Suurem kui Võrdne kasutamine
Vähem kui
The Vähem kui operaator kontrollib, kas esimene väärtus on teisest väiksem ja tagastab tõese või vale. Siin on näite kood:
123456789101112 | Dim intA täisarvunaDim intB Nagu täisarvDim blnTulemus BooleaninaintA = 5intB = 6Kui intA <intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Selles näites tahame kontrollida, kas intA on vähem kui intB. Kui see on tõsi, siis Booleani väärtus blnTulemus on tõsi, vastasel juhul on see vale.
Me kasutame < operaator If -lauses, et kontrollida, kas intA on vähem kui intB:
12345 | Kui intA <intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Nagu intA on vähem kui intB, blnTulemus tagastab tõese:
Pilt 5. Operaatori Less Than kasutamine
Vähem või võrdne
The Vähem kui või Võrdne operaator kontrollib, kas esimene väärtus on väiksem või võrdne ja tagastab tõese või vale. Siin on näite kood:
123456789101112 | Dim intA täisarvunaDim intB Nagu täisarvDim blnTulemus BooleaninaintA = 5intB = 5Kui intA <= intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Selles näites tahame kontrollida, kas intA on väiksem või võrdne intB. Kui see on tõsi, siis Booleani väärtus blnTulemus on tõsi, vastasel juhul on see vale.
Me kasutame <= operaator If -lauses, et kontrollida, kas intA on väiksem või võrdne intB:
12345 | Kui intA <= intB SiisblnResult = TõsiMuidublnResult = ValeLõpp Kui |
Kokkuvõtteks võib öelda, et kuna mõlemad muutujad on 5, siis blnTulemus tagastab tõene:
Pilt 6. Kasutades operaatorit vähem kui võrdne
On operaator
Kas operaator testib, kas kaks objekti muutujat sisaldavad sama objekti:
12345678910111213 | Sub CompareObjects ()Dim ws1 töölehena, ws2 töölehenaSet ws1 = Sheets ("Sheet1")Set ws2 = Sheets ("Sheet2")Kui ws1 on ws2 siisMsgBox "Sama WS"MuiduMsgBox "Erinevad WS -id"Lõpp KuiEnd Sub |
Nagu operaator
Like operaatorit saab kasutada ebatäpsete tekstivaste leidmiseks. Selle näite abil testitakse, kas string algab tähega „Mr.”
1234567891011121314 | Sub LikeDemo ()Dim strName nagu stringDim blnTulemus BooleaninastrName = "Härra Michael James"Kui strName Nagu "Mr*" SiisblnResult = TõsiMuidublnResult = ValeLõpp KuiEnd Sub |
Kui soovite õppida stringide võrdlemist, klõpsake siin: VBA Võrdle stringe - StrComp
Kui soovite õppida võrdlusoperaatorite kasutamist, klõpsake siin: VBA loogilised operaatorid