Penggunaan Module (Modul) Dan Function Di Visual Basic 6.0
Dalam posting kali ini saya akan membahas wacana satu diantara beberapa aplikasi bahasa pemrograman yang cukup terkenal hingga hari ini, dialah Visual Basic atau yang sering disingkat VB (vibi). Ditengah gencarnya pengembangan banyak sekali perangkat lunak masa kini, baik dari segi kompleksitas maupun dari segi interface yang menghasilkan banyak perangkat lunak ternama yang namanya sering muncul di banyak sekali jurnal, forum, seminar, bahkan media cetak dan media sosial. Namun disamping itu masih banyak pengguna perangkat lunak yang lebih menentukan untuk memakai versi usang dari perangkat lunak yang digunakan, selain lantaran ukuran yang tidak terlalu berat juga lantaran fasilitas penggunaannya. Hal itu yang terjadi pada aplikasi Visual Basic 6.0 ini, meskipun telah dirilis Visual Basic 10 namun pengguna versi 6.0 masih saja banyak yang berlalu lalang dalam diskusi lembaga terkait.
Hal tersebut juga dipengaruhi lantaran pada awal penggunaannya VB telah memperlihatkan banyak sekali fitur yang gampang dipakai sehingga menciptakan pengguna yang masih awam pribadi tertarik mencoba lebih jauh. Begitu pula yang saya alami sehingga satu demi satu pertanyaan muncul dan satu demi satu pertanyaan pula yang berhasil terjawab, meskipun ada beberapa yang tidak. Nah, untuk teman-teman yang juga mencari balasan dari pertanyaan wacana VB, saya akan mencoba membantu sesuai dengan sejauh mana yang saya ketahui. Disini yang akan saya jelaskan yakni bagaimana memakai Module serta apa manfaat atau kegunaan menggunakannya pada Visual Basic 6.0 (seterusnya kita sebut VB6.0).
Module atau yang dalam bahasa Indonesia disebut modul merupakan satu diantara beberapa elemen pelengkap yang sanggup disertakan dalam sebuah project. Berbeda dengan form, apabila digunakan, modul sama sekali tidak menampilkan apa-apa secara pribadi terhadap project ketika dijalankan. Penggunaan modul biasanya untuk menyimpan arahan tertentu yang diakses ke beberapa form, jadi contohnya sobat mempunyai (anggaplah) 5 form dimana semuanya terdapat beberapa tool yang kegunaannya sama, anggaplah tombol untuk menghitung hasil operasi beberapa bilangan, jadi sobat sanggup memakai fungsi tertentu untuk melaksanakan perintah yang di inginkan dimana kodenya tidak ditulis pada kelima form tersebut, melainkan di simpan di module. Kemudian arahan yang disimpan di dalam modul merupakan arahan yang berbentuk sebuah function alias fungsi (pemetaan).
Apabila sobat belum memahami klarifikasi diatas, sobat mungkin sanggup mengikuti pola berikut ini yang akan saya jelaskan. Misalnya saja kita akan menciptakan aktivitas sederhana, menghitung operasi bilangan, jadi kita akan menciptakan aktivitas yang sanggup menghitung hasil perkalian, pembagian, penjumlahan dan pengurangan, kita memakai pola yang sederhana saja semoga sobat gampang memahaminya, alasannya yakni bila dikembangkan, penggunaan function sanggup sangat luas. Baiklah kita mulai saja, pertama-tama silakan buka VB6.0 pada platform sobat kemudian buatlah sebuah project Standard EXE.
Setelah itu buatlah form dengan tampilan menyerupai gambar berikut ini.
Makara nantinya, ketika dijalankan, akan di masukkan nilai dua buah bilangan pada
text1 dan text2, kemudian sehabis menekan tombol Hitung, hasil penjumlahannya akan muncul di text3, hasil pengurangannya muncul di text4, hasil perkaliannya muncul di text5 dan hasil pembagiannya muncul di text6 dimana keempat textbox tersebut berada dalam frame1. Kemudian selanjutnya tambahkanlah sebuah module.
Kemudian sehabis jendela penulisan arahan untuk modul telah muncul, buatlah sebuah public function untuk mendeklarasikan fungsi perhitungan yang akan kita buat. Kode yang dipakai yakni sebagai berikut.
Public Function Perhitungan(Bil1 As Double, Bil2 As Double, Operasi As String) As Double If Operasi = "+" Then Perhitungan = Bil1 + Bil2 ElseIf Operasi = "-" Then Perhitungan = Bil1 - Bil2 ElseIf Operasi = "*" Or Operasi = "x" Then Perhitungan = Bil1 * Bil2 ElseIf Operasi = "/" Or Operasi = ":" Then Perhitungan = Bil1 / Bil2 Else MsgBox "Operasi tidak dikenali", vbCritical, "Kesalahan" End If End FunctionKode public function merupakan perintah untuk mendeklarasikan fungsi, pada pola diatas kita menciptakan fungsi dengan bentuk
Perhitungan(Bil1, Bil2, Operasi), dimana jenis fungsinya yakni double (bilangan riil), begitu pula dengan Bil1 dan Bil2 merupakan elemen bilangan riil, sedangkan Operasi didefinisikan sebagai string artinya nilainya bukan merupakan bilangan (non-numerik). Kemudian arahan if di bawahnya sanggup sobat pahami sendiri. Selanjutnya kita akan menciptakan jadinya pada form yang telah dibentuk tadi, tambahkan arahan berikut pada form tersebut.Private Sub Command1_Click() Text3.Text = Perhitungan(Val(Text1.Text), Val(Text2.Text), "+") Text4.Text = Perhitungan(Val(Text1.Text), Val(Text2.Text), "-") Text5.Text = Perhitungan(Val(Text1.Text), Val(Text2.Text), "*") Text6.Text = Perhitungan(Val(Text1.Text), Val(Text2.Text), "/") End SubKemudian perhatikan arahan diatas, pada arahan baris kedua terdapat
Perhitungan(Val(Text1.Text), Val(Text2.Text), "+"), artinya operasi dilakukan sesuai dengan fungsi yang telah dibentuk di awal tadi. Dalam hal ini, sobat sanggup menciptakan banyak sekali fungsi yang sebelumnya belum ada di VB6.0, contohnya sobat menciptakan fungsi untuk mencari nilai faktorial dengan fungsi Fakt(n) dimana n bilangan bundar tak negatif. Atau fungsi untuk menghitung nilai kombinasi a dari b Comb(a,b) serta nilai permutasi a dari b Perm(a,b). Itulah mengapa saya katakan di awal bahwa pembuatan public function di VB6.0 sangat luas pengembangannya lantaran fungsi sanggup dibentuk sesuai dengan harapan penggunanya.Mungkin cukup sekian dari saya, semoga sanggup bermanfaat, jikalau ada yang ingin sobat tanyakan silakan sampaikan pada kotak komentar yang ada dibawah atau sanggup juga melalui halaman contact blog ini. Terima kasih.
 Dan Function Di Visual Basic 6.0){kind=link}