All controls not clear in your code because if you have paste textbox inside panel or groupbox or any other control then in your code it will not check them all, it is clear contents of textbox which are on form directly.
so use below function(recursion)
Public Sub ClearAll(ByVal Frm As Control)
On Error Resume Next
Dim OutCtl As Control
For Each OutCtl In Frm.Controls
If OutCtl.Tag <> "save" Then
If OutCtl.Controls.Count > 0 Then
ClearAll(OutCtl)
Else
If TypeOf (OutCtl) Is TextBox And InStr(OutCtl.Tag.ToString, "save", CompareMethod.Text) <> 0 Then
OutCtl.Text = ""
End If
End If
End If
Next
End Sub
Happy Coding!
:)