Mengosongkan Textbox banyak dengan coding sedikit

Thread kali ini saya buat untuk para newbie..
mungkin bagi seorang newbie pernah terlintas pertanyaan,Bagaimana caranya untuk membuatkan source code visual basic yang bisa mengosongkan puluhan textbox dengan cara yang cepat??

Memang sih kalau kita lagi buat program, dengan banyaknya kontrol dalam satu form kita juga butuh cara agar bagaimana bisa mengosongkan form dengan cara yang cepat.

Nah berikut ini adalah Contoh Source yang saya buat untuk mempermudah kita dalam mengosongkan textbox dengan cara cepat. dalam kasus ini saya menggunakan fungsi perulangan for. Berikut Sourcenya :

Disini kita buat Sub baru di general.

Untuk Fungsi Bersih

sub bersih()

for each a in me
If TypeName(a)="TextBox" then
a.Text=""
end if
Next a

end sub

Penjelasan :

Dalam kasus ini kita menggunakan perulangan for untuk setiap variabel a didalam form
Di dalam fungsi for kita buat sebuah pernyataan yang akan kita ulang menggunakan fungsi for yaitu

If TypeName(a)="TextBox" then
a.Text=""
end if

maksud dari pernyataan di atas adalah jika type variabel a adalah sebuah objek textbox maka ia akan mengeksekusi fungsi bersih yaitu a.Text="".

Perhatian :
Dalam penulisan TextBox harus benar seperti di atas jika anda menuliskannya dengan textbox memakai huruf kecil semua maka pernyataan di atas tidak dapat mengeksekusi a.Text="" karna penulisan tidak dikenali program.

Berikut Untuk fungsi nonaktifnya :

sub nonaktif()

for each a in me
If TypeName(a)="TextBox" then
a.Enabled= False
end if
Next a

end sub

Posted in: source code vb