OK, guys, here is the code. It is a program for logistic regression taken (with permission from the author) at
http://www.statpages.org/logistic.html (source code). Disregard the stringsigns ($). I know they are not necessary but I am translating from an older basic for PSION code which I made a few years ago.....
just run the program and it errors with a formatexception.
I assume the error in is this part:
IF ChkbxGrouped.Checked = TRUE then
'for zeros
d = SubString(v,0,StrIndexOf(v,",",0)) 'what is value left of comma for zeros
IF d > MaxX then MaxX = d 'set MaxX
IF d < MinX then MinX = d 'set MinX
Y0 (i) = d
sY0 = sY0+d
v = SubString(v,StrIndexOf(v,",",0)+1,1) 'reset dd$, right of comma
d = SubString(v,0,StrIndexOf(v,",",0)) 'what is value left of comma for zeros
'for ones
'what is value left for ones
Y1(i) = d
sY1 = sY1+d
ELSE
IF IsNumber(v) then
Select v
Case 0
Y0(i) = 1
sY0 = sY0+1
Case 1
Y1(i) = 1
sY1 = sY1+1
End Select
END IF
END IF
sC = sC+(Y0(i)+Y1(i))
END IF '// end check if string <> empty
thnx for the trouble......
Marc