Statement Control IF Part 3 ( Nested IF )


Setelah pada postingan sebelumnya kita sudah membahas tentang IF Majemuk, pada kali ini kita akan belajar yang yang lebih rumit lagi yaitu Nested IF, langsung saja mari kita bahas.
NESTED IF,dimana terdapat kondisi di dalam kondisi…jika di implementasikan struktur NESTED IF sbb:





IF kodisi1 then
pernyataan 1
IF kondisi 1 then
pernyataan 1
else
pernyataan 2
END IF
else
pernyataan 2
IF kondisi 1 then
pernyataan 1
else
pernyataan 2
END IF
END IF
setelah kita mengetahui listingnya mari kita coba mempraktekannya, contoh kasus sistem penggajian :

  1. Pertama kita form seperti berikut

  2. Lalu kita view code lalu masukan script berikut
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    If TextBox1.Text = 24 Then

    If TextBox2.Text = "kasir" Then


    MsgBox("gajinya adalah 500.000")


    ElseIf TextBox2.Text = "spg" Then


    MsgBox("gajinya adalah 400.000")


    Else


    MsgBox("jabatan tidak tersedia")


    End If

    ElseIf TextBox1.Text = 34 Then

    If TextBox2.Text = "kasir" Then


    MsgBox("gajinya adalah 1000.000")


    ElseIf TextBox2.Text = "spg" Then


    MsgBox("gajinya adalah 600.000")


    Else


    MsgBox("jabatan tidak tersedia")


    End If

    Else

    MsgBox("data salah")

    End If
    End Sub
  3. Lalu coba kita run, lalu hasilnya akan seperti ini :

Nah sekian pembahasan tentang nested IF dan artinya akhirnya kita selesai membahas tentang statement control if, silahkan anda kembangkan sendiri pada pembahasan selanjutnya kita akan membahas statement control case, jika ada yang ingin mendownload source code pada pembahasan ini silahkan download disini.
Previous
Next Post »