액세스 필드는 같지만 같지 않습니까?

Question

나는 두 개의 레코드를 비교하기 위해 다음 코드를 사용하고 있습니다 :

For i = 1 To (recordsetA.Fields.Count - 1) 
    If recordsetA.Fields(i).Value <> recordsetB.Fields(i).Value Then 
     stringFieldList = stringFieldList & ", " & recordsetA.Fields(i).Name 
    End If 
Next i 

는 그러나 stringFieldList에 같은 값을 (같은 1339.5)이 필드의 몇 가지가 있습니다. 왜?

Answer 1

이중 데이터 유형을 다루는 것처럼 들리므로 적절한 테스트 방법은 한계를 설정 한 다음 절대 차이를 테스트하는 것입니다. null 값 처리에 대해서도 고려해야합니다.

Const epsilon as double = 0.00001 

If Abs(recordsetA.Fields(i).Value - recordsetB.Fields(i).Value) < epsilon Then 
'do stuff here 
End If