用VB程序编写程序输出50～200之间不能同时被3和7整除的自然数,并统计其个数

Sub Main()    dim i as integer, n as integer        n = 0    for i = 50 to 200        if i mod 3 <> 0 and i mod 7 <> 0 then n = n + 1    next        messagebox nEnd Sub 再问： 谢谢你再问： next 后面一句不懂 再答： 那个不懂意义不大，你当成 Print n 来理解就行了。再问： 哦，thankyou 再答： Dim i As Integer, n As Integer  n = 0For i = 50 To 200    If i Mod 3 = 0 And i Mod 7 = 0 Then    Else        n = n + 1    End IfNextPrint nEnd谢谢x11提醒。