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 17/12/2023