Struktur Pengulangan di VB.NET

sumber : Doc Pribadi

Hai guys kali ini saya kan membahas tentang Struktur Perulangan yang ada di VB.NET .Setruktur perulangan ada pada setiap bahasa pemrograman ,hanya saja berbeda cara mengeksekusinya.

Apa itu Perulangan?

Perulangan(looping) adalah sebuah fungi yang dibuat untuk menjalankan kode program secara berulang-ulang jika kondisi terpenuhi.

Dalam pertemuan kali ini saya ingin membahas perulangan yang ada pada vb.bet ,apa saja perulangannya :

Ada 4 macam struktur pengulangan di vb.net:

1.For-Next

Perulangan For-Next digunakan untuk mengulang perintah dalam jumlah yang sudah ditentukan. Pada struktur for-next kita tidak perlu menuliskan kondisi yang akan diuji tetapi hanya perlu menuliskan nilai awal dan akhir variabel penghitung.

2.Do While - Loop

Perulangan while akan melakukan perulangan kalau kondisi (syarat) terpenuhi. Sedangkan do/while melakukan perulangan dulu, kemudian memeriksa kondisinya atau sayaratnya. Kalau kondisi terpenuhi, maka do/while akan melanjutkan perulangan,sebaliknya, dia akan berhenti (break).

3.Do Until - Loop

Perulangan Do Until-Loop merupakan perulangan yang berfungsi mengulangi instruksi kode program jika kondisi tidak memenuhi syarat,dan akan berhenti jika kondisi memenuhi syarat.

4.While - End While

Perulangan yang berfungsi untuk mengulangi instruksi dari kode program sampai kondisi memenuhi syarat dan akan akan berhenti jika sudah memenuhi syarat.

Untuk mencobanya ,seperti biasa buka aplikasi Visual studio kalian masing-masing


Pilih New Project->Windows Form Application->beri nama : Struktur Pengulangan -> OK

sumber : Doc Pribadi

tambahkan :

• 5 button 
1. button : for-next
2. button : do while-loop
3. button : do until-loop
4. button : while-end while
• 1 listbox

Edit text button seperti ini :

sumber : Doc Pribadi

Masukan coding berikut :
saya sudah menyertakan penjelasan sederhana 

Public Class Form1
    Dim i As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        ListBox1.Items.Clear()
        For Me.i = 1 To 10 'Pengulangan dilakukan dari 1 sampai 10          
            ListBox1.Items.Add(i)
        Next
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        ListBox1.Items.Clear()
        i = 1
        Do While i <= 10 'kondisi i <= 10 true jadi program akan berkerja selama kondisi masih true         
            ListBox1.Items.Add(i)
            i = i + 1
        Loop
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        ListBox1.Items.Clear()
        i = 1
        Do Until i > 10 'kondisi i > 10 adalah false karena i = 1 karena itu program akan berkerja hingga kondisi true          
            ListBox1.Items.Add(i)
            i = i + 1
        Loop
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        ListBox1.Items.Clear()
        i = 1
        While i <= 10 'sama dengan do While    
            ListBox1.Items.Add(i)
            i = i + 1
        End While
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        ListBox1.Items.Clear()
    End Sub
End Class

Save Project dan tekan F5 untuk menjalankannya ,maka hasilnya seperti berikut :

sumber : Doc Pribadi

Hasil dari kode perogram diatas semuanya sama yaitu angka 1 sampai dengan 10 ,tetapi dengan kode yang berbeda.
Nah cukup sekian pembahasan tentang Perulangan yang ada pada vb.net ,jika kalian masih menemukan kebingungan silahkan komentar di bawah,selamat mencoba,semoga bermanfaat..