Cara Mengubah Isi Database dari Form VB

Materi berikutnya yaitu mangolah database dari form yang telah dibuat pada pertemuan sebelumnya, yaitu dengan menambahkan command button edit, tambah dan hapus seperti pada gambar berikut:
Cara Mengubah  Isi Database dari Form VB            

            Cara Mengubah  Isi Database dari Form VB            
- Masuk ke jendela kode editor
- Buat private sub sqlQuery untuk memudahkan anda memanggil perintah-perintah SQL pada private sub lainnya Cara Mengubah  Isi Database dari Form VB            

Private Sub sqlQuery(SQLstr As String)
cs.Execute SQLstr
End Sub
Cara Mengubah  Isi Database dari Form VB            
- Buat private sub kosong untuk mengosongkan isi text ketika button edit, tambah dan hapus di klik

Cara Mengubah  Isi Database dari Form VB            

Private Sub kosong()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
Cara Mengubah  Isi Database dari Form VB            
- Dobelklik pada button edit, kelik kode skrip berikut
Cara Mengubah  Isi Database dari Form VB            
Private Sub Command5_Click()
sqlQuery "Update nilai set nama ='" & Text2.Text & "', nilai = " & Text3.Text & " where id_nilai = " & Text1.Text & ";"
kosong
End Sub
Cara Mengubah  Isi Database dari Form VB            
- Dobelklik pada button tambah, ketik kode skrip berikut
Cara Mengubah  Isi Database dari Form VB            
Private Sub Command6_Click()
sqlQuery "INSERT INTO nilai values ('" & Text1.Text & "' ,'" & Text2.Text & "','" & Text3.Text & "');"
kosong
End Sub
Cara Mengubah  Isi Database dari Form VB
- Dobelklik pada button hapus, ketik kode skrip berikut

Cara Mengubah  Isi Database dari Form VB            

Private Sub Command7_Click()
sqlQuery "Delete from nilai where id_nilai = " & Text1.Text & ";"
kosong
End Sub

Cara Mengubah  Isi Database dari Form VB