VARIABEL KONSTANTA TIPE DATA DAN OPERATOR DALAM VISUAL BASIC

VARIABEL DAN TYPE DATA

• Susunan program visual basic 6, memang amat mudah untuk dipelajari.
• Namun bagaimanapun juga yang namanya bahasa pemograman untuk menyusun suatu aplikasi tidak terlepas dari penggunaan memori variabel serta type data yang ditampung di memori variabel tersebut.

Variabel : adalah unsur penting dalam pemrograman.

Untuk mengolah setiap data / informasi diperlukan tempat penyimpanan, tempat penyimpanan itu adalah variabel.

Dimana : dalam bahasa pemograman Visual Basic, prakteknya diperlukan 3 tahap yaitu :

• merancang interface dengan object-object
• menentukan properties
• menuliskan kode / program pada object tersebut

Untuk menuliskan kode / program ini diperlukan lebih dari satu variabel, agar tidak rancu, maka masing-masing variabel tersebut harus diberi nama, pada visual basic 6 ada aturan pemberian nama variabel :

• Harus diawali dengan huruf, bisa terdiri dari gabungan huruf dan angka.
• Jangan terlalu panjang, usahakan singkat dan jelas, max. 25 karakter.
• Jangan kembar (tidak boleh ada yang sama pemberian nama setiap variabel).

Type / Jenis Data :

Informasi / Data yang tersimpan pada memori variabel, memiliki jenis / type yang berbeda, ada 6 kelompok jenis data pada Visual Basic 6 :

1. Numeric :

Kategori ini tersimpan beberapa jenis angka (Numeric) yaitu :

• Dua Type Angka Bulat : Integer dan Long
• Dua Type Angka Pecahan : Single dan Double
• Satu Type Angka untuk Mata Uang : Currency
1. STRING : adalah data yang berupa text (kalimat, kata, huruf, tanggal)
2. Boolean : adalah informasi logika
3. Date : adalah data tentang tanggal
4. Object : adalah data mengenai object-object yang digunakan VB 6
5. Varient : adalah type data bebas, bias terdiri dari data kelompok lain.

(Bisa string, numeric, date, dll)

Contoh Aplikasinya :

• Kelompok Numeric dan String.

• Buat sebuah form yang memiliki object-object berikut :

	NILAI PROPERTIS
Nama Object	Caption	Name
Label1 Label2 Label3 Label4 Label5 Form1 TexBox1, TexBox2, TexBox3, TexBox4 Command Button1 Command Button2 Command Button3	Nama Nilai1 Nilai2 Nilai Rata-rata Nilai Huruf Latihan Type Data Kosongkan Hitung Clear Exit	- - - - - Frmlatih01 TexNama, TexN1, TexN2, TexNR CmdHit CmdClr CmdExit

Ketikkan Kode Program Untuk Object CmdHit

Private Sub CmdHit_Click ( )

DIM Nama, Ket AS String * 30

DIM N1 N2 As Integer

DIM NR As Single

N1 = textn1.text

N2 = textn2.text

NR = (N1 + N2)/2

If NR>=80 then

Ket = “Pintar Sekali”

Else if NR>= 69 then

Ket = “Biasa Biasa Saja”

Else : ket = “Pemalas”

End if

Nama = textnama.text

MsgBox “Perhatikan “&Nama&”Kamu Orangnya : “&Ket&

EndSub

Kode Program untuk object cmdClr :

Private Sub cmdclr_Click ( )

textNama.text = “ “

textN1.text = “ “

textN2.text = “ “

textNR.text = “ “

textNR.SetFocus

Endsub