Está ese código muy raro
Haces un Datos.Qconsultas.Open y luego asignas un datasource que no se sabe de dónde viene y trabajas con lo que parece ser el datasource asignado a algún tipo de grid
¿Para qué sirve entonces el Qconsultas si no lo usas para nada?