如何让用户自行输入方程式,并计算其结果?
假设我们想让用户在“方程”字段自由输入方程,然后用方程进行计算,方便参考ScriptControl控件。
( ScriptControl附加在VB 6.0上。如果安装后没有看到这个控件,可以在光盘上的\Common\Tools\VB\Script目录下找到这个控件。其文件名为Msscript.ocx )
假设放在窗体上的ScriptControl控件的名称为ScriptControl1,在calculate按钮的Click事件中编写以下代码:dim statement as string statement = " x = "+text 1 . text+vbcrlf+_ " y = "+text 2 . text+vbcrlf+_ " msgbox " " calculation result = " " & y " script control 1 . execute statement(语句
0条评论