Mengenal Data dan Variabel
Ketika
seorang user (pengguna) menggunakan sebuah program komputer, seringkali
computer memintanya untuk memberikan informasi. Informasi ini kemudian disimpan
atau diolah oleh komputer. Informasi inilah yang disebut dengan DATA.
Visual Basic 6 mengenal beberapa
type data, antara lain :
ü
String
adalah type data
untuk teks (huruf, angka dan tanda baca).
ü
Integer
adalah type data
untuk angka bulat.
ü
Single
adalah type data
untuk angka pecahan.
ü
Currency
adalah type data
untuk angka mata uang.
ü
Date
adalah type data
untuk tanggal dan jam.
ü
Boolean
adalah type data
yang bernilai TRUE atau FALSE.
Data yang disimpan di dalam
memory komputer membutuhkan sebuah wadah. Wadah inilah yang disebut dengan VARIABEL.
Setiap variabel untuk menyimpan data dengan type tertentu membutuhkan alokasi
jumlah memory (byte) yang berbeda. Variabel dibuat melalui penulisan
deklarasi variabel di dalam kode program :
Dim <nama_variabel> As
<type_data>
Contoh : Dim nama_user As String
Aturan di dalam penamaan variabel
:
ü
Harus
diawali dengan huruf.
ü
Tidak
boleh menggunakan spasi. Spasi bisa diganti dengan karakter underscore (_).
ü
Tidak
boleh menggunakan karakter-karakter khusus (seperti : +, -, *, /, <, >,
dll).
ü
Tidak
boleh menggunakan kata-kata kunci yang sudah dikenal oleh Visual Basic 6
(seperti : dim, as, string, integer, dll)
Sebuah variabel hanya dapat
menyimpan satu nilai data sesuai dengan type datanya. Cara mengisi nilai data
ke dalam sebuah variabel :
<nama_variabel> =
<nilai_data>
Contoh : nama_user = “Chayriza”
Untuk type data tertentu
nilai_data harus diapit tanda pembatas. Type data string dibatasi tanda
petikganda: “nilai_data”. Type data date dibatasi tanda pagar : #nilai_data#.
Type data lainnya tidak perlu tanda pembatas.
Sebuah variabel mempunyai
ruang-lingkup (scope) dan waktu-hidup (lifetime) :
ü
Variabel
global adalah
variabel yang dapat dikenali oleh seluruh bagian program. Nilai data yang tersimpan
didalamnya akan hidup terus selama program berjalan.
ü
Variabel
lokal adalah
variabel yang hanya dikenali oleh satu bagian program saja. Nilai data yang tersimpan
didalamnya hanya hidup selama bagian program tersebut dijalankan.
Variabel yang nilai datanya
bersifat tetap dan tidak bisa diubah disebut KONSTANTA. Penulisan
deklarasi konstanta di dalam kode
program :
Const
<nama_kontanta> As <type_data> = <nilai_data>
Contoh : Const tgl_gajian As Date = #25/09/2003#
Contoh Program : Variabel Test
ü
Aktifkan
VB 6 melalui tombol Start.
ü
Buka
kembali project Latihan.vbp.
ü
Tambahkan
Form baru ke dalam Project.
ü
Pada
Jendela Form buatlah UI seperti ini :
ü
(Gunakan
komponen CommandButton dan Label)
Pengaturan
property setiap object-nya adalah sebagai berikut :
Opject
|
Properties
|
Value
|
Form
3
|
Caption
StartUpPosition
|
Variabel Test
2 – CenterScreen
|
Vommond
1-3
|
Caption
|
Test 1
Test 2
Test 3
|
Label
1-3
|
BackColor
Caption
|
Palette : <putih>
<kosong>
|
Buka Jendela Code dan pada bagian Code Editor
ketikkan kode programnya sebagai berikut :
Dim test2 As Integer
Private Sub Command1_Click()
Dim test1 As String
test1 = "nusantara"
Label1.Caption = test1
Label2.Caption = test2
Label3.Caption = test3
End Sub
Private Sub Command2_Click()
test2 = 10
Label1.Caption = test1
Label2.Caption = test2
Label3.Caption = test3
End Sub
Private Sub Command3_Click()
Const test3 As Single = 90.55
Label1.Caption = test1
Label2.Caption = test2
Label3.Caption = test3
End Sub
Simpan Form3 (nama file : Lat3.frm).
Klik menu Project > Project1 Properties lalu klik
tab General. Gantilah Startup Object-nya menjadi
Form3.
Coba jalankan Project1.
Perhatikan sifat variabel global, variabel lokal dan konstanta !
Klik Tombol
|
Nilai Var. Test1
|
Nilai var. Test2
|
Nilai Var. Test3
|
Test1
|
Nusantara
|
Kali Pertama : 0
Berikutnya : 10
|
<kosong>
|
Test2
|
<kosong>
|
10
|
<kosong>
|
Test3
|
<kosong>
|
10
|
90.55
|
Penjelasan Kode Program
Kode Program
|
Deskripsi
|
Dim test2 As Integer
|
Variabel
test2 dideklarasikan untuk data bertype
integer
sebagai variabel global sehingga bisa
digunakan
oleh semua blok kode program.
Catatan
: setiap variabel global harus selalu
dideklarasikan
pada bagian atas kode program -
pastikan
Object Selector berisi (General) dan
Event
Selector berisi (Declarations).
|
Private Sub Command1_Click()
Dim test1 As String
|
Bila
user meng-klik tombol Test1 :
Variabel
test1 dideklarasikan untuk data bertype
string
sebagai variabel lokal khusus untuk blok
kode
Command1_Click.
Catatan
: setiap variabel lokal dideklarasikan
pada
bagian dalam blok kode program tertentu.
Blok
kode program disebut procedure (akan
dibahas
dalam bab khusus).
|
test1 = "nusantara"
|
Variabel test1 diisi dengan data nusantara (string).
Ingat tanda “…” sebagai pembatas.
|
Label1.Caption = test1
Label2.Caption = test2
Label3.Caption = test3
End Sub
|
Tampilkan isi variabel test1, test2 dan test3 pada
Label1, Label2 dan Label3.
ü Label1 akan menampilkan teks nusantara, karena variabel test1
berisi nusantara.
ü Label2 akan menampilkan angka 0, karena variabel test2 belum
ada isinya. Variabel test2 boleh digunakan karena bersifat global.
ü Label3 tidak menampilkan apa-apa (kosong), karena variabel
test3 hanya bersifat local untuk blok kode Command3_Click.
|
Private Sub Command2_Click()
test2 = 10
|
Bila user meng-klik tombol Test2 :
Variabel test2 diisi dengan data 10 (integer).
Variabel test2 boleh diisi/diganti isinya karena
bersifat global
|
Label1.Caption = test1
Label2.Caption = test2
Label3.Caption = test3
End Sub
|
Tampilkan isi variabel test1, test2 dan test3 pada
Label1, Label2 dan Label3.
ü Label1 tidak menampilkan apa-apa (kosong), karena variabel
test1 hanya bersifat local untuk blok kode Command1_Click.
ü Label2 akan menampilkan angka 10, karena variabel test2 isinya
angka 10.
ü Label3 tidak menampilkan apa-apa (kosong), karena variabel
test3 hanya bersifat local untuk blok kode Command3_Click.
|
Private Sub Command3_Click()
Const test3 As Single = 90.55
|
Bila user meng-klik tombol Test3 :
Variabel test3 dideklarasikan sekaligus diisi
dengan data 90,55 (single) – sebagai konstanta.
|
Label1.Caption = test1
Label2.Caption = test2
Label3.Caption = test3
End Sub
|
Tampilkan isi variabel test1, test2 dan test3 pada
Label1, Label2 dan Label3.
ü Label1 tidak menampilkan apa-apa (kosong), karena variabel
test1 hanya bersifat local untuk blok kode Command1_Click.
ü Label2 akan menampilkan angka 10, karena variabel test2 isinya
masih angka 10. Variabel test2 boleh digunakan karena bersifat global.
ü Label3 akan menampilkan angka 90,55, karena variabel test3
isinya angka 90,55.
|
Tidak ada komentar:
Posting Komentar