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

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

本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。