¿Como puedo vaciar todos los campos de texto de un formulario?

ROSA SANJUAN
============

Private Sub BotonBorrar_Click()
     Dim ctl As Control
     For Each ctl In Me.Controls
            If clt.ControlType = acTextBox And ctl.Visible Then  ctl="" 
     Next
End sub