Menyingkat Penulisan Fungsi Select Dengan Cara Menggantinya Dengan Fungsi Array

Niguru.com | Kamis, 25 Nov 2021 | Fungsi Select pada bahasa pemrograman Visual Basic Application (VBA) yang digunakan pada Visual Basic, Microsoft Office maupun berbagai bahasa pemrograman pembaharu Visual Basic lainnya, ideal untuk digunakan dalam mengisikan suatu nilai pada variabel berdasarkan pilihan ganda.

Pada posting kali ini Niguru.com akan memberikan trik sederhana untuk menggantikan penulisan script yang panjang saat penulisan fungsi Select dengan menggunakan fungsi Array.

Niguru.com akan menggunakan aplikasi konversi angka menjadi kata yang penjelasan mengenai cara pembuatannya sudah dibahas pada posting sebelumnya.

Berikut ini tampilan form konversi:

 

Berikut ini contoh script yang menggunakan fungsi Select yang ada di dalamnya:

Select Case angkaKu

Case 0: kataKu = "Nol"

Case 1: kataKu = "Satu"

Case 2: kataKu = "Dua"

Case 3: kataKu = "Tiga"

Case 4: kataKu = "Empat"

Case 5: kataKu = "Lima"

Case 6: kataKu = "Enam"

Case 7: kataKu = "Tujuh"

Case 8: kataKu = "Delapan"

Case 9: kataKu = "Sembilan"

End Select

 

Dapat digantikan dengan Array:

nilai = Array("Nol", "Satu", "Dua", "Tiga", "Empat", "Lima", "Enam", "Tujuh", "Delapan", "Sembilan")

kataKu = nilai(angkaKu)

Meski script sudah berbeda, namun saat dijalankan pada form hasilnya akan sama seperti pada saat menggunakan fungsi Select .. Case:

 

Demikianlah penjelasan mengenai trik untuk menyingkat penulisan fungsi Select dengan cara menggantinya dengan fungsi Array.

Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Lokasi:

Berbagi :