Menghapus Isi Semua TextBox

Mungkin Anda pernah membuat sebuah Form inputan yang mempunyai banyak kontrol TextBox didalamnya. Untuk melakukan perintah penghapusan seluruh isi semua TextBox, sebenarnya tidak harus menuliskan kode penghapusan text sebanyak TextBox yang ada. Cukup mengetikkan kode dibawah ini, maka isi semua keseluruhan TextBox yang ada dalam Form akan dihapus.

Dim Ctl As Control
For Each Ctl In Me.Controls
If TypeOf Ctl Is TextBox Then Ctl.Text = ""
Next