Fungsi If dan Case

Pada materi kali ini kita akan membahas mengenai pengambilan keputusan pada VB.Proses pengambilan keputusan merupakan bagian penting dari pemrograman karena dapat memecahkan masalah praktis cerdas dan memberikan output yang berguna atau umpan balik kepada pengguna.

Struktur pengambilan keputusan di dalam bahasa pemograman Visual Basic ada tiga bagian yaitu:

 – If … Then

 – If … Then … Else

 – Select Case

Berikut pembahasannya:

1. Pengambilan Keputusan Antara 2 (Dua) Pilihan

IF…THEN

Merupakan perintah kondisi yang dilakukan apabila suatu kondisi tersebut bernilai benar atau memenuhi kondisi yang ada

Bentuk Umum :

If [kondisi] then [pernyataan]

Atau

If  [kondisi] then

[Pernyataan]

[Pernyataan]

End if

Artinya: Bila [kondisi] bernilai True maka [pernyataan] akan dikerjakan

A.Pengambilan Keputusan Antara 2 (Dua) Pilihan
IF…THEN
Merupakan perintah kondisi yang dilakukan apabila suatu kondisi tersebut bernilai benar atau memenuhi kondisi yang ada
Bentuk Umum :
If [kondisi] then [pernyataan]
Atau
If  [kondisi] then
[Pernyataan]
[Pernyataan]
End if
Artinya: Bila [kondisi] bernilai True maka [pernyataan] akan dikerjakan
B.Pengambilan Keputusan Dari Banyak Pilihan (Lebih dari 2 Pilihan)
IF…THEN…ELSE
Merupakan perintah kondisi yang dilakukan apabila suatu kondisi tersebut bernilai benar atau memenuhi kondisi yang ada. Jika kondisi tersebut bernilai salah atau tidak memenuhi kondisi yang ada, maka akan melakukan perintah pengecualiannya atau perintah setelah ELSE
Bentuk Umum :
If  [kondisi] then
[Pernyataan1]
Else
[Pernyataan2]
End if
Artinya: Bila [kondisi] bernilai True maka [pernyataan1] akan dikerjakan, tetapi bila[kondisi] bernilai False maka [pernyataan 2] yang akan dikerjakan.
Ekspresi Logika adalah suatu kondisi yang akan diuji. Untuk menetapkan nilai yang akan diuji pada suatu kondisi harus menggunakan Operator Relasi, yaitu :
                <             :               lebih kecil
                <=           :               lebih kecil atau sama dengan
                =             :               sama dengan
                <>           :               tidak sama dengan
                >             :               lebih besar
                >=           :               lebih besar atau sama dengan
C.Select Case  Statement
Pada dasarnya select case sama saja sepeti percabangan kondisi IF THEN ataupun IF THEN ELSE , akan tetapi select case digunakan ketika kita mempunyai suatau percabangan yang banyak. Select Case juga lebih sangat mudah dan tidak ribet dibandingkan oleh IF THEN ELSE.

Syntax nya :

Select Case <kondisi>

Case <Pilihan1>

… <pernyataan1>

Case <pilihan2>

… <pernyataan2>

Case <Pilihan3>

… <pernyataan3>

Case <pilihan4>

… <pernyataan4>

Case Else

… <pernyataan-n>

End Select

Operator Logika
Pengambilan suatu keputusan tidak hanya dapat dilakukan untuk satu kondisi pengujian, tetapi dapat dilakukan juga untuk beberapa kondisi pengujian. Untuk melakukan proses pengambilan keputusan dari 2 atau lebih kondisi diperlukan operator yang dapat menghubungkan kondisi-kondisi yang akan diuji tersebut. Adapun Operator yang digunakan adalah:
And adalah operasi yang melakukan pengecekan atas 2 kondisi atau variabel yang ada. Jika kedua kondisi bernilai true, maka hasil operasi AND adalah true,  selain itu false.
Or adalah operasi yang melakukan pengecekan atas 2 kondisi atau variabel yang ada. Jika salah satu kondisi bernilai true, maka hasil operasi OR adalah true,  selain itu false.
Not adalah operasi yang melakukan pengecekan atas 1 kondisi atau variabel yang ada. Jika kondisi bernilai true, maka hasil operasi NOT adalah false, dan sebaliknya.
Untuk contoh penggunaan fungsi if then,if then else,dan select case,berikut langkah langkahnya:

