让用户自行输入方程式，并计算其结果

文章出处：网络转载 作者：未知　发布时间：2006-07-28 收藏到QQ书签

假设我们要让使用者在“方程式”栏位中自由输入方程式，然后利用方程式进行计算，则引用ScriptControl控件可以很方便地做到。
(ScriptControl控件附属于VB6.0，如果安装后没有看到此一控件，可在光盘的\Common\Tools\VB\Script目录底下找此一控件，其.文件名为Msscript.ocx。)假设放在窗体上的ScriptControl控件名称为ScriptControl1，则在“计算”按钮的Click事件中编写如下代码：DimStatementAsStringStatement="X=" Text1.Text vbCrLf _"Y=" Text2.Text vbCrLf _"MsgBox""计算结果=""&Y"ScriptControl1.ExecuteStatement(Statement)->