Ketiklah Syntax berikut ini :
Private Sub BERSIH()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Combo1.Text = ""
TAMBAH.Enabled = True
SIMPAN.Enabled = False
EDIT.Enabled = False
HAPUS.Enabled = False
End Sub
Tidak ada komentar:
Posting Komentar