| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 862 人关注过本帖
标题:想取值sum1,sum2,sum3....并相加得出总数
只看楼主 加入收藏
hp3325
Rank: 2
等 级:论坛游民
帖 子:29
专家分:26
注 册:2009-6-7
结帖率:33.33%
收藏
已结贴  问题点数:10 回复次数:6 
想取值sum1,sum2,sum3....并相加得出总数
我写了这个,但不知错在哪,想取值sum1,sum2,sum3....并相加得出总数
Dim i,Hdk
Hdk=0
For i=1 To 21
 Dim Hsaa&i : Hsaa&i=Easp.Post("sum&i:n")
 if Hsaa&i="" Then
 Hsaa&i=0
 Hdk=Hdk+Hsaa&i
 end if
Next
Easp.WC Hdk
2012-05-25 14:31
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:10 
Dim i,Hdk
Hdk=0
For i=1 To 21
 Dim Hsaa&i : Hsaa&i=Easp.Post("sum&i:n")'这个Easp是做什么用的?
 if Hsaa&i="" Then
    Hsaa&i=0
    Hdk=Hdk+Hsaa&i'你这个地方肯定出错,因为在vbs里&号代表连接字符串和变量+号代表数字相加,这两个符号不可以混用
 end if
Next
Easp.WC Hdk
2012-05-28 09:39
hp3325
Rank: 2
等 级:论坛游民
帖 子:29
专家分:26
注 册:2009-6-7
收藏
得分:0 
回复 2楼 yms123
如何改呀???
2012-06-07 13:47
sac精灵
Rank: 1
等 级:新手上路
帖 子:14
专家分:7
注 册:2012-6-4
收藏
得分:0 
Hsaa&i=0
Hdk=Hdk+Hsaa&i有问题
end if
Next
Easp.WC Hdk
2012-06-08 08:37
hp3325
Rank: 2
等 级:论坛游民
帖 子:29
专家分:26
注 册:2009-6-7
收藏
得分:0 
回复 4楼 sac精灵
好知道有问题,关键是如何改
2012-06-10 13:39
sky222
Rank: 4
等 级:业余侠客
威 望:1
帖 子:152
专家分:225
注 册:2010-3-11
收藏
得分:0 
Dim Hsaa&i 这个就有问题的,变量不能这样定义的

关键是楼住要达到什么效果
2012-06-13 17:25
sky222
Rank: 4
等 级:业余侠客
威 望:1
帖 子:152
专家分:225
注 册:2010-3-11
收藏
得分:0 
程序代码:
Dim i,s,t,sum
Redim t(10)
For i = 0 to 10
    t(i) = i'request.Form("sum"&i)
    response.Write t(i)
    sum = sum + t(i)
Next
response.Write sum 
2012-06-13 17:34
快速回复:想取值sum1,sum2,sum3....并相加得出总数
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.012190 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved