如何让用户自行输入方程式,并计算其结果?
文章作者 100test 发表时间 2007:12:29 12:10:35
来源 100Test.Com百考试题网
假设我们要让使用者在“方程式”栏位中自由输入方程式,然后利用方程式进行计算,则引用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 )