关于ScriptControl1控件！up有分！

Question

因为ExecuteStatement是一个过程，没有返回值

Answer 1

仔细看看帮助吧!
你写的很奇怪阿
Statement = "X=" + Text1.Text + vbCrLf + "Y=" + Text2.Text + vbCrLf + ""
是什么意思?
你想定义两个变量?
   MsgBox "计算结果=" & ScriptControl1.ExecuteStatement(Statement)
两个变量怎么会有计算结果??

Answer 2

如果是简单的求一个式字结果:sub command1_click()
dim s as string 
s="12341*3-233"msgbox "result:" & scriptcontrol1.eval(s)end sub