Verificarea condițiilor din vba, instrucțiunea

3.5.1 Operatori sucursali condiționali și necondiționați. Declarația If ... Atunci. altfel

Verificarea condițiilor din VBA, instrucțiunea If. Apoi. Altfel, imbricate În cazul construcțiilor

Operatorii de ramuri operaționali sunt unul dintre elementele cele mai importante și utilizate frecvent în limbile de programare. Principiul general al muncii lor este simplu: verifică respectarea anumitor condiții (adevărul sau falsitatea oricăror expresii) și, în funcție de aceasta, executarea programului este îndreptată de-a lungul uneia sau alta ramură. VBA oferă doi operatori de salt cu condiție: Dacă ... Atunci. Alt caz și selectați.







Declarația If ... Atunci. Else este cel mai popular printre programatori. Sintaxa sa completă arată astfel:

În cazul în care Apoi
comandă 1

[Altfel, condițiile N Apoi
Echipe N]

  • Condiția este o expresie care este verificată pentru adevăr. Dacă este adevărat, atunci Command1 sunt executate, dacă false - Commands2;
  • Termeni N - condiții suplimentare care pot fi, de asemenea, verificate. În cazul în care sunt executate (expresia ConditionN este adevărată), comenzile N sunt executate.

Declarația If ... Atunci. Altfel se aplică:

  • atunci când este necesar să se verifice conformitatea cu o condiție și, în cazul conformității, să se acționeze:






Dacă nTemperature <10 Then

MsgBox "Îmbrăcați jacheta"

  • când trebuie să faceți același lucru ca în exemplul anterior și în caz de nepotrivire, efectuați o altă acțiune:

Dacă nTemperature <10 Then

MsgBox "Îmbrăcați jacheta"

MsgBox "Dress up the windbreaker"

  • când trebuie să verificați respectarea mai multor condiții (atenție la utilizarea operatorilor logici):

Dacă (nTemperature <10) And (bRain = True) Then

MsgBox "Îmbrăcați o jachetă și luați o umbrelă"

  • în cazul în care prima verificare a returnat False, este necesar să se verifice respectarea mai multor alte condiții (în acest caz este convenabil să se folosească ElseIf):

Dacă (bIGoInCar = adevărat) Apoi

MsgBox "Rochie pentru masina"

În cazul unei temperaturi <10 Then

MsgBox "Îmbrăcați jacheta"

MsgBox "Poți merge într-o cămașă"

În acest exemplu, deoarece bIGoInCar este o variabilă de tip Boolean și ea însăși are valoarea True sau False, prima linie poate arăta astfel:

Dacă bIGoInCar Apoi ...

Unele note cu privire la utilizarea Dacă ... Atunci. Else:

  • Cuvântul cheie de atunci trebuie să fie pe aceeași linie ca și dacă și condiția. Dacă îl mutați în linia următoare, va fi afișat un mesaj de eroare;
  • dacă plasați o comandă pe care doriți să o executați dacă condiția testată este adevărată pe o linie cu If și apoi, apoi End Dacă nu trebuie să scrieți:

Dacă nTemperature <10 Then MsgBox "Одеть куртку"

Dacă MyVar = 5 Apoi

MsgBox "MyVar = 5"

Dacă MyVar = 10 Apoi

MsgBox "MyVar = 10"







Articole similare

Pagina anterioară

Pagina următoare

Trimiteți-le prietenilor: