解析表达示的问题

Question

Dim ISExpresssion As BooleanDim strExp As String
一个字符串的表达示
strExp ="1 = 1"
我想知道这个表达示是否返回true 或 false
ISExpresssion = CBool(strExp)那个大哥知道,请告知,立刻给分

Answer 1

你的确切目的是什么，不太清楚
是只要1等于1，就返回True
还是其他的

Answer 2

dim a() as string
dim strexp as string
Dim ISExpresssion As Booleanstrexp="1=1"a=split(strexp,"=")if a(0)=a(1) then
   ISExpresssion =True
else
   ISExpresssion =False
endif

Answer 3

谢谢但是这样解不是我的目地
你这样是可以把这个简单的表达示求出来是否正确,但有一个前提条件就是你必须知道要分离的比较运算符,如果不知道这个比较运算符你这个就不能用了,还有更复杂的表达示怎么办IsDate (变量) And IsDate ( 变量 ) And 变量 =  1 And CDate ( 变量 ) > CDate ( 变量 )

Answer 4

比如，如果每个表达式都需要输入一个等号或> 或<之类，可在这些输入时判断各个值，并及时计算并保存，同时将你需要返回的结果True或False也跟着保存，下次不必计算机，直接取出相关的值。

Answer 5

哥们不是那么简单的,要存一个整个的表达示,可能里面有if  ---- else  -----  end if 
或者有vb自带的函数,但是我想有没有一种函数据一个表达示放在字符串内,然后把它转换成一个真正的表达示不是一个字符串
就象我们在把变量COPY到DEBUG内用一个?加上变量名那种,不就不用解析表达示了吗?
不知道那位大哥有招

Answer 6

if 你的表达式 then 
过程处理
else
过程处理
end if