Operatori usporedbe VBA - nije jednako & više

VBA vam omogućuje da koristite operatore usporedbe za usporedbu vrijednosti. Pomoću ovih operatora možete usporediti vrijednosti i kao rezultat vratiti Boolean True ili False.

Popis glavnih operatora usporedbe u VBA -i

Prvo ćemo prikazati popis operatora usporedbe koji se mogu koristiti u VBA kodu:

Operator usporedbe	Obrazloženje
=	Jednak
	Nije jednako
>	Veći od
>=	Veći ili Jednaki
<	Manje od
<=	Manje ili jednako

Jednak

The Jednak operator provjerava jesu li dvije vrijednosti jednake i vraća True ili False. Evo primjera koda:

123456789101112

Dim intA kao cijeli brojDim intB kao cijeli brojDim blnResult Kao BooleanintA = 5intB = 5Ako je intA = intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

U ovom primjeru želimo provjeriti je li intA jednako je intB. Ako je to istina, vrijednost Boolean blnResult bit će istina, u protivnom će biti netočna.

Prvo postavljamo vrijednosti intA i intB do 5:

12	intA = 5intB = 5

Nakon toga koristimo = operator u naredbi If provjerava jesu li vrijednosti intA i intB su jednaki:

12345

Ako je intA = intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

Obje varijable jednake su 5, stoga je blnResult vraća True:

Slika 1. Pomoću operatora Equal To

Nije jednako

The Ne Jednak operator provjerava jesu li dvije vrijednosti jednake i vraća True ili False. Evo primjera koda:

Došlo je do pogreške. Molimo pokušajte ponovo kasnije.

U ovom primjeru želimo provjeriti je li intA nije jednak intB. Ako je to točno, vrijednost Boolean blnResult bit će istina, u protivnom će biti netočna.

Koristimo operator u naredbi If provjerava jesu li vrijednosti intA i intB su različiti:

12345

Ako je intA intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

Vrijednost intA je 5 i vrijednost intB je 6, varijable nisu jednake, stoga je blnResult vraća True:

Slika 2. Upotreba operatora Nije jednako To

Više nego

The Veći od operator provjerava je li prva vrijednost veća od druge vrijednosti i vraća True ili False. Evo primjera koda:

123456789101112

Dim intA kao cijeli brojDim intB kao cijeli brojDim blnResult Kao BooleanintA = 6intB = 5Ako je intA> intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

U ovom primjeru želimo provjeriti je li intA je veći od intB. Ako je to točno, vrijednost Boolean blnResult bit će istina, u protivnom će biti netočna.

Nadalje, koristimo > operator u naredbi If kako bi provjerio je li vrijednost intA je veći od intB:

12345

Ako je intA> intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

Zaključno, kaointA je veći od intB, blnResult vraća True:

Slika 3. Pomoću operatora Greater Than

Veći ili jednaki

The Veći ili Jednaki operator provjerava je li prva vrijednost veća ili jednaka drugoj vrijednosti i vraća True ili False. Evo primjera koda:

123456789101112

Dim intA kao cijeli brojDim intB kao cijeli brojDim blnResult Kao BooleanintA = 5intB = 5Ako je intA> = intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

U ovom primjeru želimo provjeriti je li intA je veći ili jednak intB. Ako je to točno, vrijednost Boolean blnResult bit će istina, u protivnom će biti netočna.

Koristimo>= operator u naredbi If da provjeri je li vrijednost intA je veći ili jednak intB:

12345

Ako je intA> = intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

Zaključno, kako su obje varijable jednake 5, blnResult vraća True:

Slika 4. Pomoću operatora Veće od ili Jednako To

Manje od

The Manje od operator provjerava je li prva vrijednost manja od druge vrijednosti i vraća True ili False. Evo primjera koda:

123456789101112

Dim intA kao cijeli brojDim intB kao cijeli brojDim blnResult Kao BooleanintA = 5intB = 6Ako je intA <intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

U ovom primjeru želimo provjeriti je li intA je manje od intB. Ako je to točno, vrijednost Boolean blnResult bit će istina, u protivnom će biti netočna.

Koristimo < operator u naredbi If da provjeri je li vrijednost intA je manje od intB:

12345

Ako je intA <intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

Kao intA je manje od intB, blnResult vraća True:

Slika 5. Korištenje operatora Less Than

Manje ili jednako

The Manje od ili Jednak operator provjerava je li prva vrijednost manja ili jednaka i vraća True ili False. Evo primjera koda:

123456789101112

Dim intA kao cijeli brojDim intB kao cijeli brojDim blnResult Kao BooleanintA = 5intB = 5Ako je intA <= intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

U ovom primjeru želimo provjeriti je li intA je manji ili jednak intB. Ako je to točno, vrijednost Boolean blnResult bit će istina, u protivnom će biti netočna.

Koristimo <= operator u naredbi If da provjeri je li vrijednost intA je manji ili jednak intB:

12345

Ako je intA <= intB TadablnResult = IstinaDrugoblnResult = NetačnoZavrši ako

Zaključno, kako su obje varijable jednake 5, blnResult vraća True:

Slika 6. Upotreba operatora Manje od ili Jednako To

Je Operator

Is Operator testira ako dvije varijable objekta sadrže isti objekt:

12345678910111213

Sub CompareObjects ()Zatamni ws1 kao radni list, ws2 kao radni listPostavi ws1 = Tablice ("List 1")Postavi ws2 = Tablice ("List 2")Ako je ws1 Je ws2 TadaMsgBox "Isti WS"DrugoMsgBox "Različiti WS -ovi"Završi akoKraj podm

Kao Operater

Operator Like može se koristiti za pronalaženje netočnih podudarnosti teksta. Ovaj primjer će provjeriti počinje li niz s "Mr."

1234567891011121314

Sub LikeDemo ()Dim strName As StringDim blnResult Kao BooleanstrName = "Gospodin Michael James"Ako strName poput "Mr*" TadablnResult = IstinaDrugoblnResult = NetačnoZavrši akoKraj podm

Ako želite naučiti uspoređivati ​​nizove, kliknite ovdje: VBA Usporedi nizove - StrComp

Ako želite naučiti koristiti operatore usporedbe, kliknite ovdje: VBA logički operatori