永发信息网

vb中求100~200之间能被7整除的数 并没行5个数代码怎么写

答案:2  悬赏:60  手机版
解决时间 2021-02-18 20:54
vb中求100~200之间能被7整除的数 并没行5个数代码怎么写
最佳答案
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For i = 100 To 200
    If i Mod 7 = 0 Then
        Print i;
        n = n + 1
        If n Mod 5 = 0 Then
            Print
        End If
    End If
Next i
End Sub
全部回答
private sub command1_click() dim i as integer, c as integer c = 0 for i = 100 to 200 if i mod 3 = 0 and i mod 5 <> 0 then print i, c = c + 1 if c mod 5 = 0 then print end if next i end sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
什么理由可以推倒应酬
1000元左右的智能手机前置摄像头1300万像素的
鼎诺工艺礼品行地址在哪,我要去那里办事
砀山到马鞍山多少公里
林内牌JSQ16-C燃气热水器势接上电源,热水器
一道关于三角形的小学奥数题1、用同样的小棒
如图所示在直径AB=4的半圆O内做一个内接直角
“甴曱”怎样读
xtc750 xtc800哪个更值得入手
浙大到杭州电子科技大学(下沙校区)怎么走
我想做几个塑料件,要怎么做出来?
鸿辉小厨地址有知道的么?有点事想过去
普工的英文简称是什么
西安电子科技大学成教
昆明市有没有动漫周边店?就是卖一些COSPLAY
推荐资讯
现在是0.25英语怎么翻译?(时间)
脸上擦破皮涂什么药比较有用。
哈利波特哪1部书最好看,电影哪1部拍的最好
章丽君卫生室我想知道这个在什么地方
求奇迹辅助软件
看手机时间长了变红眼怎么办
在一个街心花园栽树,共有10棵树苗,要栽5行,平
张力在计算除法时,错把除数42写成24,结果商
电视显像管是因为何种原因而坏
古英语好听的女生名
图中①和②表示某精原细胞中的一段DNA分子,
中国邮政储蓄卡可以在apple官网买iphone7plus
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?