要找出1到100里能被2整除的数，用VB怎么叙述？ Private Sub Command1_Click() For a = 1 To 10 If a Mod 2

Question

Private Sub Command1_Click()

For a = 1 To 10
If a Mod 2 = 0 Then a = a + 1
Next
Print a

这个哪里错误了？
题目说错了，是1到10

Answer 1

Private Sub Command1_Click()
For a = 1 To 10
If a Mod 2 = 0 Then Print a
Next a
end sub
for 循环里 a是自增的，无需再a=a+1了

Answer 2

Debug.Print a