Senang rasanya bisa berbagi pengalaman seputar dunia teknologi, di kesempatan kali ini saya ingin melanjutkan tutorial sebelumnya. Disini kita akan membuat sebuah database dimana data yang ingin kita simpan bisa langsung masuk ke microssoft access. Mungkin ada pertanyaan yang terlintas dibenak kita bagaimana sih cara kita membuat database itu. Sebenarnya membuat database itu gampang-gampang susah yang terpenting anda rajin mengulang dan praktik insya alloh bisa, saking seringnya kita menemukan error atau debug, maka semakin giat kita ingin mencoba lagi itu kebiasaan dari pemrograman visual basic, rasanya kesel dan prustasi. Nah untuk itu dikesempatan ini saya ingin melanjutkan tutorial sebelumnya yang pernah saya buat, sebelumnya saya hanya menjelaskan bagiamana membuat database, tabel, dan koneksiya, tapi disini saya akan menjelaskan dan membuat sintax simpan,edit, hapus dan keluar.
Tampilan form sebelumnya seperti ini
"Sebagai catatan saja desain formnya seperti di tutorial sebelumnya, jangan diubah ya? supaya nanti tidak nagabang dan terjadi error atau debug"Langusng ke pokok pembahasan seperti skripsi saja..hehe
Tampilan form sebelumnya seperti ini
untuk membuat sintax "Simpan, Edit, Hapus, Keluar" anda bisa mencopynya dibawah. Ingat pahami sintaxnya.
Private Sub cmdsimpan_Click()
On Error Resume Next
Data1.Recordset.AddNew
Data1.Recordset!nama = txtnama.Text
Data1.Recordset!alamat = txtalamat.Text
Data1.Recordset!ttl = txtTtl.Text
Data1.Recordset!nohp = txtnohp.Text
Data1.Recordset.Update
End Sub'Sintax untuk simpan
Private Sub cmdedit_Click()
On Error Resume Next
Data1.Recordset.Edit
Data1.Recordset!nama = txtnama.Text
Data1.Recordset!alamat = txtalamat.Text
Data1.Recordset!ttl = txtTtl.Text
Data1.Recordset!nohp = txtnohp.Text
Data1.Recordset.Update
End Sub'Sintax untuk Edit
Private Sub cmdhapus_Click()
On Error Resume Next
Data1.Recordset.Delete
Data1.Recordset.MoveFirst
End Sub'Sintax untuk Hapus
Private Sub cmdkeluar_Click()
End
End Sub'Sintax untuk Keluar
Cukup sampai disini cara membuat sintax simpan, edit, hapus, dan keluar.
Silahkan Tinggalkan Komentar "Membuat Sintax Simpan Edit dan Hapus di Visual Basic "
Post a Comment