Cita:
Iniciado por mumo2006 
Estimado.
Primero que todo gracias por su ayuda.
Pero lamentablemente me sigue dando ese error o mas bien arrojandome un "0" como resultado en el label.
Que podrá ser???
Repasando tu código veo que declaras la variable 'txtsql' como integer y después le asignas una cadena. Esto debería dar un error de no coincidencia de tipos al asignarle la cadena, pero lo salta por la instrucción On Error Resume Next y claro, siempre devuelve cero.
Conclusión: Declara la variable txtsql como
string y procura usar la instrucción On Error.. lo menos posible (solamente en aquellos casos que conozcas el error y deba seguir ejecutándose el código).
