Problema con eficiencia

Hola a todos!!!
Vereis, tengo un problemilla con la eficiencia, ejecuto este codigo que os
pongo a continuacion

Dim Poblacion As New DataSet(Tabla)

Dim TextoComando As String

'TextoComando = "SELECT " & Campos & " FROM " & Tabla & " WHERE
msc7_ejercicio = " & msc7_ejercicio & ""

TextoComando = "SELECT msc7_subcuenta FROM " & Tabla & " WHERE
msc7_ejercicio = " & msc7_ejercicio & ""

Try

Dim l_sqlDAPoblacion As New SqlDataAdapter(TextoComando, conexion)

l_sqlDAPoblacion.Fill(Poblacion, Tabla)

Catch

Poblacion = New DataSet("Error")

End Try

Return Poblacion

La cuestion es que la consulta debe de devolver 1000000 de registros, y el
tiempo que usa es exagerado, la consulta se lanza contra un servidor de
sql expres, mi pregunta es la siguiente, habria alguna forma de hacer que
funcionase mas rapido??? Es posible que si la base de datos estubiese en
un servidor de sql no express funcionase mas rapido??



Gracias por vuestras respuestas, un saludo

Ademas de filtrado se puede realizar un paginado de los registros
trayendolos de a grupos chicos. Y si combinas filtrado y paginado todavia
mejor.


Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo
http://mvp.support.microsoft.com/pr...4EF5A4191C