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