Rumus DataBase Pada Tambah (CommandButton)
Jika anda tidak merubah name dari CommandButton anda maka sesuaiakanlah dengan name yang asli yang ada. Disini saya menggunakan name yang saya rubah sesuai dengan fungsi Tombol Tersebut.
contoh penulisan rumus :
Private
Sub Tambah_Click()
Bersih
Text1.SetFocus
TAMBAH.Enabled
= False
SIMPAN.Enabled
= True
End
Sub
Bersih merupakan rumus yang telah anda tulis tadi diGeneral.
Setfocus untuk memindahkan kursor ditempat yang dituju.
Enabled false tombol tidak aktif
Enabled True tombol aktif.
Tidak ada komentar:
Posting Komentar