Percabangan

Pada beberapa kasus terkadang kita menginginkan komputer melakukan suatu pernyataan tertentu bila suatu kondisi terpenuhi. Dalam Visual BASIC perintah percabangan/pemilihan keputusan dapat dilakukan dengan statemen If...Then dan Select Case.

1. Statemen If...Then
Statemen ini digunakan untuk melakukan aksi setelah melakukan pengujian terhadap suatu kondisi. Pernyataan dalam blok statemen hanya akan dilaksanakan ketika kondisi pengetesan/pengujian bernilai benar. Statement If...Then memiliki beberapa sintaks/cara penulisan sesuai dengan jumlah pernyataan yang akan dieksekusi.

If...Then dengan Kondisi dan Pernyataan Tunggal
If <kondisi> Then <Pernyataan>

Contoh :

• If Nilai >= 60 Then Keterangan = “Lulus” 
•  If...Then dengan Pernyataan Jamak
  If <Kondisi> Then
   <Pernyataan_1>
   <Pernyataan_2>
   .
   .
   <Pernyataan_n>
  End If
  
  Contoh :
  If Nilai >= 60 Then
  Keterangan = “Lulus”
   Ucapan = “Selamat”
  End If
• If...Then dengan 2 kondisi.
  If <Kondisi> Then
   <Pernyataan_Jika_Kondisi_Benar>
  Else
   <Pernyataan_Jika_Kondisi_Salah>
  End If
  Contoh:
  If Nilai >= 60 Then
   Keterangan = “Lulus”
   Ucapan = “Selamat”
  Else
   Keterangan = “Tidak Lulus”
   Ucapan = “Jangan Bersedih”
  End If
  
  
  •   d. If...Then dengan kondisi jamak.
    If <Kondisi_1> Then
     <Pernyataan>
    ElseIf <Kondisi_2> Then
     <Pernyataan>
    ...
    ElseIf <Kondisi_n> Then
     <Pernyataan>
    Else
    <Pernyataan>
    End If
    Contoh:
    If Nilai >= 85 Then
     Keterangan = “Lulus, Sangat Memuaskan”
    ElseIf Nilai >= 70 Then
     Keterangan = “Lulus, Memuaskan”
    ElseIf Nilai >=60 Then
     Keterangan = “Lulus, Cukup Memuaskan”
    Else
    Keterangan = “Tidak Lulus, Silahkan Mengulang”
    end if
  2. Statemen Select Case
     
  Sama halnya seperti statemen If...Then, Select Case juga mengerjakan suatu blok statemen berdasarkan uji nilai ekspresi. Perbedaannya adalah pada tata cara penulisan dan pengelompokan nilai dari variabel/kondisi.
  Sintaks :
   Select Case <Variabel penguji>
    Case <Nilai_1>
     <Pernyataan_1>
    Case <Nilai_2>
     <Pernyataan_2>
                    Case Else
     <Pernyataan_n>
   End Select
  
    Contoh:
   Select Case Nilai
    Case “A”
     Keterangan = “Sangat Memuaskan”
    Case “B”
     Keterangan = “Memuaskan”
    Case “C”
     Keterangan = “Cukup”
    Case Else
     Keterangan = “Kurang”
   End Select
  

Koleksi Sistem Aplikasi

1. Sistem informasi deteksi pemilih kembar pada KPUD
2. Sistem Pengolahan Nilai Pada STTD
3. Sistem Inventori Apotik
3. Absensi dengan barcode
4. Sistem infentaris sleksi kridet di BPR