一个小问题^^^^^
有一个字符串 "[aaa]+[bbb]*0.5 "
怎么样变成 1aaa+1bbb*0.5
[解决办法]
如果格式肯定是这样的
那么
dim a as variant
dim s,s1,s2,s3 as stting
s= "[aaa]+[bbb]*0.5 "
s=replace(s, "[ ", "1 ")
s=replace(s, "] ", " ")
s1=split(s, "+ ")(0)
s3=split(s, "+ ")(1)
s2=split(s3, "* ")(0)
s3=split(s3, "* ")(1)
msgbox val(s1)+val(s2)*val(s3)
[解决办法]
aaa,bbb应该对应数值,把字符串改成计算表达式。
1000+val(aaa)+(1000+val(bbb))*0.5
是否这样?