expression$ = "x^2 - 7"
Print (EvaluateWithX(expression$, 5) - EvaluateWithX(expression$, 3))
End

Function EvaluateWithX(expression$, x)
    EvaluateWithX = Eval(expression$)
End Function