search

johnenowak / vba-json

Automatically exported from code.google.com/p/vba-json
0 stars 0 forks source link

Redundant vbCrLf #18

Open GoogleCodeExporter opened 9 years ago

GoogleCodeExporter commented 9 years ago 
The code lines
1) in skipchar():
While index > 0 And index <= Len(str) And InStr(vbCr & vbLf & vbTab & " ", 
Mid(str, index, 1)) 

and

2) If InStr(vbCrLf & vbCr & vbLf & vbTab & " ", char) Then

The first vbCrLf & 
is redundant as it duplicates vbCr & vbLf
AND char is only one character anyway.

(Thanks for fix to parsenumber btw)

Original issue reported on code.google.com by OBeirne....@gmail.com on 28 Mar 2014 at 2:41