Perulangan Pada Program VB Net

[+] Post Title :

Perulangan Pada Program VB Net

[+] Date : Saturday, March 16, 2013
[+] Author : Unknown
[+] Link : http://sulastrijuliana.blogspot.com/2013/03/perulangan-pada-program-vb-net.html
[+] Type : VB.NET

Terdapat 4 jenis perulangan pada program VB Net yang bisa anda gunakan.

Diantaranya :

1. For Next

2. While – End While

3. Do Until – Loop

4. Do While – Loop

Syntax :

1. For Next

For nvar = nawal to nakhir

perintah

perintah

Next nvar

atau bisa juga

For nvar = nawal to nakhir step nilai

perintah

perintah

Next nvar

2. While – End While

While kondisi

perintah

perintah

End While

3. Do Until – Loop

Do Until Kondisi

Perintah

Perintah

Loop

4. Do While – Loop

Do While kondisi

Perintah

Perintah

Loop

Design form perulangan pada program vb net

Pada TextBox1 propesties yang dirubah yaitu Multiline : True, ScrollBar : Vertical

Berikut merupakan contoh perulangan pada program VB Net

Public Class Form1

    Dim j As Byte

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load



For i = 1 To 10

ListBox1.Items.Add(i)

Next

For i = 10 To 1 Step -1

ListBox2.Items.Add(i)

Next

j = 1

While j <= 10

ComboBox1.Items.Add(j)

j += 1

End While

j = 10

Do Until j < 1

ListBox3.Items.Add(j & ” BD”)

j -= 2

Loop

j = 1

Do While j < 10

TextBox1.Text = TextBox1.Text & j & ” BD” & vbCrLf

j += 2

Loop

    End Sub

End Class



Penjelasan

     j += 2   sama dengan perintah   j = j + 2

Semoga artikel perulangan pada program VB Net dapat membantu anda dalam memahami program VB Net

Source mesran.net