?? 65.txt
字號(hào):
如何讓用戶自行輸入方程式，并計(jì)算其結(jié)果？
假設(shè)我們要讓使用者在“方程式”欄位中自由輸入方程式，然后利用方程式進(jìn)行計(jì)算，則引用ScriptControl控件可以很方便地做到。
( ScriptControl 控件附屬于VB 6.0，如果安裝后沒(méi)有看到此一控件，可在光盤(pán)的 \Common\Tools\VB\Script 目錄底下找此一控件， 其.文件名為Msscript.ocx。) 假設(shè)放在窗體上的ScriptControl控件名稱為ScriptControl1，則在“計(jì)算”按鈕的Click事件中編寫(xiě)如下代碼： Dim Statement As String Statement = "X=" + Text1.Text + vbCrLf + _ "Y=" + Text2.Text + vbCrLf + _ "MsgBox ""計(jì)算結(jié)果="" & Y " ScriptControl1.ExecuteStatement( Statement )
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -