VB编程求1到1000中能被3整除的数的个数
问题描述：
VB编程求1到1000中能被3整除的数的个数
在[1~1000]区间中的所有整数中,分别计算能被3整除的数的个数及能被7整除的数的个数,结果显示如题所示.要求：必须使用循环语句实现
答
dim num3,num7 as integerfor i=1 to 1000if i mod 3=0 then num3=num3+1end ifif i mod 7=0 then num7=num7+1end ifnext最后num3就是能被3整除的数的个数.num7是能被7整除的个数....