Menggunakan Perintah Pengulangan FOR EACH di VB.NET

Dalam pemrograman sering kali kita melakukan perintah yang berulang terutama ketika kita menggunakan data yang tersimpan dalam Grid atau pun menyimpan ke grid. Untuk itu bisa digunakan perintah berulang, salah satunya adalah perintah FOR EACH LOOP.

Perintah ini biasanya digunakan untuk mengerjakan perintah item dalam suatu grup. Konsep perintah pengualangannya adalah sebagai berikut :

For Each [Item] In [Group]
   [loopBody]

Next [Item]

contoh list programnya adalah sebagai berikut :

      For Each brs As DataGridViewRow In dgJournal.Rows
            GetPosting(brs.Cells(6).Value, brs.Cells(12).Value)
            brs.Cells(14).Value = gCek
            dgJournal.Update()
      Next

brs = item data gridview merupakan variabel
dgjournal = Nama Grid

demikian pembahasan looping dengan perintah FOR EACH LOOP.

Cara menggunakan IF..ELSE..END IF

Kondisional Pernyataan IF..ELSE digunakan untuk memeriksa kondisi yang diberikan dan membuat keputusan berdasarkan kondisi itu sendiri. Biasanya menggunakan Operator Perbandingan dan Operator Logis.
Konsep pernyataannya adalah sebagai berikut :

    If [your condition here]
       Your code here
    Else
       Your code Here
    End If

Jika kondisi bernilai TRUE maka, sistem akan mengambil keputusan diantara IF dan Else. Dan Apabila bernilai FALSE maka, sistem akan mengambil keputusan diantara Else dan End IF.

Bagaimana jika banyak kondisi yang diinginkan ? Jika lebih dari satu kondisi maka bisa digunakan ElseIf.

    If [your condition here]
       Your code here
    ElseIf [your condition here]
       Your code here
    ElseIf [your condition here]
       Your code here
    Else
       Your code Here
    End If 

sebagai contoh misalkan pemberian nilai terhadap siswa dengan aturan atau asumsi sebagai berikut :

1. Jika nilai lebih dari atau sama dengan 80 maka siswa mendapat nilai A.
2. Jika nilai lebih dari atau sama dengan 70 maka siswa mendapat nilai B.
3. Jika nilai lebih dari atau sama dengan 60 maka siswa mendapat nilai C.
4. Jika nilai lebih dari atau sama dengan 50 maka siswa mendapat nilai D.
5. Jika nilai lebih dari atau sama dengan 0 maka siswa mendapat nilai E.

maka penulisan List Program adalah sbb :
 

    1. If Nilai >= 80 Then

    2.     MsgBox("Siswa Mendapat Nilai A")

    3. ElseIf Nilai >= 70 Then

    4.     MsgBox("Siswa Mendapat Nilai B")

    5. ElseIf Nilai >= 60 Then

    6.     MsgBox("Siswa Mendapat Nilai C")

    7. ElseIf Nilai >= 50 Then

    8.     MsgBox("Siswa Mendapat Nilai D")

    9. ElseIf Nilai >= 0 Then 

   10.     MsgBox("Siswa Mendapat Nilai E")

   11. Else

   12.     MsgBox("Tidak Terdefinisi")

   13. End If

 demikian pembahasan pernyataan kondisional IF..ELSE..ENDIF. Semoga bermanfaat