View Single Post
Old 01-26-2007   #110 (permalink)
goldfndr
Knight Tooth Puller
 
goldfndr's Avatar
 
Join Date: Aug 2004
Location: Bellevue, WA, USA
Posts: 182
Alas, there are a couple of minor edits to make. Line 453, which starts out as Case vbByte, needs to have the next line:
Quote:
If IsNumeric(vval) and CByte(vval) = vval Then Exit Function
changed to:
Quote:
If IsNumeric(vval) Then
If CByte(vval) = vval Then Exit Function
End If
to work properly. I don't know why I'm not able to use "and" in there, it must be a BASIC quirk.
__________________
For quickest response, catch me on IRC: #wigle
goldfndr is offline   Reply With Quote