VBScript ciklusok: Do While, Do Amíg, Amíg, Mindegyikhez (példa)
⚡ Okos összefoglaló
A VBScript ciklusok elmagyarázzák, hogyan ismételhetők a műveletek a Do While, Do Until, While Wend, For Next, For Step és For Each konstrukciók használatával, szintaxist, kilépési feltételeket és példákat ismertetve.

Miért használnak hurkot a VBScriptben?
A ciklusokat arra használjuk, hogy ugyanazt a kódblokkot újra és újra végrehajtsuk. Számos VBScript ciklus létezik.ping utasítások. Néhány VBScript-es munkafüzetping utasítások a „Do While” (Miközben csináld), „Do Until” (Csak csináld), „For…..Next” (Következőre) és így tovább. Szóval, hogyan fogod eldönteni, hogy melyik WC-t használod?ping utasítás, amit az Ön igényeihez kell használni?
A ciklusok végrehajtása közben lehet, hogy tudatában vagyunk annak, hogy hányszor szeretnénk végrehajtani egy utasításkészletet. Például tízszer szeretnénk kiszámítani két szám összegét. Ebben az esetben már tudjuk, hogy egy kódblokkot tízszer kell megismételni. Tegyük fel, hogy két szám összegét szeretnénk kiszámítani, amíg egy adott változó igaz nem lesz. Itt nem tudjuk, hányszor kell végrehajtani a ciklust. Tehát attól függően, hogy tudjuk-e a végrehajtások számát, különböző típusú ciklusokat használhatunk.ping nyilatkozatokat.
A következő mosdóba…ping Az utasításokat akkor használjuk, ha egy kódblokkot véges számú alkalommal szeretnénk megismételni, azaz ha tudjuk, hányszor szeretnénk megismételni a kódblokkot.
Csináld, amíg és amíg WC-n vanping Az utasításokat akkor használjuk, ha egy kódblokkot addig akarunk ismételni, amíg egy feltétel igaz vagy hamis nem lesz, azaz amikor nem tudjuk, hányszor szeretnénk végrehajtani a kódblokkot.
Vessünk egy pillantást ezekre a vécékreping kijelentések egyenként.
VBScript Do While Loop
Ha nem tudja, hányszor kell végrehajtania egy kódblokkot, akkor Do While ciklusokat fog használni. Például a „Welcome” üzenetet szeretné kiadni, miközben az x változó értéke kisebb, mint 5. Ebben az esetben a Do While ciklus kerül felhasználásra.
<script type="text/vbscript"> Dim x x=1 Do While x<5 document.write("Welcome.") x=x+1 Loop </script>
Ha megpróbálja végrehajtani a kódot, a következő kimenetet kapja:
A blokk négyszer kerül végrehajtásra (ha x=1,2,3 és 4), és a ciklus akkor ér véget, amikor az x értéke 5 lesz. Ha elfelejti az x=x+1 utasítást, akkor a ciklus véget nem érővé válik. egy. Ez a fajta hurkok az úgynevezett végtelen hurkokA végtelen ciklusok akár a rendszer összeomlását is okozhatják. Tehát a Do While loo használata közben...ping utasításokban, győződjön meg arról, hogy van valamilyen kód, amely a WC-tping a feltétel egy adott ponton igaz.
Ha az x változóhoz az elején 7 értéket rendelünk, akkor a kódblokk még egyszer sem kerül végrehajtásra. Tegyük fel, hogy a feltételtől függetlenül legalább egyszer le akarja hajtani a kódblokkot, akkor használhatja a Do While ciklust. Módosítsa a kódot így:
VBScript példa:
<script type="text/vbscript"> Dim x x=7 Do document.write("Welcome.") x=x+1 Loop While x<5 </script>
Ha végrehajtja ezt a kódot, csak egyszer kapja meg az „Üdvözöljük” üzenetet. Itt a feltétel csak a ciklus egyszeri végrehajtása után kerül ellenőrzésre.
VBScript Do Until Loop
A „Do Until” ciklus akkor is használatos, ha nem tudja, hányszor kell végrehajtania egy kódblokkot. A Do Until ciklus első kódblokkja (Do While x<5) egyenértékű az alábbi kódblokkkal.
<script type="text/vbscript"> Dim x x=1 Do Until x=5 document.write("Welcome.") x=x+1 Loop </script>
Ez ugyanazt a kimenetet adja, mint a Do While ciklus első kódblokkja. Négyszer fogja látni az üdvözlő üzenetet. Hasonló a Do …..Loop While-hoz, nekünk is meg kell tenni… Loop Amíg is.
Ha ki szeretne lépni egy Do While vagy Do Until ciklusból, akkor használhatja az Exit Do utasítást. Tegyük fel, hogy ki akar lépni a blokkból, amikor az x értéke 3 lesz a fenti programban, akkor a következőképpen kell kódolnia:
<script type="text/vbscript"> Dim x x=1 Do Until x=5 If x=3 Then Exit Do document.write("Welcome.") x=x+1 Loop </script>
Ha végrehajtja a kódot, a kimenet így fog kinézni:
Itt a ciklus akkor lép ki, ha x értéke 3 lesz.
VBScript While Loop
A While…Wend hurok hasonló a Do While hurokhoz, bár nem használják általánosan. Az As Do While strukturáltabb, mint a While…..Wend ciklus, a programozók általában Do While utasításokat használnak.
<script type="text/vbscript"> Dim x x = 1 While x < 5 document.write("Welcome.") x=x+1 Wend </script>
A kimenet az lesz
VBScript For-Next Loop
A For-Next ciklus egy kódblokk meghatározott számú alkalommal történő végrehajtására használható. A „VBScript For ciklus” meghatározza a számlálóváltozót, valamint annak kezdő és végértékeit. A Next utasítás eggyel növeli a számlálóváltozót.
For i = 1 To 5 document.write("The number is " & i & " ") Next
Ha végrehajtja a kódot, akkor a következő kimenetet kapja:
VBScript For-Step-Next Loop
Alapértelmezés szerint a számlálóváltozó eggyel növekszik. Ha növelni vagy csökkenteni szeretné a számlálóváltozót a megadott értékkel, akkor használja a For….Step….Next ciklust. Tegyük fel, hogy a fenti kódban 2-vel szeretné növelni a számlálót, majd módosítsa a kódot a következőképpen:
For i = 1 To 5 Step 2 document.write("The number is " & i & "<br />") Next </script>
Ennek a kódnak a kimenete a következő lesz:
Ha ki szeretne lépni a For Next vagy a For Step Next ciklusból, akkor az Exit parancsot használhatja az utasításhoz. Tegyük fel, hogy ki akar lépni a blokkból, amikor az i értéke 3 lesz a fenti programban, akkor a következőképpen kell kódolnia:
<script type="text/vbscript"> For i = 1 To 5 Step 2 If i=3 Then Exit For document.write("The number is " & i & "<br />") Next </script>
A kimenet a következő lesz:
VBScript For-Each-Next Loop
Ha meg szeretne ismételni egy kódblokkot egy gyűjtemény minden eleméhez vagy egy VBS tömb minden eleméhez, akkor a For…Each…Next ciklust kell használnia.
<script type="text/vbscript"> Dim students(4) students(0)="John" students(1)="Hanah" students(2)="Sarah" students(3)="Kevin" students(4)="Emma" For Each x In students document.write(x & "<br />") Next </script>
A fent megadott kód kimenete lesz
Code Példa
<html> <head> <script type="text/vbscript"> Dim name, length name = InputBox("Enter your name") length = Len(name)’Gives length of the input string For i = 1 To length txt = Mid(name,i,1)'Returns a specified number of characters from a string, the first parameter is the string, second parameter is the starting position and third parameter is the number of characters to return If txt="a" or txt="A" or txt="e" or txt="E" or txt="i" or txt="I" or txt="o" or txt="O" or txt="u" or txt="U" Then counter = counter+1 End If Next document.write("Hi " & name & "!!!Your name contains " & counter & " vowels.") </script> </head> <body> </body> </html>
Mentse a fájlt loop.html néven a kívánt helyre. Most nyissa meg a fájlt az Internet Explorerben, és megjelenik egy doboz, amelyben meg kell adnia a nevét. Írjon be egy nevet, mondjuk Áront, így:
Kattintson az OK gombra, és a kimenet így fog kinézni:




