I used this code and I got Null for each case, so I'm not sure what the problem is, as the help file seems to be correct here.
Public Sub StrCompTest()
Dim x1 As Variant
Dim x2 As Variant
Dim x3 As Variant
x2 = "ABC": x3 = Null
x1 = StrComp(x2, x3, vbBinaryCompare)
Debug.Print x1...