Sebelumnya saya sudah memposting tentang DataBase pada delphi kali ini saya akan memposting lagi masih tentang database yang sama pada sebelumnya namun sekarang saya mencobanya melalui program visual basic.
Software yang diperlukan.
1. Ms.Visual Basic v.6.0
2. Ms. Access.
Pertama Kita Buka Ms.Access dan pada tab table kita klik kanan dan pilih desain view.
Setelah Itu kita masukkan tab yang kita inginkan pada tabel database, disini saya memasukkan NPM,NAMA,KELAS,ALAMAT.
Kita buka program visual basic dan setelah itu kita buat dengan desain sebagai berikut
kita klik pada Adodc1 lalu atur seperti gambar di bawah ini agar terkoneksi dengan Ms.Access
Setelah itu pindah ke datagrid dan atur lagi pada propertise seperti ini
lalu klik kanan pada data grid pilih retevie fields makan data grid akan berubah tabelnya seperti yg tertera di Ms.Access.
Setelah semua beres dengan koneksi dan desain maka kita lanjut kepada pembuatan kode program.
pertama kita double klik pada button1 / inputan. dan masukkan kode program seperti berikut.
PENJELASAN PROGRAM
Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset.Fields("NPM") = Text1.Text
Adodc1.Recordset.Fields("NAMA") = Text2.Text
Adodc1.Recordset.Fields("KELAS") = Text3.Text
Adodc1.Recordset.Fields("ALAMAT") = Text4.Text
Adodc1.Recordset.Update
End Sub
Pada kode program diatas dijelaskan bahwa pada field NPM akan diisikan oleh inputan dari text1.text begitupun seterusnya sesuai field dana text yang ada.
Private Sub Command2_Click()
Text1.Text = Delete
Text2.Text = Delete
Text3.Text = Delete
Text4.Text = Delete
End Sub
Pada kode program di atas text1.text = delete
akan berfungsi menghapuskan semua text box.
OUTPUT PROGRAM
Pertama kita masukan NPM,NAMA,KELAS,ALAMAT setelah itu kita klik input makan yang data yang di input akan keluar di dalam tabel data grid seperti di bawah ini.
Sekian penjelasan tentang DataBase pada Visual Basic.
Membuat DataBase pada Visual Basic