Macam Macam Fungsi If Visual Basic

Fungsi IF merupakan perintah dari percabangan menurut kriteria suatu variabel atau nilai di dalam pemrograman Visual Basic, menurut penggunaanya fungsi IF mempunyai beberapa format diantaranya :

1. Jika kriteria terpenuhi maka dilakukan proses / tindakan yang hanya satu baris perintah saja
If (Kriteria) Then (Tindakan Jika Kriteria Terpenuhi)

Kriteria :
Jika pembelian melebihi 200.000 maka pembeli di beri gelas
maka scriptnya :
If beli > 200000 then hadiah = Gelas

2. Jika kriteria terpenuhi maka akan dilakukan lebih dari satu tindakan
If (Kriteria) Then
(Tindakan 1)
(Tindakan 2)
End If

Kriteria :
Jika Pembelian melebihi 250.000 maka pembeli di berikan diskon 10% dan diberi Gelas
maka scriptnya :
If beli > 250000 then
bayar = 250000 - (250000*10%) 'Tindakan Pertama
hadiah = gelas 'Tindakan kedua
End If

3. Jika kriteria terpenuhi maka dilakukan tindakan A, dan bila tidak terpenuhi maka dilakukan tindakan B, (2 kemungkinan) tapi hanya satu perintah saja.
If (kriteria) Then (Tindakan A) Else <Tindakan B)

Kriteria :
Jika Nilai Siswa Lebih dari 6 maka status siswa tersebut Lulus, bila tidak maka Tidak Lulus
If Nilai > 6 then status = Lulus else status = Tidak Lulus

4. Jika kriteria terpenuhi maka dilakukan tindakan A, dan bila tidak terpenuhi maka dilakukan tindakan B, (2 kemungkinan) dan jumlah tindakan lebih dari satu
If (kriteria) Then
(Tindakan 1)
(Tindakan 2)
Else
(Tindakan 3)
(Tindakan 4)
End If

Kriteria :
Jika Nilai Siswa Lebih dari 6 maka status siswa tersebut Lulus dan nilai abjad ialah B, bila tidak maka Tidak Lulus dan Nilai abjad ialah E
If nilai > 6 Then
status = Lulus
nilaihuruf = B
Else
status = Tidak Lulus
nilaihuruf = E
End If

5. IF Bercabang dengan satu tindakan
If (kriteria 1) then
(Tindakan 1)
Else 
  If (kriteria 2)
  (Tindakan 2)
  Else 
    If (kriteria 3)
    (Tindakan 3)
    Else
      If (kriteria n)
      (Tindakan n)
      End If
    End If
  End If
End If

Kriteria :
Jika nilai kurang dari 30 maka nilai abjad = C,
bila nilai kurang dari 60 maka nilai abjad = B
bila nilai kurang dari 90 maka nilai abjad = A
bila nilai kurang dari 100 maka nilai abjad = A+

if nilai < 31 then
nilaihuruf = C
else
  if nilai < 61 then
  nilaihuruf = B
  else
    if nilai < 91 then
    nilaihuruf = A
    else 
      if nilai < 101 then
      nilaihuruf = A+
      End If
    End If
  End If
Ed If

6. IF Bercabang dengan lebih dari 1 tindakan
If (kriteria 1) then
(Tindakan 1)
(Tindakan 2)
Else 
  If (kriteria 2)
  (Tindakan 3)
  (Tindakan 4)
  Else
    If (kriteria n)
    (Tindakan n)
    End If
  End If
End If

Kriteria :
Sebuah Perusahaan akan memperlihatkan bonus kepada karyawan yang jam kerjanya melebihi 40 jam (Lembur), setiap kelebihanya di kalikan 25.000, dan bagi karyawan yang selalu tiba sempurna waktu akan di berikan 15% dari honor pokok.
if jamkerja > 40 then
kelebihanjam = totaljam - 40
bonusjam = kelebihanjam * 25000
else
  if telat = 0 then
  bonustepat = gajipokok * 15%
  totalgaji = gajipopk + bonustepat + bonusjam
  End If
End If
Catatan :
Dalam Penggunaan  fungsi if pastikan diakhiri script "End If" sebanayak fungsi if yang di gunakan

Saya rasa cukup hingga disini pembahasaanya mengenai fungsi if di visual basic, untuk pola programnya akan saya jelaskan di tutorial berikutnya, jadi kunjungi terus routerosmikrotik

Sekian dan terimakasih

Comments