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 :
- For-Next
- Do-Loop
- While-And While
Setiap perulangan mempunyai kelebihan masing-masing, sehingga dapat dipilih sesuai dengan masalah yang dihadapi.
1. 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 nilai.
Sintaks:
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.
Contoh:
-Membuat Teks “Visual Basic” sebanyak 10 pada Objek ListBox
Dim i As Integer
listbox1.Items.Clear()
For i = 1 to 10
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
2. Do-Loop
Perulangan Do…Loop digunakan untuk perulangan yang jumlah perulangannya tidak diketahui. Perulangan ini akan dijalankan sesuai kondisi yang telah ditetapkan.
Pemeriksaan Kondisi pada Do…Loop dapat dilakukan diawal dan diakhir.
Kondisi akan dijalankan pada dua keadaan yaitu Until dan While.
2.1. Do…Loop dengan Pemeriksaan diawal
-Do Until … Loop
Perulangan akan dilakukan ketika kondisi bernilai salah dan berhenti sampai ketika kondisi bernilai benar.
Sintaks:
Do Until (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.
Contoh:
Membuat Deret angka 1 sampai 10
Dim i As Integer
i = 1
listbox1.Items.Clear()
Do Until i > 10
listbox1.Items.Add(i)
i=i+1
Loop
-Do While … Loop
Loop dengan do While cocok digunakan pada perulangan yang terjadi selama kondisi tertentu memenuhi syarat (selama kondisi benar, statement akan dijalankan terus).
Sintaks:
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.
Contoh:
Membuat Deret angka 1 sampai 10
Dim i As Integer
i = 1
listbox1.Items.Clear()
Do while i > 10
listbox1.Items.Add(i)
i=i+1
Loop
2.2. Do…Loop dengan Pemeriksaan diakhir
-Do … Loop Until
Perulangan akan dilakukan ketika kondisi bernilai salah dan berhenti sampai ketika kondisi bernilai benar.
Sintaks:
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 Deret angka 1 sampai 10
Dim i As Integer
i = 1
listbox1.Items.Clear()
Do
listbox1.Items.Add(i)
i=i+1
Loop Until i > 10
-Do … Loop While
Loop dengan do While cocok digunakan pada perulangan yang terjadi selama kondisi tertentu memenuhi syarat (selama kondisi benar, statement akan dijalankan terus).
Sintaks:
Do
ekspresi
Loop While (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.
3. While-End While
Perulangan While…End While tidak jauh berbeda dengan perulangan do … loop digunakan untuk perulangan yang jumlah perulangannya tidak diketahui. Perulangan ini akan dijalankan sesuai kondisi yang telah ditetapkan.
Sintaks:
While (Kondisi)
ekspresi
End While
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 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
Mungkin hanya di sini saja yang bisa saya paparkan mengenai perjumpaan kita di materi kali ini, jika ada kesalahan pada penulisan mohon dimaafkan.
Terimakasih telah berkunjung di blog saya ini :).
Semoga bermanfaat buat kita semua.