[RESOLVED] Cannot end a while-loop. Error message

Hi

I get an error message when compiling the following code:

REST = 10
While REST >= 0.001
REST = 0
HJXS = XS
XS = XS - (XS * XS * XS + AKS(2) * XS ^ 2 + AKM(3) * XS + AKM(4)) / (3 * XS ^ 2 + 2 * AKM(2) * XS + AKM(3))
REST = REST + Abs(HJXS - XS)
End While

The error is: "Compile error: Expected: If or Select or Sub or Function or Property or Type or With or Enum or end of statement"

I found the syntax for the while-loop on Microsoft's webpage.. I really can't see what is wrong. Note that I use no "Dim REST (...)" statement anywhere.. could this be an issue? I hope you can help me.



Best regards,

Søren