Perulangan




Baik, pada sesi kali ini kita akan belajar tentang perulangan. yaitu, perulangan dari FOR-NEXT,  dan Do Loop While, Do While  Loop Perulangan tersebut mempunyai pengertian yang berbeda beda, dan mempunyai cara kerja yang berbeda tentunya. Oke.. baiklah, disini saya akan mencoba menjelaskan singkat perulangan yang ke 3 tersebut.

Struktur For-Next


            Struktur ini digunakan untuk mengulang blok perintah dalam jumlah yang sudah ditentukan.  Pada struktur ini tidak perlu menuliskan kondisi yang akan diuji tetapi hanya perlu menuliskan nilai awal dan akhir variabel penghitung.  Nilai variabel penghitung ini akan secara otomatis bertambah atau berkurang setiap kali suatu pengulangan dikerjakan.

Syntax :
For counter = awal To akhir Step pertambahan
            ……. Expresi …….
Next counter

Contoh  saya akan mencoba mencetak “Saya Belajar Visual Studio” sebanyak 20

        Dim counter As Integer
        ListBox1.Items.Clear()
        For counter = 1 To 20
               ListBox1.Items.Add(counter & "" & "Saya Belajar Visual Studio")
        Next counter





Struktur Do Loop

            Bentuk lain dari struktur Do – Loop adalah dengan mengexekusi terlebih dahulu blok perintah baru menjalankan pengujian kondisi diakhir exekusi.  Dengan menggunakan perintah ini maka blok perintah minimal dikerjakan 1 kali. Perulangan dilanjutkan jika kondisi bernilai True

a.  Struktur Do While  Loop
Syntax :
Do while
            ….. Expresi ……
Loop

Contoh  saya akan mencoba mencetak “Saya Belajar Visual Studio untuk do while loop” sebanyak 20

       Dim dowhile As Integer
       dowhile = 1
        Do While dowhile <= 20
            ListBox1.Items.Add(dowhile & "Saya Belajar Visual Studio untuk do while")
            dowhile = dowhile + 1
        Loop




b. Do – loop While
Syntax :

              Do
            ….. Expresi ……
             Loop While (kondisi)

Contoh  saya akan mencoba mencetak “Saya Belajar Visual Studio untuk do loop while” sebanyak 20

       Dim doloopwhile As Integer
       doloopwhile = 1
       Do
             ListBox1.Items.Add(doloopwhile & "Saya Belajar Visual Studio untuk do loop while")
             doloopwhile = doloopwhile + 1
       Loop while doloopwhile <=20
















Komentar