Materi Percabangan Struktur IIF dan Struktur Select-Case

Percabangan (IIF) 

       Bentuk penulisan dari struktur If–Then–Else adalah tegak atau vertikal. Bentuk semacam ini tentu banyak memakan baris atau terulang panjang, apalagi jika bentuknya Nested If.       Untuk mengatasi kekurangan tersebut, dapat menggunakan struktur IIF yaitu struktur If–Then-else yang bentuknya datar atau horisontal. Bentuk penulisan IIF butuh variabel untuk menampung jawabannya. Dari segi kecepatan struktur IIF lebih cepat prosesnya dibandingkan dengan struktur If – Then – Else.

Aturan Penulisannya adalah :

1. Expresi (kondisi)

   Nilai = IIF (Ekspresi1, Nilai benar, Nilai Salah)
2. Lebih dari satu kondisi

   Nilai = IIF (Ekspresi1, Nilai benar, IIF(Ekspresi1,Nilai benar, Nilai salah))

dan seterusnya...

Keterangan :

*kondisi: Berisi perbandingan antara satu variabel/konstanta dengan variabel/konstanta lain dengan menggunakan tanda <, >, =, <> dari suatu keadaan yang akan menghasilkan nilai “Benar” atau “Salah”. 

*Jawaban 1 Jawaban yang diberikan jika kondisi penyeleksian bernilai “Benar”.

*Jawaban 2 Jawaban yang diberikan jika kondisi penyeleksian bernilai “Salah”. 

Contoh :
      Dim jenis as string
      Dim status as string
              jenis = inputbox ("jenis kelamin (p/w)")
              status = iif (jenis = "p", "pria", iif (jenis = "w", "wanita",""))
      print "jenis kelamin : " & status

Hasil program jika diinputkan huruf "p" maka akan tampil
'jenis kelamin : pria'
jika diinputkan huruf "w" maka akan tampil

'jenis kelamin : wanita'

-selainnya kosong-

Percabangan (Select – Case)

        Struktur Select Case digunakan untuk menjalankan satu blok perintah yang jumlahnya banyak atau bertingkat-tingkat. Pada statement ini ada sedikit perbedaan dengan if…then…else, yaitu isi dari variable akan dikeluarkan terlebih dahulu pada tahap awal dan baru nantinya variabel tersebut akan dibandingkan dengan konstan-konstan yang ada sampai program menemukan hasil true, Jika true maka kondisi yang berada dibawah statement case akan dijalankan. Percabangan (Select – Case)

Aturan Penulisannya adalah :
     select case tes_ekspresi
               case ekspresi 1
                       ... blok perintah 1
               case ekspresi 2
                       ... blok perintah 2
               case ekspresi 3
                       ... blok perintah 3
      end select

Keterangan :

    *tes_ekspresi : bisa bernilai numerik maupun string.

    *ekspresi 1 : Nilai pertama proses seleksi dari tes_ekspresi.

    *ekspresi 2 : Nilai pertama proses seleksi dari tes_ekspresi. Penulisan nilai paa ekspresi 1 maupun ekspresi 2 bisa langsung berbentuk konstanta atau melalui operator pembanding 

    *blok perintah 1 : Suatu rangkaian perintah yang dikerjakan bila kondisi ekspresi 1 terpenuhi. 

    *blok perintah 2 : Suatu rangkaian perintah yang dikerjakan bila kondisi ekspresi 2 terpenuhi. 

    *blok perintah 3 : Suatu rangkaian perintah yang dikerjakan bila kondisi ekspresi 3 terpenuhi. 

Contoh :
     Dim bil as Integer
     bil = inputbox ("inpukan suatu bilangan")
     print "bilangan:" & bil
     select case bil
          case 1
                    print "Ketuhanan Yang Maha Esa"
          case 2
                    print "Kemanusiaan yang adil dan beradap"
          case 3
                    print "Persatuan Indonesia"
          case 4
                    print "kerakyatan yang dipimpin oleh hikmat kebijaksanaan dalam permusyawaran perwakilan"
          case else
                   print "Keadilan soaial bagi seluruh rakyat Indonesia"
          end select