hola amigos estoy pasando un programa de visual basic 6 visual studio 2008 no se actualizao el codigo por el asistente por se cambio la base de datos a sql server mi nueva conexion dispone de sqlConection, SqlDataAdapter, DataSet, BindingSource y DataTable, mi pergunta es como hago para referirme a el campo de una tabla de la BD, tengo entendido que puede ser con el DataSet pero mas que mas o sea DataSet.????? o si es con alguno de los otros objetos mencionados el codigo que debo de convertir es el siguiente:

If JugandoPleno = -1 Then
        MinMuerto = RstJuego("MuertaInicialPleno")
ElseIf JugandoPleno = 1 Then
        MinMuerto = RstJuego("MuertaInicialMedioPleno")
Else
        MinMuerto = RstJuego("MuertaInicial")
End If

donde RstJuego fue declaro como un RecordSet que para el nuevo codigo seria un DataSet verdad??
y "MuertaInicialPleno" es una campo de una tabla

el otro codigo con el que tengo problemas es:

SqlSelectCommand3.CommandText = "select * from medioPleno5
     where (((figuras)='" & Seleccion & "'))"
        MedioPLe5SqlDataAdapter.Fill(DsMedioPle5.medioPleno5)
        Limite = 24
Else
        SqlSelectCommand4.CommandText = "select * from
             medioPleno3 where (((figuras)='" & Seleccion & "'))"
        MedioPle3SqlDataAdapter.Fill(DsMedioPle3.medioPleno3)
        Limite = 14
End If

        'Abre el registro
RstFig = Base.OpenRecordset(Sql, dbOpenDynamic)

I = 0
For I = 0 To Limite
 If RstFig(I) = 0 Then
   Shape1(25 + I).BackColor = &HFF8080
 Else
  Shape1(25 + I).BackColor = &H8080FF
 End If
Next I

la parte donde estan las sentencias selects ya estan corregidas el problema esta desde la parte donde dice que abre el registro hacia abajo.
esa parte de codigo es para abrir la conexion con la bse de datos... pero mi conexion ya esta abierta entonces omito esa parte.
el for es para una coleccion de shapes(que ya no existen el visual 200 pero si yo no tengo esa coleccion sino que tengo varios pictureBox como me quedaria esa parte.
muchas gracias y espero que me colaboren.