When I need to do this I make sure all my text boxes have the same tag. eg 'TextBox'

Then you could do something like :

dim ctl as control

for each ctl in me
if ctl.tag = "TextBox" then ctl.Text = ""
next ctl

You have to trap the error which occurs when a control without a tag property is checked. Sorry can't remember it off hand, as all my VB stuff is at work.

Hope this helps.