Program Membuat Database Mahasiswa Dengan VB 6.0 [PDF]

Citation preview

lled » MEMBUAT PROGRAM DATABASE MAHASISWA DENGAN VB 6.0



MEMBUAT PROGRAM DATABASE MAHASISWA DENGAN VB 6.0 Dalam membuat program database cukup mudah hanya saja dalam pembuatan programnya prosedural. Yang namanya database, sekarang sudah sangat diperlukan, hampir di semua instalsi baik dipemerintahan, pendidikan maupun perusahaan. Database merupakan Kumpulan dari item data yang saling berhubungan satu dengan yang lainnya yang diorganisasikan berdasarkan sebuah skema atau struktur tertentu, tersimpan di hardware komputer dan dengan software untuk melakukan manipulasi untuk kegunaan tertentu. Mengapa Diperlukan Database alasannya antara lain : 



Salah satu komponen penting dalam sistem informasi, karena merupakan dasar dalam menyediakan informasi







Menentukan kualitas informasi : akurat, tepat pada waktunya dan relevan.



 Informasi dapat dikatakan bernilai bila manfaatnya lebih efektif dibandingkan dengan biaya mendapatkannya. 











Mengurangi duplikasi data (data redudancy)



Hubungan data dapat ditingkatkan (data relatability)



Mengurangi pemborosan tempat simpanan luar



Pertama kali dalam membuat program database ini adalah dengan visual data manager : Berikut langkah-langkah dalam membuat program database : 1. Buka program VB 6.0 anda



2. Pilih menu Add-Ins >> Visual Data Manager >> File >> New >> Microsoft Access >> Version 7.0 MDB 3. Beri nama database anda lalu simpan klik kanan Properties >> New Table 4. Beri nama Tabel database anda >> Add Field >> tambahkan satu persatu komponen data yang ingin anda tampilkan seperti, NAMA, NIM, JURUSAN, IPK dan lain-lain >> close jika sudah 5. Kemudian Build The Table hasilnya seperti berikut :



Gambar Visual Data Manager 6. Klik Add lalu masukkan data mahasiswa jika sudah close 7. Sekarang buka form anda kemudian desain dan tambahkan satu buah frame, 9 label, 5 commanbutton, 8 textbox dan satu kontrol



data, untuk commandbutton ubah nama pada propertinya sesuai seperti yang dibawah ini



Gambar Program Database mahasiswa dengan VB 6.0 8. Kemudian klik control data ,lihat diproperties pilih DatabaseName lalu masukkan database yang kita buat tadi, satu lagi RecordSources ganti dengan nama databasenya 9. Kemudian atur properties masing-masing textbox seperti dibawah ini :



TextBox



DataSource



DataField



Text1



Data1



NAMA



Text2



Data1



NIM



Text3



Data1



JENIS KELAMIN



Text4



Data1



ALAMAT



Text5



Data1



JURUSAN



Text6



Data1



NO HP



Text7



Data1



IPK



10. Ketikkan Kode/listing/script program berikut ini : Private Sub CANCEL_Click() End End Sub



Private Sub CARI_Click() Data1.Recordset.FindFirst "NIM='" + Text8 + "'" If Data1.Recordset.NoMatch Then MsgBox "NIM yang Anda cari Tidak Ditemukan", vbOKOnly, "cari" Data1.Recordset.MoveFirst Text8.SetFocus



End If End Sub



Private Sub Form_Load() Call tidaktampil End Sub Private Sub tampil() Text1.Enabled = True Text2.Enabled = True Text3.Enabled = True Text4.Enabled = True Text5.Enabled = True Text6.Enabled = True Text7.Enabled = True End Sub Private Sub tidaktampil() Text1.Enabled = False Text2.Enabled = False Text3.Enabled = False Text4.Enabled = False Text5.Enabled = False Text6.Enabled = False Text7.Enabled = False End Sub



Private Sub HAPUS_Click() Delete = MsgBox("Anda Yakin Ingin menghapusnya", vbInformation + vbYesNo, "hapus") If Delete = vbYes Then Data1.Recordset.Delete Data1.Recordset.MoveNext Else Data1.Recordset.MoveFirst End If End Sub



Private Sub SIMPAN_Click() Data1.Recordset.Update Data1.Recordset.MoveFirst Call tidaktampil End Sub



Private Sub TAMBAH_Click() Data1.Recordset.AddNew Call tampil Text1.SetFocus End Sub



11. Kemudian silahkan coba program anda dan lihat contoh seperti dibawah ini :



12.



Gambar program membuat Database Mahasiswa dengan VB 6.0 Selamat mencoba….!!!