Setelah kita membuat koneksi ke database dan tombol navigasi seperti pada artikel sebelumnya, selanjutnya sekarang kita akan membuat form untuk memasukkan data. Langkah awal adalah desain form yang sudah dibuat sebelumnya menjadi seperti dibawah ini .
Lihat yang disebelah kanan ada npm, nama dan nilai, data tersebut yang akan kita masukkan sesuai dengan tabel dalam database yang sudah dibuat sebelumnya. Dari form yang ada di artikel sebelumnya yaitu membuat tombol navigasi dan koneksi ke database kita tinggal menambahkan :
- 3 buat label, dan ubah captionnya menjadi NPM, Nama dan Nilai.
- 3 buah texbox, ubah namenya masing-masing menjadi txtnpm, txtnama dan txtnilai
- 1 buah button, ubah captionnya menjadi Tambah data dan kosongkan propertis Text-nya
Selanjutnya double klik tombol tambah data dan masukkan script yang ditulis miring berikut :
Private Sub CmdTambah_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset!npm = txtnpm.Text
Adodc1.Recordset!nama = txtnama.Text
Adodc1.Recordset!nilai = txtnilai.Text
Adodc1.Recordset.Update
MsgBox "Data sudah disimpan"
Adodc1.Refresh
End Sub
Kalau sudah selesai silahkan coba jalankan dan coba input data dari programnya dengan menggunakan tombol F5 atau icon Start yang ada di program. Kalau programnya sukses maka data yang kita inputkan akan otomatis muncul di datagrid.
No comments:
Post a Comment