Enter one-line summary

[GoogleCodeExporter]

hi.

i glad for using VB JSON parser.
then, i found loop permanently when a string "key" include a colon. 
so i changed "parseKey()" tentatively. as following:

         Case ":"
            If Not dquote And Not squote Then
               index = index + 1
               Exit Do
            ElseIf dquote And Not squote Then
                parseKey = parseKey & Char
               index = index + 1
            End If


just reported it.

thanks,
yamad

Original issue reported on code.google.com by yama...@gmail.com on 5 Sep 2009 at 6:17

[GoogleCodeExporter]

oh sorry, i forgot input the one-line summary.. 

Original comment by yama...@gmail.com on 5 Sep 2009 at 6:20