例如：dim a as string ="(4+4)/(1+3)"
dim b as integer
b= ?(a)

能不能用什么方法将得到 b=2的值，我使用 val (a) 得到的值不正确。这个问题是在我编写一个工资图形化公式中遇到的，其中想达到将公式表达式存在数据库中，从字段中引用数值，在公式中各数值都都得到后进行统一计算（有十几项），我原来想逐项进行子程序处理计算，但程序编起来复杂，牵涉到括号等优先计算、数学函数等问题，各位高手有没有简单的方法？

此帖已终结，请看另一贴《在vb.net中将一个字符串算式转换为实际值？续》

[此贴子已经被作者于2006-9-24 0:34:59编辑过]

不会。

我只知道 CINT()

嘿嘿

公式表达式不能是常量，应是变量！

"("&a.tostring&"+"&b.tostring&")"&"/"&"("&c.tostring&"+"&d.tostring&")"---(参考插入数据表达式字段)

[此贴子已经被作者于2006-9-10 22:06:31编辑过]

谢谢 wuyumin ，可你的方法无法计算出结果。

用你規定的方法來讓用戶填寫+ - * /
就像計算器那樣

Val 函数在发现第一个不能将其识别为数字的字符时，将停止读入字符串。那些通常被认为是数值的一部分的符号和字符，例如美元符号与逗号，都不能被识别。但是该函数可以识别基数前缀 &O（八进制）和 &H（十六进制）。空白、制表符和换行符都会从参数中排除。
下式的返回值为 1615198：
Val(" 1615 198th Street N.E.")

看来只有用计算器的算法了

b = CInt((4 + 4) / (1 + 3))

试一下

Dim c As Object
c = a
b = CInt(c)

應該是js中的
eveal那種方法吧

vb.net沒找到