在vb中怎么做连续多少个自然数相加大于1000
答案:2 悬赏:20 手机版
解决时间 2021-10-13 15:45
- 提问者网友：爱唱彩虹
- 2021-10-12 19:24
在vb中怎么做连续多少个自然数相加大于1000
最佳答案
- 五星知识达人网友：人類模型
- 2021-10-12 20:38
PrivateSubForm_Load()Dimi,sumAsIntegerFori=1To1000sum=sum+iIf(sum>1000)ThenPrintiExitForEndIfNextEndEndSub
全部回答
- 1楼网友：西岸风
- 2021-10-12 20:49
dimiasintegerdimsumasintegerdoi=i+1sum=sum+iloopwhilesum>1000debug.printi
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