Langsung ke konten utama

Percabangan (Struktur If-Then sd Nested IF)

- PERCABANGAN (If – Then) merupakan struktur percabangan dimana suatu ekspresi akan dikerjakan bila kondisinya terpenuhi. Tetapi jika kondisinya tidak terpenuhi maka
ekspresi di dalam struktur if tidak akan dijalankan dan blok If akan dilompati serta
program akan melakukan tindakan berikutnya.
Berikut Strukturnya :
If (kondisi) Then
… Ekspresi …
End If
• Kondisi : Berisi perbandingan antara satu variabel/konstanta dengan variabel/konstanta lain dengan menggunakan tanda <, >, =, <> dari suatu keadaan yang akan menghasilkan nilai “Benar” atau “Salah”.
• Ekspresi : Rangkaian kode program (blok program) yang akan dijalankan jika kondisinya memenuhi syarat “Benar”.

- PERCABANGAN (If – Then – Else) merupakan struktur percabangan di mana suatu ekspresi akan
dikerjakan bila kondisinya terpenuhi. Tetapi jika kondisinya tidak terpenuhi maka ekspresi yang lainnya yang dikerjakan.
Berikut Strukturnya :
If (kondisi) Then
… Ekspresi 1 …
Else
… Ekspresi 2 …
End If
• Kondisi : Berisi perbandingan antara satu variabel/konstanta dengan variabel/konstanta lain dengan menggunakan tanda <, >, =, <> dari suatu keadaan yang akan menghasilkan nilai “Benar” atau “Salah”.
• Ekspresi 1 Rangkaian kode program (blok program) yang akan dijalankan jika kondisinya bernilai “Benar” (memenuhi syarat).
• Ekspresi 2 Rangkaian kode program (blok program) yang akan dijalankan jika kondisinya bernilai “Salah” (tidak memenuhi syarat).

- PERCABANGAN (Nested If). Pada kondisi tertentu di dalam struktur If –ThenElse bisa ditempatkan struktur If–Then atau If– Then–Else yang lain.
Bentuk Strukturnya :
If (kondisi 1) Then
If (kondisi 2) Then
… Ekspresi 1 …
  Else
… Ekspresi 2 …
End If
End If
Penulisan struktur Nested If dapat digabungkan antara Else dengan If untuk kondisi 3 dan dengan membuang End If, seperti berikut ini:
• - kondisi 1 : Berisi perbandingan antara satu variabel/konstanta dengan variabel/konstanta lain dengan menggunakan tanda <, >, =, <> dari suatu keadaan yang akan menghasilkan nilai “Benar” atau “Salah”.
• - kondisi 2 : Kondisi 2 ini akan dikerjakan bila nilai kondisi 1 adalah “Benar” (terpenuhi).
• - kondisi 3 : Kondisi 3 ini akan dikerjakan bila nilai kondisi 1 adalah “Salah” (tidak terpenuhi).
• - Ekspresi 1 : Rangkaian kode program (blok program) yang akan dijalankan jika kondisi 1 dan kondisi 2 bernilai “Benar” (memenuhi syarat).
• - Ekspresi 2 : Rangkaian kode program (blok program) yang akan dijalankan jika kondisi 1 bernilai “Benar” (memenuhi syarat) dan kondisi 2 bernilai “Salah” (tidak memenuhi syarat).
• - Ekspresi 3 : Rangkaian kode program (blok program) yang akan dijalankan jika kondisi 1 bernilai “Salah” (tidak memenuhi syarat) dan kondisi 3 bernilai “Benar” (memenuhi syarat).
• - Ekspresi 4 : Rangkaian kode program (blok program) yang akan dijalankan jika kondisi 1 bernilai “Salah” (tidak memenuhi syarat) dan kondisi 3 bernilai “Salah” (tidak memenuhi syarat).

Komentar

Postingan populer dari blog ini

Latihan dan Kasus Array Multidimensi pada VB.NET

Latihan 1 Array Multidimensi Berikut Source Codenya : Public Class latihan4     'nadiahtami 2017230007'     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         Dim arr(4) As String         arr(0) = TextBox1.Text         arr(1) = TextBox2.Text         arr(2) = ComboBox1.Text         arr(3) = ComboBox2.Text         Dim list As New ListViewItem         list = ListView1.Items.Add(arr(0))         list.SubItems.Add(arr(1))         list.SubItems.Add(arr(2))         list.SubItems.Add(arr(3))         TextBox1.Text = TextBox1.Text + 1         TextBox2.Text = ""         ComboBox1.Text = ""         C...

Latihan Menggunakan Procedure dan Function pada VB.Net

Latihan 1 Menggunakan Procedure Berikut Source Codenya : Public Class proc1     'nadiahtami 2017230007     Private Sub gantitext(ByVal teksbaru As String)         TextBox1.Text = teksbaru     End Sub     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         'btn pilih         gantitext("unsada")     End Sub     Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click         'btn keluar         Dim pesan As String         pesan = MsgBox("Yakin ingin keluar?", vbYesNo, "Konfirmasi")         If pesan = vbYes Then             End         End If     End Sub End Class Latihan 2 ...