PROGRAM TENTANG FUNGSI IF THEN dan IF THEN ELSE

1.Program Pertama

• Desain program berikut (atur name pada properties textbox1 “TxtNilai”,  dan name textbox2 “TxtHasil”)

• alur program

nilai diinputkan ,klik proses maka tampil keterangan lulus atau gagal pada hasil.Dengan syarat nilai 75 keatas maka “LULUS”,nilai dibawah 75 maka “GAGAL”.

• Kode program

Private Sub BtnProses_Click(ByVal sender As System.Object,…
          If TxtNilai.Text >= 75
        TxtHasil.Text = “LULUS”
      Else
        TxtHasil.Text = “GAGAL”
      End If

• hasil 

2.Program Kedua
pada contoh kedua desain program sama dengan program pertama,perbedaannya ada pada alur programnya yaitu jika nilai yang diinputkan 85 keatas maka “LULUS”,75-84 hasilnya “DAFTAR PENGGANTI”,dan jika nilai dibawah 75 hasilnya “GAGAL”.Oleh karena itu ,anda hanya perlu mengganti kode programnya.Ketikkan kode program dibawah
Private Sub Btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnproses.Click
If TxtN.Text >= 85 Then
TxtH.Text = “LULUS”
ElseIf TxtN.Text >= 75 Then
TxtH.Text = “DAFTAR PENGGANTI”
Else
TxtH.Text = “GAGAL”
End If
tampilan program ketika dijalankan

3.Contoh program ketiga
desain program

pengaturan properties

alur program
ketika salah satu kode pada combobox diklik maka akan muncul nama barang  dan harga barang
kode program

hasil program


4.contoh program keempat
desain awal
pengaturan properties
pengaturan properties sama dengan program yang sebelumnya, hanya saja kode barang dan nama barang saya buat lebih banyak.Button proses ubah namenya menjadi btnproses,bersih namenya btnbersih,textbox 3 namenya txtjlh,dan textbox4 namenya txtth.
kode program (karena script kodenya cukup panjang,jadi saya melampirkan screeshotnya).

hasil program

PROGRAM TENTANG SELECT CASE

CONTOH 1
Desain awal program

atur properties sesuai tabel dibawah

Jumlah Point Reward diinputkan. Klik Proses, maka akan tampil keterangan Hadiah sesuai point reward. Tabel Hadiah sebagai berikut:
tampilan kode program
hasil

CONTOH 2
Desain awal dan properties sama seperti contoh 1,kita hanya perlu mengganti case is menjadi case to.

tampilan hasil program

CONTOH 3
Desain awal

pengaturan properties

Alur Program sebagai berikut:
–    Input Nilai Potensi Akademik dan Nilai Psikotes
–    Klik Proses, maka akan tampil Keterangan LULUS atau GAGAL pada hasil.
     Pengujiannya sebagai berikut:
     Jika Nilai Potensi Akademik 85 keatas DAN Nilai Psikotes 75 keatas maka hasil: “LULUS” selain itu hasil: “GAGAL”
kode program

tampilan hasil

CONTOH 4(Latihan)
Desain awal sama seperti program keempat fungsi if then else,hanya saja fungsi if then else diganti menjadi select case. Ganti kode programnya seperti gambar dibawah

Tampilan program ketika dijalankan



Demikian pembahasan mengenai if then case 



LATIHAN 

1.MEMBUAT PROGRAM MENGGUNAKAN FUNGSI IF