syarat variabel dan konstanta dan conyohnya

Pengertian dan Penjelasan Konstanta dan Variabel di Microsoft Visual Basic 6.0  adalah suatu tempat untuk menampung data yang nilainya selalu berubah. Sedangkan konstanta adalah suatu tempat untuk menampung data yang nilainya selalu tetap dan tidak pernah berubah. 

1.  Aturan Penamaan Konstanta & Variabel 
o  Harus diawali huruf. 
o  Boleh terdiri dari huruf, angka, dan garis bawah. 
o  Maksimal 255 karakter. 
o  Tidak boleh menggunakan reserved word. 

2.  Deklarasi Konstanta & Variabel 
Deklarasi konstanta 
Bentuk umum : 
[Public | Private] Const nama_konstanta [AS tipe_konstanta] = eksplisit 
Contoh : 
Public Const POTONGAN = 0.05 
Const NAMAPERSH = “PT ABC” 
Contoh penggunaan dalam program 

Const HARGA As Currency = 1000 
Dim Biaya As Currency 
Dim Jumlah As Integer 
… ‘proses 
Biaya = HARGA * Jumlah 
… ‘proses 



Deklarasi variabel 
Bentuk umum : 
Dim <nama_variabel> [AS <tipe_variabel>] 

Pendeklarasian varibel ada 2 jenis : 
1)  Deklarasi Eksplisit 
Untuk mendeklarasikan nama variabel beserta tipe datanya pada awal 
procedure (menempatkan alokasi nama variabel didalam memori), contohnya 
sebagai berikut : 
Dim Nama as String 
Dim Alamat as String *3 0 
Dim Gaji as Long 

2)  Deklarasi Implisit  
Untuk mendeklarasikan nama variabel beserta tipe datanya dan langsung 
mengisi nilai variabelnya (menempatkan alokasi nilai variabel langsung 
didalam memori), contohnya sebagai berikut : 
Nama$ = “ Adi ” 
Alamat$ = “ Kelapa Gading ” 
Gaji$ = 1750000 

3.  Ruang Lingkup Konstanta & Variabel 
Ruang lingkup konstanta atau variabel  adalah ruang atau daerah dimana konstanta atau variabel yang dibuat dikenal (dapat dipakai) biasanya juga berhubungan dengan umur (waktu hidup) konstanta atau variabel. Ada variabel yang dikenal diseluruh bagian program, ada yang hanya dikenal di procedure tempat variabel tersebut dibuat. Ruang lingkup paling dalam 


adalah lingkup procedure dengan perintah Dim, Private atau Static maka variabel 
tersebut mempunyai ruang lingkup procedure, contoh : 
 Private Sub CmdTambah_Click() 
           Dim Nama as String 
           Dim Alamat as String * 30 
            Static No as Integer 
          End Sub