Crystal Reports Using loop to suppress Textobject

Message

   Hello Everyone 

There is a requirement in which  at times  I need to publish the entire report and at times only the database fields should appear ie all the textobjects should be suppressed. 

Now the reports are quite elaborate and I don’t want to write 
Textbox1.suppress = true for some 50 text boxes and then there are many such reports. 

So I’m looking for a code , which 

Uses the ForEach statement or ne other  ,  and then suppresses all the textobjects 

I’m not that deft in using objects. So it will be a gr8 help if one can send me the code for the same. 

I use VB6 and Crystal report 9 . 

Waiting Eagerly !! 
Thanks !!!