Hal-hal yang perlu dipahami sebelum bekerja dengan
visual basic:
1.Tipe Data
Dalam merancang suatu aplikasi program kita harus
memahami betul tentang tipe data yang digunakan, karena kesalahan dari
penggunaan tipe data akan menyebabkan program aplikasi tidak berjalan
maksimal(misalkan error atau lambat)
Macam-macam tipe data:
Tipe data variant
PRIVATE SUB FORM_ACTIVATE
()
DIM HARGA, JUMLAH, HARGA_TOTAL (PROSES
PENDEKLARASIAN VARIABEL)
HARGA=”10000”
JUMLAH=5
HARGA_TOTAL =HARGA * JUMLAH
PRINT HARGA & “*” & JUMLAH & “=” & HARGA_TOTAL
END SUB
PRIVATE SUB FORM_ACTIVATE
()
DIM TANGGAL_LAMA, TANGGAL_BARU
TANGGAL_LAMA = # 17/05/1977 #
TANGGAL_BARU = TANGGAL_LAMA + 1
PRINT “TANGGAL YANG LAMA :” & TANGGAL_LAMA
PRINT “TANGGAL YANG BARU :” & TANGGAL_BARU
END SUB
Variabel
dengan menggunakan type data variant dapat digabung dengan menggunakan tanda & dan tanda +
Ada perbedaan
dari penggabungan variabel dengan mengunakan tanda & dan + seperti tabel
berikut:
Menggunakan tanda &
NO
|
DEKLARASI
|
HASIL
|
1
|
DIM HASIL, NILAI_1, NILAI_2
NILAI_1 =”234”
NILAI_2 = 5
HASIL = NILAI_1 & NILAI_2
|
2345
|
2
|
DIM HASIL, NILAI_1, NILAI_2
NILAI_1 =”XXX”
NILAI_2 = 5
HASIL = NILAI_1 & NILAI_2
|
XXX5
|
3
|
DIM HASIL, NILAI_1, NILAI_2
NILAI_1 =234
NILAI_2 = 5
HASIL = NILAI_1 & NILAI_2
|
2345
|
Menggunakan tanda +
NO
|
DEKLARASI
|
HASIL
|
1
|
DIM HASIL, NILAI_1, NILAI_2
NILAI_1 =”234”
NILAI_2 = 5
HASIL = NILAI_1 + NILAI_2
|
239
|
2
|
DIM HASIL, NILAI_1, NILAI_2
NILAI_1 =”XXX”
NILAI_2 = 5
HASIL = NILAI_1 & NILAI_2
|
RUN TIME ERROR
TYPE MISMACH
|
3
|
DIM HASIL, NILAI_1, NILAI_2
NILAI_1 =234
NILAI_2 = 5
HASIL = NILAI_1 + NILAI_2
|
239
|
Type data lain (Non Variant)
Pada saat melakukan perhitungan matematik, disarankan
kita harus mengunakan type data numerik meskipun type data variant sudah cukup
mampu melakukan pekerjaan tersebut.tapi jika salah menempatkannya di program
maka aplikasi tidak akan berjalan dengan baik.
Secara umum type data pada visual basic dikelompokkan
menjadi 5:
1. Numerik: dipakai untuk
menyimpan data angka (number)
A. Byte : data berupa
bilangan bulat positif ukuran nya 1 byte (0 sd 255)
B. Integer: bilangan bulat
(tanpa pecahan) ukuran 2 byte (-32768 sd 32767)
C. Long : bilangan bulat
positif (tanpa pecahan) ukuran 4 byte (10 angka)
D. Currency: menyimpan nilai
mata uang 8 byte (15 angka)
E. Single: data numerik
ukuran 4 byte (10)
F. Double: data numerik
ukuran 8 byte (20)
G. Decimal: menyimpan nilai
desimal (pecahan) dengan keakuratan (presisi) sampai 28 angka desimal ukuran 14
byte
2. String: menyimpan
rangkaian data karakter
Nilai alpanumerik ukuran 1 byte per karakter (sampai 2 milyar
karakter)
3. Boolean : menyimpan data dengan nilai benar atau
salah (true atau false)
2 byte
4. Date :menyimpan data
berupa tanggal dan waktu
8 byte ( 1 january 100 sd 31
des 9999)
5. Object: menyimpan data
berupa objek
Seperti
form, kontrol 4 byte
Mendeklarasikan suatu variabel dengan type data bukan
variant harus menggunakan perintah : dim, private,
public, static
CONTOH DEKLARASI VARIABEL
NON VARIANT:
PRIVATE HASIL AS SINGLE
DIM JUMLAH AS INTEGER, HARGA AS
DOUBLE
PUBLIC NAMAKU AS STRING
STATIC KOTA AS STRING, HARI AS
BYTE, CEK AS BOOLEAN
Type Data Buatan Sendiri
Selain menggunakan type data yang sudah disediakan
oleh visual basic kita juga dapat membuat type data sendiri atau baru dengan mengambil salah satu atau
sebagian dari type data standar yang telah disediakan.
Dalam mendeklarasikan type data buatan sendiri kita
harus menggunakan perintah type setelah kata public
atau private
Penggunaan kata private atau public tergantung dari
ruang lingkup variabel yang diinginkan. Secara umum penulisannya sbb;
PRIVATE TYPE
<NAMA_TYPE_DATA>
…………
…………
END TYPE
ATAU
PUBLIC TYPE
<NAMA_TYPE_DATA>
…………
…………
END TYPE
Contoh: tabel karyawan terdiri dari field nik, nama,
alamat, kota, tanggal_lahir, jumlah_anak maka type data buatan sendirinya
adalah sebagai berikut:
PRIVATE TYPE DATA_KARYAWAN
NIK AS
STRING * 10
NAMA AS STRING * 30
ALAMAT AS STRING * 50
KOTA AS STRING *
20
TANGGAL_LAHIR AS DATE
JUMLAH_ANAK AS BYTE
END TYPE
Untuk mengisikan data dari type data buatan sendiri
dapat dilakukan dengan dua cara yaitu:
- LEWAT PROGRAM
- LEWAT VARIABLE
- CONTOH PENGISIAN DATA LEWAT PROGRAM SBB:
SUB ISI_DATA ()
NIK =
“961352”
NAMA = ”HARIANJA”
ALAMAT = ”JL.CIPAKU INDAH
II NO. 27 CIDADAP”
KOTA = ”BANDUNG”
TANGGAL_LAHIR = #17/05/1977#
JUMLAH_ANAK = 3
END SUB
- CONTOH PENGISIAN DATA BUATAN SENDIRI MENGGUNAKAN VARIABEL
SUB ISI_DATA ()
NIK = TXT_NIK.TEXT
NAMA = TXT_NAMA.TEXT
ALAMAT = TXT_ALAMAT.TEXT
KOTA = TXT_KOTA.TEXT
TANGGAL_LAHIR = TXT_LAHIR.TEXT
JUMLAH_ANAK = TXT_ANAK.TEXT
END SUB
LATIHAN 2
Buat Form seperti gambar berikut:
Atur properties sebagai berikut:
FORM/KONTROL
|
PROPERTIES
|
SETTING
|
FORM 1
|
NAME
CAPTION
|
DATA KARYAWAN
PENGOLAHAN DATA KARYAWAN
|
LABEL
|
NAME
CAPTION
INDEX
|
LABEL1
NIK, Nama, Alamat, Kota, Tgl_Lahir, Jml_Anak,
0,1,2,3,4,5,
|
TEXTBOX1
|
NAME
TEXT
|
Txt_NIK
-
|
TEXTBOX2
|
NAME
TEXT
|
Txt_Nama
-
|
TEXTBOX3
|
NAME
TEXT
|
Txt_Alamat
-
|
TEXTBOX4
|
NAME
TEXT
|
Txt_Kota
-
|
TEXTBOX5
|
NAME
TEXT
|
Txt_Lahir
-
|
TEXTBOX6
|
NAME
TEXT
|
Txt_Anak
-
|
COMMAND1
|
NAME
CAPTION
|
Cmd_Tampil
&TAMPIL
|
COMMAND2
|
NAME
CAPTION
|
Cmd_Bersih
&BERSIH
|
COMMAND3
|
NAME
CAPTION
|
Cmd_Keluar
&KELUAR
|
- TULISKAN SINTAX SEBAGAI BERIKUT (PADA BAGIAN GENERAL):
DIM DATA AS DATA_KARYAWAN
PRIVATE TYPE DATA_KARYAWAN
NIK AS
STRING * 10
NAMA AS STRING * 30
ALAMAT AS STRING * 50
KOTA AS STRING *
20
TANGGAL_LAHIR AS DATE
JUMLAH_ANAK AS BYTE
END TYPE
- TULISKAN PERINTAH PADA MASING MASING COMMAND BUTTON SEBAGAI BERIKUT:
v KLIK DUA KALI COMMAND 3
TULISKAN PERINTAH:
END
v KLIK DUA KALI COMMAND 2
TULISKAN PERINTAH:
CALL BERSIH
v KLIK DUA KALI CAMMAND 1
TULISKAN PERINTAH:
CALL ISI_DATA
CALL TAMPIL_DATA
- BUATKAN PERINTAH BERSIH SEBAGAI BERIKUT:
SUB BERSIH ()
TXT_NIK.TEXT = “”
TXT_NAMA.TEXT= ””
TXT_ALAMAT.TEXT= ””
TXT_KOTA.TEXT= ””
TXT_LAHIR.TEXT= ””
TXT_ANAK.TEXT= ””
END SUB
- BUATKAN PERINTAH ISI_DATA SEBAGAI BERIKUT:
SUB ISI_DATA()
DATA.NIK=TXT_NIK.TEXT
DATA.NAMA=TXT_NAMA.TEXT
DATA.ALAMAT=TXT_ALAMAT.TEXT
DATA.KOTA=TXT_KOTA.TEXT
DATA.LAHIR=TXT_LAHIR.TEXT
DATA.ANAK=TXT_ANAK.TEXT
END SUB
- BUAT PROSEDUR TAMPIL DATA UNTUK MENAMPILKAN DATA KE KOTAK PESAN :(MSG BOX) DARI DATA YANG ADA DI VARIABEL SBB:
SUB TAMPIL_DATA()
(USAHAKAN DATA OTOMATIS)
MsgBox “INFORMASI DATA KARYAWAN: “ & chr (10) &_
“NIK : “& DATA.NIK & chr (10) &_
“NAMA : “ & DATA.NAMA & chr
(10) &_
“ALAMAT : “ & DATA.ALAMAT & chr(10) &_
“KOTA : “ & DATA.KOTA & chr
(10) &_
“TANGGAL_LAHIR: “ & DATA.LAHIR & chr(10) &_
“JUMLAH_ANAK : “& DATA.ANAK
END SUB
0 Response to "Elemen - Elemen Program (Data, Konstanta, Variabel)"
Post a Comment