将乐县十五天天气预报:真正的vb高手进来帮我解决

来源:百度文库 编辑:高校问答 时间:2024/04/27 03:34:19
private sub command1_click()
for n=1 to 20
if n Mod 3 <>0 Then m=m+n\3
next n
print n
end sub
这个程序在vb里面运行过了 ,单击命令按钮,结果是21
private sub command1_click()
for n=1 to 20
if n Mod 3 <>0 Then m=m+n\3
next n
print m
end sub
也正常运行了,结果的42
谁能给我讲讲上面的第一个程序的每个语句的意义,说的好的加分是必然的啦!

private sub command1_click() //单击command1
for n=1 to 20 //N=1 N1到20循环
if n Mod 3 <>0 Then m=m+n\3 //如果N与3取余不为0 M=M+N除3

*************("\"是整除只取除完的整数部分)*****************

next n
print n //打印N
end sub

private sub command1_click() //单击command1
for n=1 to 20 //N=1 N1到20循环
if n Mod 3 <>0 Then m=m+n\3 //如果N与3取余不为0 M=M+N除3
next n //循环结束
print m //打印M
end sub