• 爱情文章
  • 亲情文章
  • 友情文章
  • 生活随笔
  • 校园文章
  • 经典文章
  • 人生哲理
  • 励志文章
  • 搞笑文章
  • 心情日记
  • 英语文章
  • 范文大全
  • 作文大全
  • 新闻阅读
  • 当前位置: 山茶花美文网 > 爱情文章 > 正文

    [1000以内能被5整除的数之和的VBA代码]100以内能被7整除的数

    时间:2020-05-25来源:山茶花美文网 本文已影响 山茶花美文网手机站

    下面的两种代码,功能都是求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

    • [1000以内能被5整除的数之和的VBA代码]100以内能被7整除的数 相关文章:
    • 爱情文章
    • 亲情文章
    • 友情文章
    • 随笔
    • 哲理
    • 励志
    • 范文大全