Evaluate a string expression like a math function

Just add a textbox (txtEval), a command button (cmdEval), a reference to the Microsoft Script Control 1.0 and here you go :

VB Code:

Private Sub cmdEval_Click()
    Dim objSC As New MSScriptControl.ScriptControl
    
    objSC.Language = "javascript"
    
    MsgBox objSC.Eval(txtEval.Text)
End Sub