VBA-loogiset operaattorit: JA TAI EIVÄT, JOS EI OLE Excel VBA: ssa

Sisällysluettelo:

Anonim

VBA-loogiset operaattorit: JA TAI EI

Excel VBA -loogiset operaattorit

Oletetaan, että haluat käsitellä asiakastilauksen. Tätä varten haluat ensin tarkistaa, onko tilattu tuote olemassa vai ei. Jos näin tapahtuu, haluat myös tarkistaa, onko käsillä oleva määrä riittävä. Loogiset operaattorit ovat hyödyllisiä tällaisissa tapauksissa. Loogisia operaattoreita käytetään arvioimaan useampaa kuin yhtä ehtoa.

Tärkeimmät Excel VBA -loogiset operaattorit AND, OR, NOT on lueteltu alla olevassa taulukossa:

S / N Operaattori Kuvaus Esimerkki Tuotos
1 JA AND: Tätä käytetään yhdistämään useampi kuin yksi ehto. Jos kaikki ehdot täyttyvät, AND arvioi tosi. Jos jokin ehto on väärä, AND arvioi vääräksi Jos tosi = tosi JA väärä = totta SITÄ väärä
2 TAI TAI: Tätä käytetään yhdistämään useampi kuin yksi ehto. Jos jokin ehdoista arvioi tosi, OR palauttaa tosi. Jos ne kaikki ovat vääriä, TAI palauttaa epätosi Jos tosi = tosi Tosi = väärä SITÄ totta
3 EI EI: Tämä toimii kuin käänteinen toiminto. Jos ehto on tosi, se palauttaa arvon epätosi ja jos ehto on väärä, se palauttaa arvon tosi. Jos EI (totta) Sitten väärä

Esimerkki lähdekoodista VBA-logiikkaoperaattoreille

Yksinkertaisuuden vuoksi vertaamme kovakoodattuja numeroita.

Lisää ActiveX-painikkeet taulukolle "Lisää" -vaihtoehdosta.

Aseta ominaisuudet alla olevan kuvan mukaisesti

VBA-loogiset operaattorit

Seuraava taulukko näyttää ominaisuudet, jotka sinun on muutettava, ja arvot, jotka sinun on myös päivitettävä.

S / N Ohjaus Omaisuus Arvo
1 Komento-painike 1 Nimi btnAND
Kuvateksti JA operaattori (0 = 0)
2 Komento-painike 2 Nimi btnOR
Kuvateksti TAI operaattori (1 = 1) tai (5 = 0)
3 Komento-painike 3 Nimi btnEi
Kuvateksti EI Käyttäjä Ei (0 =)

Lisää seuraava koodi btnAND_Click-kansioon

Private Sub btnAND_Click()If (1 = 1) And (0 = 0) ThenMsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator"ElseMsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator"End IfEnd Sub

VBA If JA Operaattori

  • "Jos (1 = 1) Ja (0 = 0) Sitten" if-käsky käyttää loogista operaattoria AND yhdistämään kaksi ehtoa (1 = 1) ja (0 = 0). Jos molemmat ehdot täyttyvät, muuten avainsanan yläpuolella oleva koodi suoritetaan. Jos molemmat ehdot eivät pidä paikkaansa, avainsanan 'Muu' alla oleva koodi suoritetaan.

Lisää seuraava koodi kansioon btnOR_Click

Private Sub btnOR_Click()If (1 = 1) Or (5 = 0) ThenMsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator"ElseMsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator"End IfEnd Sub

VBA Jos TAI operaattori

  • "If (1 = 1) Tai (5 = 0) Sitten" if-lause käyttää OR-loogista operaattoria yhdistämään kaksi ehtoa (1 = 1) ja (5 = 0). Jos jokin ehdoista on totta, muu avainsana yllä oleva koodi suoritetaan. Jos molemmat ehdot ovat väärät, suoritetaan muun avainsanan alla oleva koodi.

Lisää seuraava koodi osoitteeseen btnNOT_Click

Private Sub btnNOT_Click()If Not (0 = 0) ThenMsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator"ElseMsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator"End IfEnd Sub

VBA Jos EI operaattori

  • "Jos ei (0 = 0), niin" VBA Jos ei-funktio käyttää EI-loogista operaattoria kumoamaan if-lauseehdon tuloksen. Jos ehdot täyttyvät, avainsanan 'Muu' alla oleva koodi suoritetaan. Jos ehto on tosi, suoritetaan muun avainsanan yläpuolella oleva koodi.

Lataa yllä oleva koodi sisältävä Excel