Visual Lanjutan Rangkuman Praktikum 2

Struktur IF-THEN

Disebut juga dengan branch sturucture
Merupakan struktur percabangan dimana suatu ekspresi akan dikerjakan jika kondisinya terpenuhi. Tetapi jika kondisi tidak terpenuhi maka ekspresi di dalam struktur if tidak akan dijalankan dan blok if akan dilompati serta program akan melakukan tindakan berikutnya.

BENTUK STRUKTURNYA:
            IF (KONDISI) THEN
                …….EKSPRESI……
            END IF
Kondisi:
Perbandigan antara satu variabel/konstanta dengan variabel/konstanta lain   dengan menggunakan tanda <, >, =, <>, >=, <=.
Ekspresi:
Rangkaian kode program (blok program) yang akan dijalankan jika kondisinya bernilai benar (memenuhi syarat).
Contoh:
Buat suatu program yang akan menyeleksi suatu inputan nilai akhir mahasiswa. Inputan nilai dilakukan lewat inputbox melalui prosedur form_click. Lakukan seleksi pada nilai tersebut yaitu jika nilainya lebih besar atau sama dengan 55  cetak keterangan”lulus”. Tetapi jika tidak  terpenuhi program akan berakhir. Asumsikan inputan nilai antara 0 sampai 100.
Private Sub form_click()
    Dim nilai_akhir As Integer
    nilai_akhir = inputbox("ketik nilai akhir")
    If (nilai_akhir) >= 55 Then
        print("nilai_akhir : " & nilai_akhir)
        print("keterangan : lulus ")
    End If
End Sub



Struktur IF-THEN-ELSE
Disebut juga dengan selection structure
Merupakan struktur percabangan dimana suatu ekspresi akan dikerjakan jika kondisinya terpenuhi. Jika tidak terpenuhi maka ekspresi yang lain akan dikerjakan.
Struktur if then else sbb:
            if (kondisi) then
                        ….ekspresi 1….
            else
                        ….ekspresi 2…..
            end if
Ekspresi 2: rangkaian kode program(blok program) yang akan dijalankan jika kondisinya bernilai salah (tidak memenuhi syarat)
Contoh:
Buat suatu program yang akan menyeleksi suatu inputan nilai akhir mahasiswa. Inputan nilai dilakukan lewat inputbox melalui prosedur form_click. Lakukan seleksi pada nilai tersebut yaitu jika nilainya lebih besar atau sama dengan 55  cetak keterangan”lulus”. Tetapi jika tidak  terpenuhi cetak keterangan “gagal”. Asumsikan inputan nilai antara 0 sampai 100.
Private Sub form_click()
    Dim nilai_akhir As Integer
    nilai_akhir = inputbox("ketik nilai akhir")
    If (nilai_akhir) >= 55 Then
        print("nilai_akhir : " & nilai_akhir)
        print("keterangan : lulus ")
    Else
        print("keterangan : gagal ")
    End If
End Sub

Pada kondisi tertentu di dalam struktur if then else bisa ditempatkan struktur if then atau if then else yang lain. Bentuk semacam ini biasa disebut if tersarang atau nested if.
Bentuk penulisan dari struktur ini adalah sebagai berikut:
If (kondisi 1) then
            if (kondisi 2)  then
                        …ekspresi 1…
            else
                        …ekspresi 2
            end if
Else
            ekspresi 3
End if
Atau
If (kondisi 1) then
            if (kondisi 2)  then
                        …ekspresi 1…
            else
                        …ekspresi 2
            end if
Else
            if (kondisi 3) then
                        …ekspresi 3…
            else
                        …ekspresi 4…
End if
End if

Penulisan di atas dapat juga digabungkan antara else dan if untuk kondisi yang ketiga dan dengan membuang  satu end if, seperti berikut:
If (kondisi 1) then
            if (kondisi 2)  then
                        …ekspresi 1…
            else
                        …ekspresi 2
            end if
Else if (kondisi 3) then
                        …ekspresi 3…
            else
                        …ekspresi 4…
End if

Nested If

Struktur percabangan if bersarang / nested if merupakan struktur if yang paling komplek, karena merupakan perluasan dan kombinasi dari berbagai struktur if lainnya. Konsep dari percabangan ini adalah terdapat Struktur If yang berada didalam Struktur If lainnya. Artinya dalam pernyataan If bersarang jika kondisi If yang paling luar (paling atas) bernilai benar, maka kondisi If yang berada didalamnya baru akan dilihat (di cek).


Bentuk umum dari struktur If bersarang /  struktur if yang berada di dalam struktur if lainnya adalah sebagai berikut:
 if(kondisi1){
     if(kondisi1a){
          Statemen_jika_kondisi1_dan_1a_terpenuhi;
     }
     else if(kondisi1b){
          Statemen_jika_kondisi1_dan_1b_terpenuhi;
     }
     .....
     else{
          Statemen_jika_hanya_kondisi1_yang_terpenuhi;
     }
}
else if(kondisi2){
     if(kondisi2a){
          Statemen_jika_kondisi2_dan_2a_terpenuhi;
     }
     else if(kondisi2b){
          Statemen_jika_kondisi2_dan_2b_terpenuhi;
     }
     .....
     else{
          Statemen_jika_hanya_kondisi2_yang_terpenuhi;
     }
}
else if(kondisi3){
     Statemen_jika_kondisi3_terpenuhi;
}
.....
else{
     Statemen_jika_semua_kondisi_tidak_terpenuhi;
}