DataBase Microsoft Visual Basic 6.0

Rumus/Syntax DataBase Pada Tambah (CommandButton)

Private Sub TAMBAH_Click()

BERSIH

Text1.SetFocus

SIMPAN.Enabled = True

TAMBAH.Enabled = False

End Sub

catatan :
disini saya menganti name commandbutton pada setip commandButton, jika anda tidak merubahnya maka sesuaikan pada name commandbutton yang sebenarnya.