allora, un metodo te lo do però è un po' grezzo...
codice:
for i=0 to NUM_ELEMENTI
try
dim temp as new Textbox= Ctype(TableLayoutPanel1.Controls.item(i)),Textbox)
if (i mod 3)==0
'fai qualcosa
else if (i mod 2)==0
'fai qualcos'altro
endif
catch ex as InvalidcastException
'il controllo non era una textbox, il framework lancia un'eccezione e non fa nulla
finally
temp=nothing
end try
next
in poche parole prova a fargli una conversione di tipo forzata. se fallisce viene lanciata un'eccezione e il codice salta al blocco catch che non fa nulla e, di conseguenza, passa al prossimo elmento del for