假設我們要讓使用者在“方程式”欄位中自由輸入方程式,然後利用方程式進行計算,則引用ScriptControl控件可以很方便地做到。
(ScriptControl控件附屬於VB6.0,如果安裝後沒有看到此一控件,可在光盤的CommonToolsVBScript目錄底下找此一控件,其.文件名為Msscript.ocx。)假設放在窗體上的ScriptControl控件名稱為ScriptControl1,則在“計算”按鈕的Click事件中編寫如下代碼:DimStatementAsStringStatement="X=" Text1.Text vbCrLf _"Y=" Text2.Text vbCrLf _"MsgBox""計算結果=""&Y"ScriptControl1.ExecuteStatement(Statement)->