Trik Untuk Mempersingkat Instruksi IF .. THEN .. ELSE

Niguru.com | Kamis, 23 Jan 2020 | Pada posting kemarin Niguru.com sudah menjelaskan mengenai cara untuk menambah sebuah field baru pada Query dengan menambahkan sebuah field yang dibentuk dengan bantuan function yang menggunakan instruksi If .. Then .. Else.

Pada posting kali ini Niguru.com akan menjelaskan mengenai trik untuk menyingkat penulisan script If .. Then .. Else menjadi If .. Then saja, tanpa memerlukan “Else” namun tetap mempunyai fungsi yang sama.

Sebagai contoh, Niguru.com menggunakan module yang sudah dibuat dan penjelasannya sudah dimuat pada posting sehari sebelumnya.

Ikuti langkah berikut ini:
Buka module (lihat pada posting sehari sebelumnya) > double click pada Module1:

Ganti:

If Nilai > SyaratLulus Then
Hasil = "Lulus"
Else
Hasil = "Gagal"
End If

Dengan:

Hasil = "Gagal"
If Nilai > SyaratLulus Then Hasil = "Lulus"

Note:
Dengan cara ini variabel “Hasil” sudah diisi nilai awal, dan Hasil hanya akan diubah nilainya bila syarat yang disebutkan pada instruksi IF sudah terpenuhi.

Tidak perlu ada perubahan apapun pada Query, hanya module saja yang dirubah.

Dengan menggunakan instruksi yang lebih singkat, hasil yang didapat tetap sama persis, bisa dilihat pada saat Query dibuka /dijalankan:

Demikianlah penjelasan mengenai trik untuk menyingkat penulisan instruksi If .. Then .. Else.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)