VB中怎样使文本1中输入的数学公式运算

要代码，在线等

在form中放入2个textbox和1个按钮，并且单击工程-〉部件，在框中加入“Microsoft Script Control”,添加完以后在工具箱找到它，放一个在form中即可使用

Private Sub Command1_Click()

On Error GoTo errhandler
ScriptControl1.Language = "vbscript"
Text2 = ScriptControl1.Eval(Text1)
Exit Sub

errhandler: MsgBox "出错了..."
End Sub

你是不是想在文本框中输入一个公式，然后用这个公式进行计算？ VB6不具有这种功能，因为执行方式的不同

转换成数字了！我是学java的 Interger.paseInt(1);