VBScript petlje: Do While, Do Until, While, For Every (primjer)

Zašto se petlje koriste u VBScriptu?

Petlje se koriste za ponovno i ponovno izvršavanje istog bloka koda. Postoji niz VBScript izjava o petlji. Neke od naredbi VBScript petlje su Do While, Do Until, For…..Next i tako dalje. Dakle, kako ćete odlučiti koju naredbu petlje koristiti za svoje potrebe?

Dok izvršavate petlje, možete, ali ne morate biti svjesni koliko puta želite izvršiti skup instrukcija. Na primjer, želite izračunati zbroj dvaju brojeva deset puta. U ovom slučaju već znate da želite ponoviti blok koda 10 puta. Pretpostavimo da želite izračunati zbroj dvaju brojeva dok određena varijabla ne postane istinita. Ovdje ne znate koliko puta se petlja treba izvršiti. Dakle, ovisno o tome znate li ili ne znate broj izvršenja, možete koristiti različite vrste naredbi petlje.

For…Next naredbe petlje koriste se ako želite ponoviti blok koda konačan broj puta, odnosno ako znate broj puta ako želite ponoviti blok koda.

Izjave petlje Do While i Do Until koriste se kada želite ponavljati blok koda dok uvjet ne postane istinit ili netočan, to jest kada niste svjesni koliko puta želite izvršiti blok koda.

Pogledajmo ove izjave petlje jednu po jednu.

VBScript Do While petlja

Ako ne znate koliko puta trebate izvršiti blok koda, tada ćete koristiti Do While petlje. Na primjer, želite poslati poruku "Dobrodošli" dok je vrijednost varijable x manja od 5. U tom slučaju koristit će se Do While petlja.

<script type="text/vbscript">
Dim x
x=1
Do While x<5
document.write("Welcome.")
x=x+1
Loop
</script>

Ako pokušate izvršiti kod, dobit ćete rezultat poput ovog:

Blok se izvršava četiri puta (kada je x=1,2,3 i 4) i petlja završava kada vrijednost x postane 5. Ako zaboravite naredbu x=x+1, vaša će petlja postati beskrajna jedan. Ova vrsta petlji poznata je kao beskonačne petlje. Beskonačne petlje mogle bi čak i srušiti vaš sustav. Dakle, dok koristite izjave petlje Do While, trebali biste se pobrinuti da postoji neki kod koji će uvjet petlje učiniti istinitim u jednom ili drugom trenutku.

Ako varijabli x na početku dodijelite vrijednost 7, tada se blok koda neće izvršiti niti jednom. Pretpostavimo da želite izvršiti blok koda barem jednom bez obzira na uvjet, tada možete koristiti Do While petlju. Promijenite kôd ovako:

Primjer VBScripta:

<script type="text/vbscript">
Dim x
x=7
Do 
document.write("Welcome.")
x=x+1
Loop While x<5
</script>

Ako izvršite ovaj kod, dobit ćete poruku "Dobrodošli" samo jednom. Ovdje se uvjet provjerava tek nakon jednog izvođenja petlje.

VBScript Do Until petlja

Petlja 'Do Until' također se koristi kada ne znate koliko vam je vremena potrebno za izvođenje bloka koda. Prvi blok koda u petlji Do Dok (Do Dok x<5) ekvivalentan je donjem bloku koda.

<script type="text/vbscript">
Dim x
x=1
Do Until x=5
document.write("Welcome.")
x=x+1
Loop
</script>

To će vam dati isti izlaz kao i prvi blok koda u Do While petlji. Vidjet ćete poruku dobrodošlice četiri puta. Slično Do …..Loop While, moramo također Do…Loop Until.

Ako želite izaći iz petlje Do While ili Do Until između njih, tada možete upotrijebiti naredbu Exit Do. Pretpostavimo da želite izaći iz bloka kada vrijednost x postane 3 u gornjem programu, tada trebate kodirati ovako:

<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>

Ako izvršite kod, vaš će izlaz izgledati ovako:

Ovdje se iz petlje izlazi kada vrijednost x postane 3.

VBScript while petlja

While…Wend petlja slična je Do While petlji iako se ne koristi često. Kako je Do While više strukturiran od While…..Wend petlje, programeri obično koriste Do While izjave.

<script type="text/vbscript">
Dim x
x = 1   
While x < 5   
document.write("Welcome.")
x=x+1
Wend  
</script>	

Izlaz će biti

VBScript za sljedeću petlju

For-Next petlja može se koristiti za izvršavanje bloka koda određeni broj puta. “VBScript For petlja” navodi varijablu brojača i njezinu početnu i krajnju vrijednost. Naredba Next povećava varijablu brojača za jedan.

For i = 1 To 5
  document.write("The number is " & i & "
")
Next

Ako izvršite kod, dobit ćete izlaz poput ovog:

VBScript za-korak-sljedeća petlja

Prema zadanim postavkama, varijabla brojača se povećava za jedan. Ako želite povećati ili smanjiti varijablu brojača za vrijednost koju navedete, tada možete koristiti For….Step….Next petlju. Pretpostavimo da u gornjem kodu želite povećati brojač za 2, a zatim izmijenite svoj kod ovako:

For i = 1 To 5 Step 2
  document.write("The number is " & i & "<br />")
Next
</script>

Izlaz ovog koda bit će:

Ako želite izaći iz petlje For Next ili For Step Next između, tada možete koristiti Exit za izjavu. Pretpostavimo da želite izaći iz bloka kada vrijednost i postane 3 u gornjem programu, tada trebate kodirati ovako:

<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>

Izlaz će biti:

VBScript petlja za svaki sljedeći

Ako želite ponoviti blok koda za svaku stavku u kolekciji ili za svaki element VBS niza, tada trebate koristiti For…Each…Next petlju.

<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>

Izlaz gore navedenog koda bit će

Primjer koda

<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>

Spremite datoteku kao loop.html na željenu lokaciju. Sada otvorite datoteku u Internet Exploreru i dobit ćete okvir u koji se od vas traži da unesete svoje ime. Unesite ime, recimo Aaron, ovako:

Kliknite OK i vaš će rezultat izgledati ovako:

Rezime

• Izjave petlje koriste se za ponovno i ponovno izvršavanje istog bloka koda.
• Koristit ćete Do-While, Do-Until i While-Wend petlje kada ne znate unaprijed koliko puta blok treba biti izvršen.
• Koristit ćete petlje For-Next, For-Next-Step i For-Each-Next ako već znate koliko puta trebate izvršiti blok koda.