1   1  /  1  页   跳转页

VB 字符串转数值问题

收藏
∮冰狐√
头像
初生襁褓狮
  • 帖子:60
  • 注册: 2006-03-07
  • 来自:
发表于： 2006-05-30 16:21 | 只看楼主 短消息 资料
字号： 小 中 大 1楼

VB 字符串转数值问题

一个字符串，如 465.3MB，如何能成为数值 465.3 ??
最后编辑2006-06-12 21:33:30
分享到：
gototop
 
冰马
头像
社区嘉宾
  • 帖子:566
  • 注册: 2004-07-30
  • 来自:
发表于： 2006-06-02 14:21 | 短消息 资料
字号： 小 中 大 2楼


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类型
gototop
 
croci
头像
快乐黄口狮
  • 帖子:88
  • 注册: 2002-12-16
  • 来自:
发表于： 2006-06-02 16:35 | 短消息 资料
字号： 小 中 大 3楼

replace("465.3MB","MB","")
gototop
 
逍遥蝶君
头像
初生襁褓狮
  • 帖子:11
  • 注册: 2006-04-02
  • 来自:
发表于： 2006-06-06 21:59 | 短消息 资料
字号： 小 中 大 4楼

hao

附件附件:

下载次数:2395
文件类型:image/pjpeg
文件大小:
上传时间:2006-6-6 21:59:49
描述:
预览信息:EXIF信息
gototop
 
江湖游客
头像
社区嘉宾
  • 帖子:3938
  • 注册: 2002-12-07
  • 来自:
发表于： 2006-06-07 10:04 | 短消息 资料
字号： 小 中 大 5楼

冰马的程序可以.但考虑到有时候后面的的字符不一定是MB,所以可以考虑直接检验字符串的ASCII是否是数字.如果是就保留.然后把获取的字符串再象冰马的代码那样转换成相应的数值就行了.具体程序参考冰马的吧.
gototop
 
暗　　影
头像
初生襁褓狮
  • 帖子:32
  • 注册: 2006-06-12
  • 来自:
发表于： 2006-06-12 21:41 | 短消息 资料
字号： 小 中 大 6楼

用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&
gototop
 
<<上一主题|下一主题>>
1   1  /  1  页   跳转页
页面顶部
Powered by Discuz!NT