14 For Statement

Dengan menggunakan for, Anda dapat menjalankan pernyataan atau blok pernyataan berulang-ulang sampai ekspresi dinyatakan false. for berguna untuk pengulangan. For statement didalam C# sangat bebeda dengan VB, berikut pernyataan for antara C# dan VB

//C#
for (initializer; condition; iterator)
    body statements 

'VB
For counter [ As datatype ] = start To end [ Step step ]
    [ statements ]
    [ Continue For ]
    [ statements ]
    [ Exit For ]
    [ statements ]
Next [ counter ]

Mari kita langsung mempraktekannya, buat 1 project dengan nama (cs_03for untuk C#) dan (vb_03for untuk VB), masukan 1 object Listbox dan 5 object button kedalam form seperti gambar dibawah ini:

Gambar 14.1

Atur propertiesnya sebagai berikut:

Object	Properties	Value
button1	(Name)	btnForAsc
	Teks	For Ascending
button2	(Name)	btnForStop
	Teks	For Stop
button3	(Name)	btnForCon
	Teks	For Continue
button4	(Name)	btnForDes
	Teks	For Desending
button5	(Name)	btnForStep
	Teks	For Step

For Ascending
Klik 2x pada button For Ascending, kemudian ketikan kode sebagai berikut:

//C#
private void btnForAsc_Click(object sender, EventArgs e)
{
   listBox1.Items.Clear(); //hapus item dlm listbox1
   for (int i = 0; i < 10; i++)
   {
      listBox1.Items.Add(i); //memasukan data kedlm listbox1
   }
}

Perhatiakan code i++ diatas, anda dapat menulisnya dengan ++i itu sama saja, yang artinya ascending dari kecil ke besar, sedangkan untuk descending menggunakan "--". Sedangkan code listBox1.Items.Clear fungsinya menghapus item yang ada didalam listBox1.

'VB
Private Sub btnForAsc_Click(sender As Object, e As EventArgs) Handles btnForAsc.Click
   Dim i As Byte
   ListBox1.Items.Clear 'hapus item dlm listbox1
   For i = 1 To 10
       ListBox1.Items.Add(i) 'memasukan data kedlm listbox1
   Next i
End Sub

Jalankan program kemudian klik button For Ascending, maka hasilnya akan seperti berikut:

Gambar 14.2

Stop For
Klik 2x pada button For Stop, kemudisan ketikan code berikut:

//C#
private void btnForAsc_Click(object sender, EventArgs e)
{
   listBox1.Items.Clear(); //hapus item dlm listbox1
   for (int i = 0; i < 10; i++)
   {
      listBox1.Items.Add(i);
      if (i == 7)
      {
         break;
      }
   }
}

'VB
Private Sub btnForAsc_Click(sender As Object, e As EventArgs) Handles btnForAsc.Click
   Dim i As Byte
   ListBox1.Items.Clear 'hapus item dlm listbox1
   For i = 1 To 10
       ListBox1.Items.Add(i)
       If i = 7 Then
            Exit For
       End If
   Next i
End Sub

Untuk menghentikan for yang telah kita tentukan di C# menggunakan break sedangkan VB menggunakan Exit For. Coba kita jalankan program dan klik button For Stop, maka saat i mencapai angka 7 pengulangan akan terhenti seperti gambar dibawah berikut:

Gambar 14.3

Continue For
Klik 2x pada button Continue For, kemudian ketikan code berikut:

//C#
private void tblForContinue_Click(object sender, EventArgs e)
{
    listBox1.Items.Clear(); //hapus item dlm listbox1
    for (int i = 1; i <= 20; i++)
    {
        if (i >= 5 & i <= 9)
        {
            continue;
        }
        listBox1.Items.Add(i);
        if (i == 15)
        {
            break;
        }
    }
}

'VB
Private Sub tblForCon_Click(sender As Object, e As EventArgs) Handles tblForCon.Click
    Dim i As Byte
    ListBox1.Items.Clear
    For i = 1 To 20
        If i >= 5 and i <= 9 Then
            Continue For
        End If
        ListBox1.Items.Add(i)
        If i = 15 Then
            Exit For
        End If
    Next i
End Sub

Continue disini memiliki fungsi agar apabila i dalam kondisi yang ditentukan (contohnya 5 sampai 9) maka code ListBox1.Items.Add tidak dieksekusi, melainkan dikembalikan ke for, begitu kodisinya sudah mencapai 10, maka ListBox1.Items.Add kembali dieksekusi. begitu i sudah mencapai 15 maka for dihentikan seperti gambar 14.4 dibawah ini.

Gambar 14.4

For Descending
Klik 2x pada button For Decending, kemudian ketikan code berikut:

//C#
private void btnForDes_Click(object sender, EventArgs e)
{
    listBox1.Items.Clear();
    for (int i = 10; i >= 1; i--)
    {
        listBox1.Items.Add(i);
    }
}

'VB
Private Sub btnForDes_Click(sender As Object, e As EventArgs) Handles btnForDes.Click
    Dim i As Integer
    ListBox1.Items.Clear 'hapus item dlm listbox1
    For i = 10 To 1 Step -1
        ListBox1.Items.Add(i)
    Next i
End Sub

Jalankan program, kemudian klik button For Descending, maka i akan bergerak dari angka besar menuju angka kecil seperti gambar 14.5 dibawah ini:

Gambar 14.5

For Step
Tujuannya membuat pengulangan dengan melewati beberapa step yang kita tentukan, klik 2x pada button For Step, kemudian ketikan code berikut:

//C#
private void btnForStep_Click(object sender, EventArgs e)
{
    listBox1.Items.Clear();
    for (int i = 1; i < 20; i+= 2)
    {
        listBox1.Items.Add(i);
    }
}

'VB
Private Sub btnForStep_Click(sender As Object, e As EventArgs) Handles btnForStep.Click
    Dim i As Byte
    ListBox1.Items.Clear
    For i = 1 To 20 Step 2
        ListBox1.Items.Add(i)
    Next
End Sub

Jalankan program, kemudian klik button For Step dan hasilnya akan seperti gambar 14.6 dibawah ini:

Gambar 14.6

OK, sampai disini selesai contoh dari For Statement, next kita masuk Foreach Statement.

Password: csvb2015.blogspot.co.id