[VB 6.0] Menentukan Tipe Variabel yang sesuai

Variabel dalam suatu program tentu sangat dibutuhkan,karena fungsi Variabel yang penting,tentu akan merepotkan jika penggunaan Variabel tersebut salah.Definisi dari sebuah Variabel adalah tempat untuk menyimpan data sementara dengan jenis data yang sesuai pada waktu Variabel tersebut di deklarasikan (diperkenalkan) pada program dan dapat berubah-ubah nilainya setiap program dijalankan.
Contoh Variabel adalah:

Private sub Command1_click()
Dim A as long
Dim B as Long
A=10
B=15
Text1.text = A + B
End sub

Arti perintah diatas adalah :
Memperkenalkan Variabel A dengan jenis datanya Long dengan perintah Dim
Memperkenalkan Variabel B dengan jenis datanya Long dengan perintah Dim
Mengatur nilai Variable A menjadi 10
Mengatur nilai Variable B menjadi 15
Menyamakan Nilai pada Text1.text menjadi nilai Variabel A ditambah Variabel B
Jadi nilai pada Text1.text menjadi 25


Variabel terbagi menjadi Public,Private dan Global
Pada Public,Variabel dapat dipanggil atau dijalankan pada semua Form atau module dengan perintah Call atau dengan namanya saja. Misalnya :

Public sub Kosongkan()
Text1.text = ""
Text2.text = ""
end sub

Cara memanggilnya adalah,misalnya :

Private sub cmdBatal_click()
Kosongkan
End sub

Itu bisa dilakukan jika Variabel Public dituliskan bersama atau satu lokasi dengan Fungsi cmdBatal,misalnya kita menulis Variabel Public tsb pada Form,maka kode atau fungsi pada Form bisa memanggil Variabel Public tanpa perintah Call,hanya nama Variabel Public tersebut.

Akan berbeda jika Variabel Public ditulis pada Module.
Misalnya kita mempunyai Module bernama Module1.bas, dan didalam Module tersebut kita buat Variabel Public sebagai berikut :

Public sub Pesan()
msgbox "hallo...ada pesan nich", vbinformation, "Komputer"
end sub

Catatan : untuk setiap Variabel yang dideklarasikan / diperkenalkan,ada baiknya kita mengaturnya dengan perintah Option Explicit pada Bagian Declarations (bagian paling atas kode)
Agar Variabel tsb tidak rancu saat program dijalankan.

Lalu cara memanggilnya jika dari Form adalah:

Private sub Form_Load()
Call Pesan
End sub

Nah cukup jelas kan?..mari beralih ke jenis dan tipe Variabel…

Jika diatas kita membahas Variabel dengan jenis public,sekarang kita membahas Variabel tipe Private.Variabel dengan tipe Private contohnya :

Private S As String

Artinya : mendeklarasikan S sebagai variable berjenis data String

Lalu penggunaannya adalah:

Private sub Form_Load()
S =Yudha tri Putra
Me.caption = S
End sub

Arti perintah diatas adalah: Jika program dijalankan/di-load maka atur caption atau nama form menjadi Yudha Tri Putra.

1.0.1 Jenis-jenis data Variabel.
Penggunaan jenis data yang salah atau tidak sesuai pada Variabel akan menyebabkan program berjalan lama atau penggunaan memory akan terlalu besar.
Cermati data Variabel dibawah ini :

Tipe data Variabel    Memory yang dipakai    Karakter yang dipakai
Integer    2 byte    -32768 s/d 32767
Long    4 byte    -2147483648 s/d 2147483647
Single    4 byte    Negatif : -3.402823E38 s/d -1.401298E-45
Positif : 1.401298E-45 s/d 3.402823E38
Double    8 byte    Negatif : -1.79769313486232E308 s/d -4.94065645841247E324
Positif : 4.94065645841247E324 s/d 1.79769313486232E308
Currency    8 byte    -922337203685447.5808 s/d 922337203685447.5807
String    1 byte    0 s/d 2 milyar karakter (95/97 & NT)
0 s/d 65535 karakter (versi 3.1)
Byte    1 byte    0 s/d 255
Boolean    2 byte    True (benar) atau False (salah)
Date    8 byte    1 januari 100 s/d 31 desember 9999
Object    4 byte    Referensi object
Variant    16 byte + 1 byte per-karakter   

Nah setelah melihat table data diatas kita mengetahui karakter apa saja yang diwakili sebuah variable dan berapa memory yang akan dipakai oleh variable tersebut.
Jika masih bingung, lihatlah contoh dibawah ini:

Contoh yang salah :

Private sub Command1_click()
Dim Nomor As Long
Nomor=1
Text1.text = Nomor
End sub

Mengapa salah?karena pemakaian jenis data Long sangat boros, padahal data pada Variabel Nomor hanya bernilai 1 (satu) dan memakai memory sebesar 4 Byte.

Contoh yang benar:

Private sub Command1_click()
Dim Nomor As Byte
Nomor=1
Text1.text = Nomor
End sub

Mengapa benar?karna penggunaan jenis data Byte lebih hemat dan sesuai dengan nilai Variabel yang bernilai 1 (satu) sehingga penggunaan memory lebih efisien dan ringan. Jenis data Byte memiliki karakter 0 s/d 255 yang kecil berbeda dengan Long yang jangkauan karakternya lebih besar (-2147483648 s/d 2147483647).

Semoga Bermanfaat =))

Artikel ini dibuat oleh Yudha Tri Putra,segala macam bentuk pengcopyan atau menyalin sebagian atau seluruh halaman ini,dapat dikenakan sanksi dan melanggar Hak Cipta Yudha Tri Putra sebagai Blogger