请问VB是否有表达式运算的函数,如:"12/3",返回值是4

Question

请问VB是否有表达式运算的函数,如:
"12/3",返回值是4
"2*4",返回值是8
"1+2",返回值是3
"5-1",返回值是4
谢谢!

Answer 1

添加一个microsoft script contorl
然后
ScriptControl1.Eval("12/3")

Answer 2

想简单吗？写成sql让它执行。

Answer 3

to : shortppsy(小河) 
想简单吗？写成sql让它执行。-----------------------------------我刚刚想到用SQL的,谢谢!

Answer 4

为什么动不动就想到让数据库算东西？启动ADO，连接，通讯，让数据库计算，返回数据集，得到结果还要释放几个对象。效率那么低的事情就为了省几行代码。如果你的程序和数据库无关怎么办

Answer 5

to : chewinggum(口香糖·个人二五计划第一年)为什么动不动就想到让数据库算东西？启动ADO，连接，通讯，让数据库计算，返回数据集，得到结果还要释放几个对象。效率那么低的事情就为了省几行代码。如果你的程序和数据库无关怎么办-------------------------------------------------------------------------刚好我的应用是必须连接数据库的.
大哥,有什么好方法?我不想自定义一个函数,这样一来要用到词法分析,怕怕!
楼上那位大哥教的方法试过,不行: 回复人：iget(悟不透) ( 四级(中级)) 信誉：100  2007-9-11 12:32:53  得分:0添加一个microsoft script contorl 然后 ScriptControl1.Eval("12/3")-------------------------------------------------------------------提示:实时错误:'-2147467259(80004005):
The operation could net be completed becucause the script engine has not been initialized to a valid language

Answer 6

Dim s As New ScriptControl
s.Language = "vbscript"
s.Eval ("msgbox (12/3)")

Answer 7

谢谢:
zzyong00(阿勇),shortppsy(小河) ,iget(悟不透)