[RESOLVED] Compute expression

Hello.
Is there any VB function which allows to compute an expression?

Example:
In a textbox input:"2+2"

On button click
msgbox compute (me.text1)


Thank you

Add a reference to the component: Microsoft Script Control 1.0

Code:

---

Private Sub Command1_Click()
Dim script As ScriptControl
Set script = New ScriptControl
script.Language = "VBScript"
Debug.Print script.Eval("2+2")
End Sub

---

You could add the Microsoft Script Control to your Form and the use code simular to this:

vb Code:

MsgBox ScriptControl1.Eval(Text1.Text)

Edit: I'm just too slow today :)

Add a Microsoft Script Control to your components. Add new component to your form. use like

Code:

---

ScriptControl1.Eval("2+2")

---

There are some examples here. search and see.
:wave:

I m damn slow, as usual :D

Awesome...
Thank you