VB6 - JsonBag, Another JSON Parser/Generator

[mjk1165]

I am trying to parse a JSON file and am getting an error at this step:
Private Sub SkipWhitespace(ByRef Text As String)
CursorIn = CursorIn + StrSpn(StrPtr(Text) + 2 * (CursorIn - 1), PtrWhiteSpace)
End Sub

Compile error: type mismatch

Using VBA and Jsonbag 2.1