打印本文 打印本文  关闭窗口 关闭窗口  
如何让用户自行输入方程式，并计算其结果？
作者：佚名  文章来源：不详  点击数  更新时间：2008/4/18 14:54:50  文章录入：杜斌  责任编辑：杜斌
　　假设我们要让使用者在“方程式”栏位中自由输入方程式，然后利用方程式进行计算，则引用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 )

打印本文 打印本文  关闭窗口 关闭窗口