DataBase Microsoft Visual Basic 6.0

Rumus/Syntax DataBase Pada Edit (CommandButton)
Sebelum menuliskan Syntax pastikan name data anda sesuai dengan yang anda tuliskan disyntax anda.

Private Sub EDIT_Click()

With Data1

.Recordset.EDIT

.Recordset.Fields(0) = Text1.Text

.Recordset.Fields(1) = Text2.Text

.Recordset.Fields(2) = Text3.Text

.Recordset.Fields(3) = Text4.Text

.Recordset.Fields(4) = Text5.Text

.Recordset.Update

End With

End Sub

Rumus ini menggunakan posisi field

Private Sub EDIT_Click()

Data1.Recordset.EDIT

Data1.Recordset.Fields!KODE_BARANG = Text1.Text

Data1.Recordset.Fields!NAMA_BARANG = Text2.Text

Data1.Recordset.Fields!HARGA_BARANG = Text3.Text

Data1.Recordset.Fields!JUMLAH = Text4.Text

Data1.Recordset.Fields!TOTAL = Text5.Text

Data1.Recordset.Update

End Sub

Rumus ini menggunakan nama field

catatan :
1. Disini saya menganti name commandbutton pada setip commandButton, jika anda tidak merubahnya maka sesuaikan pada name commandbutton yang sebenarnya.
2. Anda hanya cukup menggunakan salah satu rumus berikut.