SQL Connection and loop through rows VB.NET


' set up the connection
Dim myConn as new SqlConnection ( _
   "server=(local)\NetSDK; trusted_connection=yes; database=northwind" ) 

' set up the query
Dim myCmd as new SqlDataAdapter ( _
   "select * from customers", myConn ) 

' instantiate dataset object
Dim myData as new DataSet ( ) 
' fill with query results
myCmd.Fill ( myData, "Customers" ) 

' display dataset contents
foreach table as DataTable in myData.Tables
   foreach row as DataRow in table.Rows
      foreach col as DataColumn in table.Columns
         Response.Write ( row ( col ).ToString ( ) ) 
      next
   next
next