Langkah selanjutnya setelah kita membuat form input dan edit adalah kita membuat hapus data. Kita bisa memilih data yang mau dihapus dan selanjutnya tinggal menghapus data tersebut dari form.
Langkahnya tinggal melanjutkan dari form edit data pada artikel sebelumnya, tinggal menambahkan tombol hapus data seperti dibawah ini.
Prosesnya hampir sama seperti edit data, jadi data yang mau dihapus dipilih dulu lewat datagrid atau bisa menggunakan tombol navigasi yang sudah dibuat sebelumnya setelah itu pilih tombol hapus maka data akan kehapus. Seleah menambahkan button langkah selanjutnya adalah tambahkan script di bawah ini ke tombol hapus. Caranya seperti biasa klik 2 kali tombol hapus dan tambahkan script yang ditulis miring berikut ini.
Private Sub CmdHapus_Click() Adodc1.Recordset.Delete
txtnpm.Text = ""
txtnama.Text = ""
txtnilai.Text = ""
MsgBox "Data sudah dihapus"
Adodc1.Refresh
End Sub
txtnpm.Text = ""
txtnama.Text = ""
txtnilai.Text = ""
MsgBox "Data sudah dihapus"
Adodc1.Refresh
End Sub
Kalau sudah selesai silahkan di coba.
No comments:
Post a Comment