当前位置：首页 » 程序代码 » 正文

VB编程：计算100-300之间所有能被3和7整除的数据之和 （图）

用VB编程求100到300之间所有能被3和7整除的数之和，把结果结果输出到窗体。

解，画一个按钮控件，VB代码如下：

Private Sub Command1_Click()
    Dim sum As Integer
    sum = 0 '设初值
    Dim i As Integer
    For i = 100 To 300
        If 0 = i Mod 3 And 0 = i Mod 7 Then sum = sum + i ' 能被3整除并且被7整除,则累加
    Next i
    Print "100-300之间所有能被3和7整除的数据之和 = "; (sum) '循环结果就输出结果
End Sub

 

运行程序，效果图如下：

 

打赏 支付宝打赏 微信打赏

来源：济亨网

本文链接：http://wb86.com/post/132.html

VB代码  
    << 上一篇 下一篇 >>

    最近发表

    赞助商链接

    湘公网安备 43011102000514号 - 湘ICP备08100508号