51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 3791|回复: 10
打印 上一主题 下一主题

[原创] 请问怎么让两个百分比的值相加?

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2006-2-24 17:50:57 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
比如:10% + 50%

提示类型错误……怎么办啊?

先谢了~
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

11#
发表于 2006-2-27 18:13:03 | 只看该作者
但是replace在大范围字符串搜索的时候效率是不高的,不过在这个例子里面可能区别不大。
回复 支持 反对

使用道具 举报

该用户从未签到

10#
 楼主| 发表于 2006-2-27 14:55:22 | 只看该作者
嗯,这样可行~~

不过还是Replace简洁~~
回复 支持 反对

使用道具 举报

该用户从未签到

9#
发表于 2006-2-27 14:50:55 | 只看该作者
Dim i,iPos1,iPos2
iPos1=InStrRev(datatable("value1",1),"%",-1,1)-1
iPos2=InStrRev(datatable("value2",1),"%",-1,1)-1
i=Cstr(CInt(left(datatable("value1",1),iPos1))+Cint(left(datatable("value2",1),iPos2)))+"%"
这样就不用担心位数了.
回复 支持 反对

使用道具 举报

该用户从未签到

8#
 楼主| 发表于 2006-2-27 14:34:57 | 只看该作者
本来我也像楼上这么想,可是要超过2位就不行了……
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2006-2-27 13:59:05 | 只看该作者
把%去掉.

如果value1和value2都是2位,且都把值传入datatable中:
Cstr(CInt(left(datatable("value1",1),2))+Cint(left(datatable("value2",1),2)))+"%"
如果位数不定就再修改修改吧。
(初学VBScript,可能还有好的办法吧.)
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2006-2-27 13:56:59 | 只看该作者
嗯,精简了不少。
回复 支持 反对

使用道具 举报

该用户从未签到

5#
 楼主| 发表于 2006-2-27 13:42:29 | 只看该作者
成功了,多谢多谢!!
我编程能力不行啊~~~



另外,我缩减了一下,结果一样:

a = "1%"
a = replace (a,"%","")
b = "2%"
b = replace (b,"%","")

c = (Cint(a)+Cint(b))/100
c = formatpercent(c)
msgbox c

[ 本帖最后由 Horus_Ra 于 2006-2-27 13:47 编辑 ]
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2006-2-27 13:36:28 | 只看该作者
a =  "1%"
a=replace (a,"%","")
a = asc(a)
a= a-48

b = "2%"
b = replace(b,"%","")
b = asc(b)
b= b-48

c = (a+b)/100

c = formatpercent(c)

msgbox c

看看可以吗,如果有问题请回复!
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2006-2-27 09:25:37 | 只看该作者
问题是,这个值是我从界面上取出来的,取出来就带百分号……怎么替换啊?
回复 支持 反对

使用道具 举报

  • TA的每日心情
    难过
    2015-4-23 14:35
  • 签到天数: 3 天

    连续签到: 1 天

    [LV.2]测试排长

    2#
    发表于 2006-2-25 10:44:05 | 只看该作者
    %符号改成/100,即10/100+50/100
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-23 15:32 , Processed in 0.075942 second(s), 28 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表