Muchas gracias, me sirvió, pero con una modificación:
Código:
If EsNulo(A) and EsNulo(B) Then
Iguales = True
ElseIf EsNulo(A) or EsNulo(B) Then
Iguales = False
ElseIf VarType(A) <> VarType(B) Then
Iguales = CStr(A) = CStr(B) No se por qué, a veces los valores enteros leidos de BD los toma como String, y al comparar un entero con un string me da False...
Lo mas raro es que comparaciones que antes daban ok ahora me dan mal resultado!!
Gracias por tu ayuda