瑞星卡卡安全论坛

一个字符串，如 465.3MB，如何能成为数值 465.3 ??

dim sString as String
sString = "11.2MB "

dim fResult as Double
dim sTemp as String
sTemp = Trim(sString)
fResult = CDbl( left(sTemp, len(sTemp)-2) ) '去掉右边的"MB", 然后转为Double类型

replace("465.3MB","MB","")

hao

附件: 675825200666215204.jpg

冰马的程序可以.但考虑到有时候后面的的字符不一定是MB,所以可以考虑直接检验字符串的ASCII是否是数字.如果是就保留.然后把获取的字符串再象冰马的代码那样转换成相应的数值就行了.具体程序参考冰马的吧.

用VAL（）可不可以呢

dim Str1 as integer

str1=val("55.3MB")
楼主试试，不过MB之后如果还有数值的话那后面的数值也是不能保留下来的










Q币充值热链：
http://rich.qq.com/spr/code_pay.shtml?Spid=sprv1&Comment1=645986721&p=1&
加入QQ会员热链：（有优惠券送，到http://645986721.qzone.qq.com领取!!!）
http://rich.qq.com/spr/code_pay.shtml?Spid=sprv1&Comment1=645986721&p=2&