一个小问题^^^^^ 有一个字符串"[aaa]+[bbb]*0.5"怎么样变成 1aaa+1bbb*0.5 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 s="[aaa]+[bbb]*0.5"s=replace(s,"[","1")s=replace(s,"]","") 如果格式肯定是这样的那么dim a as variantdim s,s1,s2,s3 as sttings="[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是否这样? 大神帮帮忙啊 请问VB操作excel问题 最后10分求个问题,网页判断登陆 请高手们指点一下... Timer的属性Interval的值不能超过5,但我要设置一个较大的数值怎么办啊? 关于ADO控件的简单用法 一个简单的小问题:如何使用seek定位文件的读写位置 执行阶段错误“713”应用程式或物件上的错误,200分求救,分不够在加 寻找高手解决小问题(已过三天没人答对) 一台电脑怎么连两台打印机 急!急!问大家一个菜鸟问题。 vb6生成的可执行文件怎么运行不了啊! 请高手进来看看crystal report 的问题
s=replace(s,"[","1")
s=replace(s,"]","")
那么
dim a as variant
dim s,s1,s2,s3 as sttings="[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)
1000+val(aaa)+(1000+val(bbb))*0.5
是否这样?