在vb中输出一个在1至500中被7除余5,被5除于3的整数，急

在vb中输出一个在1至500中被7除余5,被5除于3的整数，急

sub s()
    dim i%
    for i=1 to 500
        if i mod 7=5 and i mod 5=3 then
            print i
            exit for
        end if
     next
end sub
追问：
知道为什么么
追答：vba不支持直接print，可以用msgbox i

如图

追问：

追答：你用的是vb。net？
追问：vb
追答：看样子是net的
追问：
这个应该怎么做
追答：net我帮不了你我用是6.0
追问：o.o
追答：我out了啦
追问：考试挂了...
追答：你在考试？我晕
追问：开卷考的那种，

fori=1to500
if i\7=5 andi\5=3 then print i:goto10
next
print"没有符合要求的数"
10end
用这个就可以
追答：输错了，代码里的\改成mod
追问：
这个是为什么
追答：如果窗口没有设置其他输出控件，可以用这种方式直接输出结果。把Print i改成 debug.print i 就可以了。所有的print都应该是debug.print回答这个问题时，代码写的都是简化的，所以语句细节不全。抱歉啊！