Perulangan/Looping pada Visual Basik.NET

Bismillah...

Alhamdulillah, setelah beberapa hari sempat absen karena kesibukan, akhirnya kali ini bisa kembali berbagi kepada sahabat bloger semua. Mau posting tentang apa ya?

Hmmm....baiklah kita belajar yang ringan-ringan aja, nampun pastinya masih berkaitan dengan kegiatan pemrograman pada Visual Studio 2010 atau sering di sebut juga Visual Basik.NET. 

Dalam pemrograman tentunya ada banyak trick coding yang dilakukan oleh para programmer untuk mendapatkan hasil yang sesuai dengan jalannya program yang diinginkan. Salah satu coding yang selalu ada dalam setiap kegiatan pemrograman, adalah tentang perulangan atau sering juga di sebut dengan istilah Looping. 

Apa itu looping?

Looping atau struktur perulangan adalah satu alat kontrol program yang digunakan untuk mengulang suatu blok perintah sampai kondisi tertentu terpenuhi.

Ada beberapa bentuk perulangan/looping antara lain yaitu:

1. For - Next

Bentuk perulangan ini biasanya digunakan untuk membuat perintah perulangan dengan jumlah yang sudah ditentukan. Dalam perulangan For Next kita harus menentukan nilai awal dan akhir yang akan dimunculkan.

Bentuk umum sintaknya:

For variabel = nilai_awal to nilai_akhir

    Ekspresi

Next

Penjelasan:

Variabel = nama dengan type integer yang digunakan untuk melakukan proses perulangan.

Nilai_awal = nilai variabel yang menentukan awal dari proses perulangan.

Nilai_akhir = nilai variabel yang menentukan akhir dari proses perulangan.

Ekspresi = blok perintah yang akan di eksekusi atau dijalankan jika kondisi perulangan memenuhi syarat.

2. While - End While

Perulangan While - End While adalah bentuk perulangan yang digunakan untuk membuat perintah perulangan sampai dengan jumlah yang kita inginkan. Biasanya menggunakan operator perbandingan untuk membatasi nilai akhir dari proses perulangan.

Bentuk umum sintaknya:

While variabel <= nilai_akhir

    Ekspresi 

End while

Penjelasan:

Variabel = nama dengan type integer yang digunakan untuk melakukan proses perulangan.

Nilai_akhir = nilai variabel yang menentukan akhir dari proses perulangan.

Ekspresi = blok perintah yang akan di eksekusi atau dijalankan jika kondisi perulangan memenuhi syarat.

3. Do While - Loop

Perulangan Do While Loop adalah perulangan yang dalam prosesnya akan terus melakukan perulangan selama kondisi memenuhi syarat (bernilai benar) dan akan berhenti sampai kondisi bernilai salah.

Bentuk umum sintaknya:

Do While (kondisi)

    Ekspresi

Loop 

Penjelasan:

Kondisi : berupa syarat tertentu, jika kondisi masih memenuhi syarat (bernilai benar maka perulangan masih terus dilakukan, dan jika sampai pada kondisi bernilai salah baru akan berhenti.

Ekspresi : blok perintah yang akan dilakukan jika kondisi perulangan bernilai benar (memenuhi syarat)

4. Do - Loop Until

Perulangan Do - Loop Until adalah bentuk perulangan kebalikan dari Do While Loop, dimana perulangan akan dijalankan secara terus menerus jika kondisi (syarat) nya bernilai salah (false) dan perulangan akan berhenti jika kondisi bernilai benar (true)

Bentuk umum sintaknya:

Do Until

    Ekspresi

Loop (Kondisi)

Penjelasan:

Kondisi : berupa syarat tertentu, jika kondisi masih memenuhi syarat (bernilai benar maka perulangan masih terus dilakukan, dan jika sampai pada kondisi bernilai salah baru akan berhenti.

Ekspresi : blok perintah yang akan dilakukan jika kondisi perulangan bernilai benar (memenuhi syarat)

Bagaimana penerapannya dalam Visual Basik.NET? 

Baiklah kita akan coba membuat sebuah aplikasi sederhana tentang proses looping/perulangan.

Berikut tahapannya:

1. Buka Visual Studio 2010 > Pilih New Project > beri nama project > dan tunggu hingga Form 1 tampil

2. Design Form seperti tampak pada gambar di bawah ini:

3. Setelah itu Ketik Coding seperti di bawah ini

a. Double Click pada Button For Next

Private Sub BtnForNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnForNext.Click
    Dim a As Integer
    ListBox1.Items.Clear
        For a = 1 To 50
            ListBox1.Items.Add(a)
        Next
End Sub

b. Doble Click pada Button Do While

Private Sub BtnDoWhile_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnDoWhile.Click
    Dim a As Integer
    ListBox1.Items.Clear
    Do While a <= 20
        ListBox1.Items.Add(a)
        a = a + 2
    loop
Label1.Text = "Menampilkan hasil Do  While - Loop"
End Sub

c. Doble Click pada Button Do Until

Private Sub BtnDoUntil_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnDoUntil.Click
    Dim a As Integer
    ListBox1.Items.Clear
    Do
         ListBox1.Items.Add(a)
         a = a + 3
    Loop Until (a > 10)
Label1.Text = "Menampilkan hasil Do  - Loop Until"
End Sub

d. Doble Click pada Button While

Private Sub BtnWhile_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnWhile.Click
    Dim a As Integer
    a = 1
    ListBox1.Items.Clear
    While a <= Val(TxtJml.Text)
          ListBox1.Items.Add(TxtTeks.Text)
          a = a + 1
    End While
Label1.Text = "Menampilkan hasil Do  - Loop Until"
End Sub

4. Kemudian coba di running atau boleh tekan tombol F5 pada keyboard

Demikianlah penerapan dan penggunaan fungsi looping atau perulangan pada Visual Basic.NET, tentunya coding ini dapat dikembangkan lebih lanjut pada proses pengcodingan yang lebih rumit.

Untuk contoh aplikasinya silahkan download pada link di bawah ini:

Unduh Contoh Aplikasi

Terimakasih sudah berkunjung semoga dapat membatu dan menjadi tambahan ilmu.