Selamat Sore kawan seperjuangan. Pada kesempatan sore hari ini saya akan sedikit membagikan bagaimana cara membuat simpan data pada VB 6.0 menggunakan component data.
Mengapa saya membuat postingan seperti ini? ya tau sendiliri lah sob, mata kuliah ini sangat vital bagi kami seperjuangan.
Oke lah kalau semuanya sudah siap marilah kita berdoa terlebih dahulu agar pekerjaan kita dimudahkan dan diberi kesuksesan. Aamiin..
a. Aktivkan Visual Data Manager
Halaman awal VisData (Visual Data Manager)
b. Buatlah Database Baru
Pilih tempat penyimpanan
c. Buatlah tabel baru klik kananènew table
i. Table Name : Anggota
ii. Tambahkan field baru Buat struktur tabel seperti
berikut:
nama - text - 50
no_anggota - text - 50
alamat - text - 50
iii. Buat Index
NAME : NO
Index
fields : no_anggota
iv. OK
v. Build The Table
d. Ulangi langkah di atas untuk
membuat tabel TBLBAYAR1
nota - text - 50
no - text - 50
nama - text - 50
bayar - text - 50
mbl - text - 50
mbi - text - 50
jm - text - 50
jb - text - 50
e. Index
i. Index Name : NO
ii. Index Fields : Nota
2. Membuat Form Master Anggota
komponen
|
Properti
|
|
Form
|
Name
|
Form1
|
Caption
|
Input Data Anggota
|
|
Label1
|
Name
|
Label1
|
Caption
|
Input Data Anggota
|
|
Back style
|
0-Transparant
|
|
Border Style
|
1-Fixed Single
|
|
Label2
|
Name
|
Label2
|
Caption
|
NoAngoota
|
|
Back style
|
0-Transparant
|
|
Border Style
|
1-Fixed Single
|
|
Label3
|
Name
|
Label3
|
Caption
|
Nama Anggota
|
|
Back style
|
0-Transparant
|
|
Border Style
|
1-Fixed Single
|
|
Label4
|
Name
|
Label4
|
Caption
|
Alamat
|
|
Back style
|
0-Transparant
|
|
Border Style
|
1-Fixed Single
|
|
DATA
|
Name
|
dbayar
|
DatabaseName
|
Dbbayar1.mdb
|
|
RecordsetType
|
0-Table
|
|
RecordSource
|
Anggota
|
|
DBGRID
|
Name
|
DBGRID1
|
DataSource
|
Dbayar
|
|
CommandButton1
|
Name
|
Cmdadd
|
Caption
|
Add
|
|
CommandButton2
|
Name
|
Cmdsave
|
Caption
|
Save
|
|
CommandButton3
|
Name
|
Cmdclose
|
Caption
|
Close
|
|
Textbox1
|
Name
|
Tno
|
Text
|
Tno
|
|
Textbox2
|
Name
|
Tnama
|
Text
|
Tnama
|
|
Textbox3
|
Name
|
Talamat
|
Text
|
Talamat
|
|
a. Koneksi data ke database
i. Pilih komponen data
ii. Masuk ke properties
iii. Pilih DatabaseName
iv. Cari database yang telah dibuat
b. Koneksi DBGrid dengan Data
i. Mengaktifkan DBGRID
1) Pilih menu PROJECTÃ COMPONENT
2) Centang Microsfot
Data Bound Grid Control 5.0Ã OK
ii. Pada Window
Properti pilih DataSource
iii. Pada Design Form di atas Componen DBGRID1
klik kananà Retrive Fields
C. Coding
sekarang kita mulai masuk ke scripting, dimana kita harus memasukkan perintah - perintah agar nantinya aplikasi berjalan sesuai dengan yang kita harapkan.
3. Membuat Form Transaksi
komponen
|
Properti
|
|
Label1
|
Name
|
Label1
|
Caption
|
Input Data Pembayaran Rekening PDAM
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
1-Fixedsngle
|
|
Label2
|
Name
|
Label2
|
Caption
|
Nota
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
0-None
|
|
Label3
|
Name
|
Label3
|
Caption
|
No. Anggota
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
0-None
|
|
Label4
|
Name
|
Label4
|
Caption
|
Nama Anggota
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
0-None
|
|
Label5
|
Name
|
Label5
|
Caption
|
Biaya Per Meter
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
0-None
|
|
Label6
|
Name
|
Label6
|
Caption
|
Rekening Bulan Lalu
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
0-None
|
|
Label7
|
Name
|
Label7
|
Caption
|
Rekening Bulan Ini
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
0-None
|
|
Label8
|
Name
|
Label8
|
Caption
|
Jumlah Meter
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
0-None
|
|
Label9
|
Name
|
Label9
|
Caption
|
Total Bayar
|
|
BackStyle
|
0-Transparant
|
|
BorderStyle
|
0-None
|
|
Shape1
|
Name
|
Shape1
|
Shape
|
4-Rounded Rectangle
|
|
CommandButton1
|
Name
|
Cmdadd
|
Caption
|
Add
|
|
CommandButton2
|
Name
|
Cmdsave
|
Caption
|
Save
|
|
CommandButton3
|
Name
|
Cmdblank
|
Caption
|
Blank
|
|
CommandButton4
|
Name
|
Cmdclose
|
Caption
|
Close
|
|
DBGRID1
|
Name
|
Dbgrid1
|
Caption
|
Tabel Data Pembayaran Rekening PDAM
|
|
DataSource
|
Dbayar1
|
|
DATA1
|
Name
|
Dbayar1
|
DatabaseName
|
Dbbayar1.mdb
|
|
RecordsetType
|
0-Table
|
|
RecordSource
|
Tblbayar1
|
|
DATA2
|
Name
|
Tbanggota
|
DatabaseName
|
Dbbayar1.mdb
|
|
RecordsetType
|
0-Table
|
|
RecordSource
|
Anggota
|
|
Textbox1
|
Name
|
Tnota
|
Text
|
Tnota
|
|
Textbox2
|
Name
|
Tnama
|
Text
|
Tnama
|
|
Textbox3
|
Name
|
Tbiaya
|
Text
|
Tbiaya
|
|
Textbox4
|
Name
|
Tmbl
|
Text
|
Tmbl
|
|
Textbox5
|
Name
|
Tmbi
|
Text
|
Tmbi
|
|
Textbox6
|
Name
|
Tjm
|
Text
|
Tjm
|
|
Textbox7
|
Name
|
Tjb
|
Text
|
Tjb
|
|
DBCombo
|
Name
|
Tno
|
DataSorce
|
TBANGGOTA
|
|
Listfields
|
No_anggota
|
|
Rowsource
|
TBANGGOTA
|
|
a. Mengaktifkan DBCOMBO
b. Coding
4. Membuat Form Menu
a. Membuat Menu
b. Memanggil form dari form menu
i. Menu Transaksi
ii. Menu Anggota
iii. Menu Keluar
5. Mengatur project ketika di jalankan form MENU
yang tampil pertama
6. Simpan dan jalankan
0 komentar:
Post a Comment
Komentarlah dengan menggunakan Bahasa Indonesia yang baik dan sopan.