1樓：刀建設殳靜
vb裡面也有一數學計算中的公式啊
如abs()是最絕對值等..
vb如何處理數學表示式
2樓：匿名使用者
private declare function ebexecuteline lib "vba6.dll" _
(byval stringtoexec as long, byval any1 as long, _
byval any2 as long, byval checkonly as long) as long
dim variable as variant
function executecode(code as string, optional checkonly as boolean) as boolean
executecode = ebexecuteline(strptr(code), 0&, 0&, checkonly) = 0
end function
private sub command1_click()
dim code as string
code = replace(text1.text, vbcrlf, ":")
call executecode(code)
end sub
private sub form_load()
text1.text = "a=(1+2)*3-52+cos(1)" + vbcrlf + " variable=a" + vbcrlf + " msgbox a"
label1.caption = "請在文字框中輸一段**，看看效果"
end sub
把陣列oprt()中的資料相應轉換為你設定的運算元或符號後加入text1字串.....應該沒什麼問題了,vb6中測試通過
在vb中，如何將數學公式轉化成vb的表示式？有沒有這方面的書籍？
在vb中如何將文字框中輸入的文字轉化為數學表示式
3樓：
private declare function ebexecuteline& lib "vba6.dll" _
(byval ex1&, byval uk1&, byval uk2&, byval fc&)
private function exline(scode$, optional opt1 as boolean) as boolean
exline = ebexecuteline(strptr(scode), 0&, 0&, abs(opt1))
end function
private sub command1_click()
exline "dim x as double"
exline "x = " & text1.text
exline "msgbox x"
end sub
不知道你說的數學表示式是什麼意思，難道你輸的文字不是表示式？這段**就是計算文字中表示式的值。
4樓：匿名使用者
用val(text1.text)函式就可以
在PHP正規表示式中雙引號與單引號有什麼區別，雙引號裡哪些需要轉義，單引號裡又是哪些需要轉義
雙引號裡面的可以轉義，單引號裡面的不能轉義，比如簡單的 d代表數字，那麼在單引號裡面就不代表數字。單引號內部的變數不會執行 雙引號會執行 如 name hello echo the name 會輸出 the hello 而如果是單引號 name hello echo the name 會輸出 the...
VB中如何程式設計讓窗體在螢幕上左右來回移動
新增一個定時器，定時器移動，超過螢幕自動回來。如下 dim m as integer 定義變數，確定移動方向private sub form load timer1.interval 200 移動時間 0.2秒移一次 me.left 0 左空初始為0 m 0 預設先向右移 end sub priva...
正規表示式中兩個不同的匹配條件怎麼在一條語句裡執行
1 開啟sublime text3編輯器，新建一個py檔案。import re，也就是引入regular expression正規表示式庫。2 test re.compile r print test.findall 666 888 如果要匹配星號，只需要在前面加上反斜槓。3 如果不加上反斜槓就會出...