Necesito información para realizar un programa en Visual Basic con valores de una base de datos

Imagino que esos criterios los usas para consultar otra base de datos u otra tabla de la misma base. Hasta ahí no creo que haya problemas.
Pero no entiendo a qué te refieres con "leer" el criterio, ni cómo no te deja el IF.
¿No te deja hacer esto?
If RecordSet1("estado")="loquesea" Then
...
End If
¿Es eso?
¿Qué quieres hacer exactamente? ¿Podrías concretar un poco?

dim criterio as string
el adodc1.recordset("edad") va a contener edad <> 50
criterio="edad <> 50"
if criterio then
...
Endif

No, claro, eso no se puede hacer (salvo que uses VBScript, que no es el caso).
En este caso lo que tienes que hacer es "parsear" la cadena, lo cual es tedioso.
Siguiendo tu ejemplo:
Const Operadores="<>="
Const Part1=1,Operador=2,Part2=3,
dim op(3) as String
dim x as integer
dim c as string*1
dim i as integer
i=1
for x=1 to len(criterio)
c=mid(criterio,x,1)
if c<>" " then
if instr(operadores,c)>0 then
'Comienza el operador
if i=Part1 then i=Operador
else
'Termina el operador
if i=Operador then i=Part2
end if
op(i)=op(i) & c
end if
next
Esto debería separar la expresión en sus tres componentes:
op(1)="edad"
op(2)="<>"
op(3)="50"
Luego tendrías que tener mucha paciencia:
Select Case op(1)
case "edad":
if Evalua(edad,op(2),op(3) then
...
end if
case "otracosa":
...
End Select
Como verás, he metido una función "Evalua", que tendría este aspecto
Function Evalua(a as variant,b as string,c as string) as Boolean
Dim Val as Variant, op as string*1
Val=iif(isNumeric(a),CCur(c),c)
select case mid(b,1)
case ">":
evalua=(a>val)
case "<":
evalua=(a<val)
case "=":
evalua=(a=val)
case else:
evalua=false
end select
if len(b)>1 then
evalua=evalua and evalua(a,mid(b,2),c)
end function
Esta función se puede ampliar con lo que te de la gana, pero así funciona muy bien.
Bueno, todo esto lo he tecleado de corrido y ´sin probarlo, así que es posible que te vaya algún bug por ahí.
Espero haberte ayudado. En caso contrario, avísame.

TE AGRADEZCO MUCHO tu respuesta, ya que has sido el único que me ha podido ayudar.
Si utilizase vbscript, como lo haría que diferencia hay entre visual y vbscript