in vb6 i have this working:
VB Code:
  1. rsvar.Open "select * from clients", cn, adOpenKeyset, adLockOptimistic

  2.     For Each Control In cad_clientes.Controls

  3.     If TypeOf Control Is TextBox Then

  4.         Set Control.DataSource = rsvar

  5.     End If

  6.     Next Control

how can i do the same thing in VB.Net??

Thank you,
Guilherme