0

Buenos dias tengo este codigo en visual basic access :

Dim nom As String
Dim nro As String
nom = nombre
nro = (nro_identificacion)
MsgBox (nro)
intx = DCount("*", "[historial]", "[nro_identificacion]= " & nro&)

y en la linea intx me da el error (El carácter de declaración de tipo no coincide con el tipo de datos declarado) El campo nro_identificacion es texto de 20 caracteres y la quiero comparar con la variable nro tipo string. tomo el dato de la tabla 1 y la busco en la tabla 2 con el mismo campo en las 2. no encuentro la solucion a esto por favor quier pueda prestarme ayuda lo agradeceria...

6
  • no sobra un & al final?
    – gbianchi
    Commented el 3 jun. 2019 a las 15:13
  • Lo elimine y ahora me da error 2471 (la expresion que ha especificado como parametro de la consulta produjo el error x)
    – Arturo
    Commented el 3 jun. 2019 a las 15:19
  • Y ese error lo buscaste? que es error x? por favor, actualiza tu pregunta.
    – gbianchi
    Commented el 3 jun. 2019 a las 15:27
  • Ese es simplemente el contenido de la variable nro
    – Arturo
    Commented el 3 jun. 2019 a las 15:43
  • Podrias mirar Cómo preguntar. Por favor aclara tu pregunta.
    – gbianchi
    Commented el 3 jun. 2019 a las 15:44

1 respuesta 1

1

Bueno tenes dos errores mas que sustanciales.

Primero el & al final de la instruccion no tiene ningun sentido. & se usa para concatenar variables. En este caso, despues de nro no se para que lo estas usando...

O en realidad si se para que,

El problema es que copiaste este codigo, y no entendiste lo que estabas copiando. Si nro_identificacion es un campo de tipo string, entonces la consulta para ese campo debe ser en un campo rodeado con comillas simples '

entonces tu instrucción deberia ser:

intx = DCount("*", "[historial]", "[nro_identificacion]= '" & nro & "'")
0

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge you have read our privacy policy.

¿No es la respuesta que buscas? Examina otras preguntas con la etiqueta o formula tu propia pregunta.