Problema con consultas anidadas

[Highlander]

Hola el asunto es que tengo varias consultas con ciclos anidados, por ejemplo:

Código:

    sql = "SELECT RECIPE_RECIPE.NDB_No_Con, RECIPE_RECIPE.Recipe_Can FROM RECIPE_RECIPE WHERE RECIPE_RECIPE.NDB_No_Recipe = " & Codigo
        cmd = New SqlCommand(sql, conexionSqlEx)
        rs = cmd.ExecuteReader()


        While rs.Read

            'POR CADA SUBRECETA
            Dim CodigoSubReceta As String = rs.GetOrdinal("NDB_No_Con")
            Dim CanSubReceta As Decimal = rs.GetOrdinal("Recipe_Can")

            'Codigo y cantidad de subreceta
            CodigoSubReceta = rs.GetString(CodigoSubReceta)
            CanSubReceta = rs.GetDecimal(CanSubReceta)

            'OBTENGO LOS VALORES NUTRICIONALES DE LAS SUBRECETAS

            Dim GramosSubReceta As Decimal = (CanSubReceta * 100) / CanTotalIngrediente

            Dim sql3 As String = "SELECT RECIPE_NUT_DATA.NDB_No, RECIPE_NUT_DATA.Nutr_Val FROM RECIPE_NUT_DATA WHERE NDB_No = " & CodigoSubReceta
            Dim cmd3 As SqlCommand = New SqlCommand(sql3, conexionSqlEx)

           Dim rs3 As SqlDataReader = cmd3.ExecuteReader()

        

        End While

Cuando el codigo llega a la linea:

Dim rs3 As SqlDataReader = cmd3.ExecuteReader()

Se produce el problema (al menos eso creo yo pq si lo comento los demas datagridview se llenan bien) no da ningun error eso si.

Tengo definido MultipleActiveResultSets=True

Estoy haciendo algo mal?