Private Sub Command1_Click()
Dim a As Integer
For a = 100 To 200 Step 1
If a Mod 5 = 0 And a Mod 3 <> 0 Then
Print a
End If
Next a
End Sub
Dim i As Integer
Dim a As String = ""
For i = 100 To 200
If i Mod 5 = 0 And i Mod 3 <> 0 Then
a = a & " ," & i
End If
Next
Next
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024