首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

一个小疑点^

2012-01-15 
一个小问题^^^^^有一个字符串 [aaa]+[bbb]*0.5 怎么样变成1aaa+1bbb*0.5 [解决办法]如果格式肯定是这样

一个小问题^^^^^
有一个字符串 "[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
是否这样?

热点排行