>>8
Function CStr2(n)
If n<0 Then
 CStr2="-"+CStr2(-n)
ElseIf n<10 Then
 CStr2=CStr(n)
Else
  CStr2=CStr2(n\10)+CStr(n Mod 10)
End If
End Function