1000以内能被5整除的数之和的VBA代码

下面的两种代码，功能都是求1000以内能被5整除的数之和。

第一种代码

Sub 求1到1000之间能被5整除的数之和()

Dim I&, J&

For I = 0 To 1000 Step 5

J = J + I

Next

MsgBox "1到1000之间能被5整除的数之和为" & J

End Sub

第二种代码

Sub 求1到1000之间能被5整除的数之和2()

Dim I&, J&

For I = 100 To 1 Step -5

J = J + I

Next

MsgBox "1到1000之间能被5整除的数之和为" & J

End Sub

赞 (0)

相关推荐

  • Linux如何修改文件打开数

    操作系统版本：Redhat 5.4 问题背景：Tsung压力测试，想要尽可能多地建立tcp请求，发现每次只能建立1013个请求。 原因分析：Linux默认的文件打开数是1024，减掉其他地方用掉的11 ...

  • 如何统计word中修订条数（Word如何分别统计里面的的插入和删除的字数）

    如何统计word中修订条数（Word如何分别统计里面的的插入和删除的字数）

    客户发来的文档开启了跟踪修订模式,如何分别统计里面的的插入和删除的字数,使用Word VBA搞定.VBA代码Sub TrackChangeCount() Dim lInsertsWords As Lo ...

  • C++几种常见的素数判断算法

    求解一个算法,我们首先要知道它的数学含义.依据这个原则,首先我们要知道什么是素数.; 素数是这样的整数,它除了表示为它自己和1的乘积以外,无论他表示为任何两个整数的乘积. 找素数的方法多种多样. 1: ...

  • VBA代码编写技巧

    方法1：尽量使用VBA原有的属性、方法和Worksheet函数 由于Excel对象多达百多个，对象的属性、方法、事件多不胜数，对于初学者来说可能对它们不全部了解，这就产生了编程者经常编写与Excel对 ...

  • IIS是什么意思,什么是IIS连接数

    　IIS是Internet Information Services的缩写，是一个World Wide Web server。Gopher server和FTP server全部包容在里面。 IIS意 ...

  • nginx 502 Bad Gateway 错误解决办法

    一些运行在Nginx上的网站有时候会出现"502 Bad Gateway"错误,有些时候甚至频繁的出现.以下是小编搜集整理的一些Nginx 502错误的排查方法,供参考: Ngin ...

  • 今日头条广告如何投放？今日头条广告后台操作说明

    相关术语概念 广告组:广告组是管理广告计划/广告创意的大单位. 广告计划:管理关键词/创意的小单位. 广告创意:广告展现的最终形式,包括创意素材.创意标题.附加创意.应用来源等. 预算:在指定投放时间 ...

  • 企业微信和微信有什么不同

    企业微信和微信有什么不同

    随着私域概念的爆火,企业微信已成为当下一众品牌做线上私域营销的首选工具.据腾讯官方披露,截止2022年1月,企业微信活跃用户数量为1.8亿,企业与组织数1000万,服务的微信活跃数5亿,覆盖行业无数. ...

  • windows平台下java编程判断素数

    windows平台下 fortran编程 判断素数 素数: 除了1和它本身外 不能被其他自然数整除的数称之为素数 操作方法 01 [新建工程] 02 [新建类] 03 [编写代码] public cl ...