Materi Visual Basic II

Silakan download materi visual basic (form suplier dan form transaksi) disini

untuk transaksi one to many nya download disini

Koneksi database MySQL dengan VB

Buat database  : perpustakaan
Buat tabel : anggota

 Desain Form

Untuk koneksi ke database MySQL menggunakan object ADODB. Sebelumnya aktifkan dulu ADODB nya. Caranya Klik Menu Project - References.. lalu ceklis Microsoft ActiveX Data Object 2.6 Library.

Kemudian ketik coding koneksi berikut ini di Module

Public con As New ADODB.Connection
Public rs As New ADODB.Recordset

Public Sub koneksi()
Set con = New ADODB.Connection
Set rs = New ADODB.Recordset

con.Open "Driver={MySQL ODBC 3.51 Driver};server=localhost;database=perpustakaan; uid=root;pwd =password"

con.CursorLocation = adUseClient
End Sub


Untuk menampilkan record tabel ke DataGrid, coding nya :
Private Sub Form_Load()
Call koneksi
If rs.State Then rs.Close
rs.Open "select * from anggota", con
Set DataGrid1.DataSource = rs
End Sub

Penjelasan:
Coding di Modul
Variabel con digunakan sebagai objek untuk koneksi ke database
Variabel rs digunakan sebagai objek untuk koneksi ke tabel
Nama variabel bebas tapi ada aturan mainnya (masih inget kan??)
Untuk koneksi ke database MySQL dibutuhkan driver dan penulis menggunakan MYSQL ODBC 3.51 yang harus diinstal terebih dahulu.
uid=user id; dan pwd =password untuk masuk ke phpMyAdmin. Untuk user nya "root" dan passwordnya disesuaikan.
CursorLocation=adUseClient --> meletakkan kursor ke database Client

Coding di Form_Load
Call koneksi = memanggil sub koneksi
If rs.State =jika tabel dalam kondisi diam tidak ada aksi ataupun sedang terbuka
then rs.Close= maka tabel akan tertutup
rs.Open "select * from anggota",con = menampilkan seluruh record yang ada di tabel anggota

Set DataGrid1.DataSource = rs --> menampilkan ke DataGrid

Untuk contoh lengkapnya silakan download Form Anggota

Merancang Form Transaksi Penjualan dengan Visual Basic

Untuk membuat form transaksi terlebih dahulu kita rancang struktur database, dan merancang tabel -tabel yang diperlukan.

Database : penjualan.mdb

Tabel:

1.       Barang

Name	Type	Size	Keterangan
KdBarang	Text	10	Primary Key
NmBarang	Text	20
Satuan	Text	10
Harga	Currency
Stok	Nember

2.       Customer

Name	Type	Size	Keterangan
IdCust	Text	10	Primary Key
NmCust	Text	20
Alamat	Text	30
Telp	Text	15

3.       Transaksi

Name	Type	Size	Keterangan
NoTrans	Text	10	Primary Key
Tgl	Date/Time
Total	Currency
IdCust	Text	10

4.       Detail

Name	Type	Size	Keterangan
NoTrans	Text	10
Jumlah	Number
SubTotal	Currency
KdBarang	Text	10

5.       Sementara

Name	Type	Size	Keterangan
KdBarang	Text	10
NmBarang	Text	20
Harga	Currency
Jumlah	Number
Subtotal	Currency

Desain Form Transaksi

Untuk membuat objek DataCombo, terlebih dahulu harus menambahkan componen : Microsoft DataList Control 6.0(OLEDB)

Untuk membuat objek DataGrid, terlebih dahulu harus menambahkan componen : Microsoft DataGrid Control 6.0(OLEDB)


Untuk coding nya silakan download disini