注册 登录
编程论坛 VB6论坛

请问老师,VB中的累加如何累加到指定值停止累加啊?

pxinfo 发布于 2020-07-10 23:39, 1375 次点击
请问老师,VB中的累加如何累加到指定值停止累加啊?
例如要求积分累加到35分就不累加了,然后统计累加区间的序号、最大序号以及奖分。
下表积分累加到第5行,超过35分就不向下累加了, 序号区间是1-5,最大序号为5,区间内奖分34分。
序号    积分  奖分
  1      10
  2       0    20
  3      15
  4       0    14
  5      20
  6      15
  7      12

请问老师这个代码应该怎么实现啊?
1 回复
#2
cwa99582020-07-11 08:11
这说明你连vb最基础的知识还没有掌握。
定义一个累加变量,判断这个值是不是大于35
for i=1 to 7
 值=值+数据
if 值 >35 then
  exit for
endif
next
  停止累加
  处理数据

还有,你的这些数据是保存在哪里的,要说明清楚。不同的数据有不同的代码。
1