perulangan pada delphi dan visual basic

    Perulangan Delphi :

·         For To Do

For counter := nilai awal To Nilai akhir Do

Begin

Perintah;

Perintah;

End;

·         For DownTo Do

For counter := nilaiawal DownTo Nilaiakhir Do

Begin

Perintah;

Perintah;

End;

·         Repeat Until

Repeat

Perintah;

Perintah;

Until Kondisi;

End;

·         While Do

While kondisi do

Begin

Perintah;

Perintah;

End;

Perulangan pada Visual Basic

·         Do While … Loop

Do While Kondisi
Pernyataan
…..
Loop

·         Do Until … Loop

Do Until Kondisi
Pernyataan
…..
Loop

·         While … Wend

While Ekspresi
Pernyataan
…..
Wend

·         For … Next

For Indeks = NilaiAwal To NilaiAkhir
Pernyataan
…..
Next