Interesting Case Of Invalid Attempt To MetaData When Reader Is Closed.

I was going to post a long message but I found the problem. Yet I do not know how to correct it efficiently.
I have a request to my DB using that kind of code :
         With SQL_Commande
            valiSqlConnection(True)
            ' Configure SQL_Commande.
            .Connection = SQL_Connection
            .CommandText = "_Fonctions_valiUtilInfo"
            .CommandType = Data.CommandType.StoredProcedure
            .Parameters.Clear()
            Dim SQL_Lecteur As SqlDataReader = SQL_Commande.ExecuteReader
            If SQL_Lecteur.Read And Not IsDBNull(SQL_Lecteur(0)) Then Return SQL_Lecteur(0) Else Return Nothing
            valiSqlConnection(False, SQL_Lecteur)
        End With
My problem is that I need use a function within the "With" section, and that function calls a request on the DB then closes the query, and when it gets back at executing the remaining part of the code, it stop saying that the query is closed and cannot be excuted anymore. How can I nest a query within an other one without having this problem?