[vb6] svuotare textbox su pressione bottone

[Pinco Pallino 2]

Com'è se metto sto codice nel form LOAD funziona:

Dim i as Textbox
For Each i In Form1
i.Text = ""
Next i

E se invece lo metto al click di un bottone mi da errore:

TIPO NON CORRISPONDENTE:....


CIAO!