VB 问题 100到200能被3或被5整除的数，每行输出10个数 代码要怎么写啊？

Question

如题所述

Answer 1

Private Sub Form_Click()

    Dim i As Integer, n As Integer

    Cls

    n = 0

    For i = 100 To 200

        If i Mod 3 = 0 Or i Mod 5 = 0 Then

            Print i;

            n = n + 1

            If n Mod 10 = 0 Then Print

        End If

    Next

End Sub

Answer 2

dim i as integer
dim n as integer
for i=100 to 200
if i mod 3=0 or i mod 5=0 then
print i&" " ;
n=n+1
if n mod 10=0 then print
end if
next本回答被提问者采纳