PERULANGAN VISUAL BASIC 2008

pertemuan ke-7

                  PERULANGAN (LOOPING)

  Struktur perulangan atau looping merupakan salah satu alat kontrol program yang digunakan untuk mengulang suatu blok perintah sampai kondisi tertentu. Proses perulangan akan terus dilakukan secara terus menerus atau berulang-ulang selama kondisi tersebut belum terpenuhi (bernilai benar/true). jika kondisi sudah bernilai salah/false, maka perulangan akan berhenti.

Perulangan atau Looping dalam Visual Basic terdiri dari :

1. For-Next
2.  Do While-Loop
3.  Do Loop Until

FOR – NEXT

Digunakan untuk mengulang perintah dalam jumlah yang ditentukan. pada for-next kita tidak perlu menuliskan kondisi yang akan yang akan di uji, tetapi cukup hanya memberikan nilai step awal dan akhir nila.

Sintak :

1 2 3 4 5

For variabel = nilai_awal To nilai_akhir      ekspresi Next

Keterangan :

• variabel : nama integer yang digunakan untuk melakukan proses perulangan
• nilai_awal : nilai awal suatu variabel untuk menentukan awal perulangan
• nilai_akhir : nilai suatu variabel untu menentukan akhir dari perulangan
• ekpresi : blok perintah yang akan dilakukan jika kondisi perulangan memenuhi syarat.

Do While-Loop

Perulangan yang akan terus menerus dilakukan selama kondisi memenuhi syarat (bernilai benar) dan akan berhenti jika kondisi bernilai salah.

 Sintak :

1 2 3 4 5

Do While (Kondisi)      ekspresi Loop

Keterangan :

• kondisi : suatu kondisi berupa syarat tertentu, jika kondisi bernilai benar maka perulangan masih terus dilakukan, sebaliknya jika kondisi bernilan salah maka perulangan akan berhenti.
• ekpresi : blok perintah yang akan dilakukan jika kondisi perulangan memenuhi syarat.

Do Loop Until

merupakan perulangan yang metodenya kebalikan dari do-while Loop. Perulangan ini akan menjalankan suatu kondisi secara terus menerus jika kondisi bernilai salah (false) dan perulangan akan berhenti jika kondisi bernilai benar (true)

 Sintak :

1 2 3 4 5

Do      ekspresi Loop Until (Kondisi)

Keterangan :

• kondisi : suatu kondisi berupa syarat tertentu, jika kondisi bernilai benar maka perulangan masih terus dilakukan, sebaliknya jika kondisi bernilan salah maka perulangan akan berhenti.
• ekpresi : blok perintah yang akan dilakukan jika kondisi perulangan memenuhi syarat.

Contoh:

Membuat Teks “Visual Basic” sebanyak 10 pada Objek ListBox                                           

Dim i As Integer

listbox1.Items.Clear()

For i = 1 to TXTBIL.TEXT

   listbox1.Items.Add(“Visual Basic”)

Next

Membuat Deret angka 1 sampai 10                                                         

Dim i As Integer

listbox1.Items.Clear()

For i = 1 to 10

    listbox1.Items.Add(i)

Next

maka hasilnya akan seperti gambar di bawah ini:

Do Until  <kondisi>

   statement

Loop

Contoh:

Membuat Deret angka 1 sampai 10                                                   

Dim i As Integer

i = 

listbox1.Items.Clear()

Do Until i > 10

listbox1.Items.Add(i)

i=i+1

Loop 

BP:

While  <kondisi>

   statement

End While

Contoh:

Membuat Deret angka 1 sampai 10                                                   

Dim i As Integer

i = 1

ListBox1.Items.Clear()

While i <= 10

    ListBox1.Items.Add(i)

    i = i + 1

End While