Syntax ini berfungsi untuk membersihkan tampilan awal
dari Form anda.
Ketikan Syntax seperti berikut :
Private Sub BERSIH()
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
Text10.Text = ""
Text11.Text = ""
Option1.Value = False
Option2.Value = False
Option1.Value = False
Option2.Value = False
Check1.Value = 0
Check2.Value = 0
Check3.Value = 0
Check4.Value = 0
Check5.Value = 0
Combo1.Text = ""
TAMBAH.Enabled = True
SIMPAN.Enabled = False
EDIT.Enabled = False
HAPUS.Enabled = False
End Sub
Tidak ada komentar:
Posting Komentar