ClearCtrl
Dim Obj As Object Screen.MousePointer = 11 For Each Obj In Me If TypeOf Obj Is TextBox Then Obj.Text = "" End If Next Screen.MousePointer = 0
Dim Obj As Object
Screen.MousePointer = 11
For Each Obj In Me
If TypeOf Obj Is TextBox Then
Obj.Text = ""
End If
Next
Screen.MousePointer = 0
(clearctrl.html)- by Paolo Puglisi - Modifica del 25/3/2019