VB6: Variable & Constant

Variable
Variable digunakan untuk meyimpan nilai. Nilai dari sebuah variable bisa beragam dan berubah selama aplikasi berjalan (running).

Constant
Constant adalah nilai tetap yang tidak akan berubah selama aplikasi berjalan. Nilai diatur dalam kode dan dapat ditentukan sendiri.

Deklarasi
Tergantung dimana variable tersebut dideklarasikan, ada banyak cara untuk mendeklarasikan variable di Visual Basic. Saat mendeklarasikan variable, space memori untuk variable tersebut sudah disediakan. Inilah yang disebut alokasi memori.

Variable dapat dideklarasikan dengan menggunakan “Dim”

Syntax:
  Dim [variable] As [Type]
       
Contoh :
Private Sub cmdSum_Click()
    Dim m As Integer
    Dim n As Integer
    Dim sum As Integer

    m = 10     'm adalah variable, 10 adalah constant
    n = 30
    sum = m + n

    Print "The sum is " & sum

End Sub

Output : The sum is 40

Kita dapat mendeklarasikan variable pada satu baris dengan menggunakan pemisah koma ( , ) dan member nilai beberapa variable pada satu baris dengan pemisah titik dua ( : ).
Private Sub cmdSum_Click()
    Dim m As Integer, n as Integer, sum as Integer
    m = 10 : n = 30 
    sum = m + n

    Print "The sum is " & sum

End Sub

Output : The sum is 40

Deklarasi Implicit: Tipe Data Variant
Jika mendeklarasikan variable tanpa menspesifikasi tipe data nya maka disebut variant variable.

Contoh cara mendeklarasikannya:
Dim num
atau
Dim num As Variant

Sebenarnya kita dapat menggunakan variable tanpa mendeklarasikannya dan dengan otomatis tipe data akan menjadi variant yang dapat menyimpan tipe data numeric, date/time atau string. Cara seperti ini disebut deklarasi implicit. Tapi deklarasi seperti ini sangat tidak disarankan, sebaiknya mendeklarasikan variable nya secara explicit. Karena deklarasi implicit bisa menghasilkan error yang tidak terdeteksi saat run time.

Menggunakan Pernyataan Option Explicit
Dengan menambahkan baris code: Option Explicit diawal code form, module, atau class maka kita akan mendapatkan pesan error saat ada variable yang belum dideklarasikan.

Membuat Constant
Kita bisa membuat constant sendiri untuk digunakan pada aplikasi. Nilai constant tidak akan berubah selama aplikasi berjalan.
Contoh :
Private Sub cmdCalculate_Click()
    Const pi = 3.1415926   'or Const pi As Double = 3.1415926
    Dim area As Double, r As Double
    r = 2
    area = pi * r * r
    Print area
End Sub
Output : 12.5663704

Scope (Ruang Lingkup) Variable
Scope Variable menentukan bagian code mana yang dapat mengakses variable tersebut.


Procedure Level / Local Variable 
Contoh:
Baris code dibawah ini merupakan contoh dari procedure.
Private Sub Command1_Click()
    Dim num As Integer
    num = 45
    Print num
End Sub

'Command1_Click()' adalah sebuah nama procedure. Disini variable 'num' adalah variable dengan ruang lingkup procedure. Nilai variable akan hilang saat procedure berakhir.

Ada 2 tipe variable local yaitu dynamic local variable dan static local variable.
Dynamic local variable: dideklarasikan di dalam procedure dengan menggunakan “dim”.  Local variable hanya terdapat pada procedure dimana dia dideklarasikan. Bagian lain akan mengabaikan keberadaan variable ini. Saat prosedur berhasil nilai variable pun akan hilang.
Contoh:
Private Sub Command1_Click()
   Dim i As Integer
   i = i + 1
   MsgBox i
End Sub

Static local variable: dideklarasikan di dalam procedure dengan menggunakan “Static”.  Local variable hanya terdapat pada procedure dimana dia dideklarasikan. Bagian lain akan mengabaikan keberadaan variable ini. Saat prosedur berhasil nilai variable  akan tetap tersimpan.
Contoh:
Private Sub Command1_Click()
   Static i As Integer
   i = i + 1
   MsgBox i
End Sub

Module level variable
Secara default, sebuah module variable dapat diakses semua procedure dalam module tersebut tapi tidak bias diakses dari modul lainnya. Module variable dideklarasikan dibagian deklarasi yaitu bagian paling atas dari module. Tidak ada perbedaan antara Dim dan Private dalam level modul.

Contoh:                      
'Di bagian deklarasi
Private s As String
                    
Public Variable / Global variable
Untuk membuat variable yang dapat diakses dari semua modul di aplikasi, declare dengan menggunakan Public keyword pada bagian deklarasi modul.  Kita tidak dapat mendeklarasikan Public Variable pada sub procedure.

Contoh:
'Form1
'Pada form di bagian deklarasi
Public n As Integer  

'Form2
'Untuk mengakses dari form lain
msgbox Form1.n

'Untuk mengakses variable global dari yang 
'di deklarasikan di module file .BAS
msgbox Module1.n

Click here if you like this article.