CARA MEMBUAT DATABASE "DATA MAHASISWA" MENGGUNAKAN VB 6.0

Database Data Mahasiswa
Visual Basic  6.0

Haiiii... :)
Saya mau sharring nih bagaimana sih menghubungkan untuk database dari VB ke Ms.Acces..
ini dia gan cara termudah membuatnya, chekibrot ^_^.

1. langkah pertama anda pastika Visual Basic sudah terinstal, disini saya menggunakan VB 6.0. setelah anda buka dan tampil layar visual basic pilih standar EXE kemudian klik open.

2. lalu klik pada menu Add-Ins dan pilih Visual data Manager... dan muncul tampilan seperti berikut:

3. kemudian pilih VisData pilih menu File - New - Microsoft Acces - Version 7.0 MDB. buat folder baru  "data mahasiswa"setelah itu save dengan "nama mahasiswa". kemudian Pilih properties klik kanan lalu klik New Table, hingga muncul tampilan seperti berikut: 

4. isi tabel dengan nama Data Mahasiswa, kemudian pilih Add Field.

Pada kolom "Name:" Tulis NIM kemudian tekan Enter.
Tulis lagi pada kolom yang sama Nama  kemudian tekan Enter
Tulis lagi pada kolom yang sama Alamat kemudian tekan Enter. lalu kilik tombol close. hasilnya akan tampak seperti ini:

5. jika sudah seperti itu pilih Build Table.pada from data mahasiswa kilik 2 kali. kemudian pilih ADD, lalu

pada NIM tulis : 1111010205  (nim anda)

pada Nama : Mujahidah Syafiah Shaumayya (nama anda)

pada Alamat : Tangerang (alamat anda)

setelah selesai pilih "update" kemudian close semua tabel Visdata kecuali visual basic.

6. Beralilah ke Visual Basic anda yang sudah terbuka tadi. lalu anda buat tabel seperti berikut ini:

Perhatikan pada NIM, Nama, Alamat menggunakan Label

Perhatikan pada kolom putih dibawah NIM, Nama, Alamat menggunakan Textbox

Perhatikan pada tombol ADD, DELETE, EXIT menggunakan Command Button

7. jika sudah , pada kiri general box cari yang kosong kemudian klik kanan dan pilih Components lalu cheklist Microsoft data Bound grid Control 5.0 sp3. klik OK. Pilih data

 kemudian buatlah seperti ini:

lihat pada properties databasename pilih file Ms. Acces yg tadi sudah dibuat "Mahasiswa"

EOFAction pilih 2-Add New, dan RecordSource pilih Tableh yg tadi dibuat "Mahasiswa"

 

8. jika sudah, lalu anda buat seperti ini dengan menggunakan:

Buatlah seperti ini:

perhatikan pada properties, DataSource pilih "Data 1"

9. jika sudah kemudian beralih ke:

text1 lihat properties ubah Data source : Data1, Data Field : NIM

text2 lihat properties ubah Data source : Data1, Data Field : Nama

text3 lihat properties ubah Data source : Data1, Data Field: Alamat

kemudian pada ADD, DELETE, EXIT.

klik2 kali tombol ADD /command1 tuliskan 

Private Sub Command1_Click()

Data1.Recordset.AddNew

Text1.SetFocus

End Sub

klik2 kali tombol DELETE / command2 tuliskan

Private Sub Command2_Click()

Data1.Recordset.Delete

Data1.Recordset.MoveNext

End Sub

klik2 kali tombol EXIT / command3 tuliskan

Private Sub Command3_Click()

Unload Me

End Sub

lihat di code hasil akan seperti ini

jika sudah selesaisemua File - Save as - folder yg tadi dibuat "data mahasiswa"- save - save

hasil dalam Visual Basic akan seperti ini:

Dan Hasil Pada Ms. Acces akan seperti ini:

Selesai deh, Mudah Bukan? ^_^

Semoga Bermanfaat ya

_Mujay_

http://www.facebook.com/mujahidah.shaumayya?ref=tn_tnmn