Sum = 0
For i = 100 To 300
If i Mod 21 = 0 Then
Sum = Sum + i
End If
Next
==>
优化一点：
Sum = 0
For i = 100 To 300
If i Mod 21 = 0 Then
Sum = Sum + i
i = i + 20
End If
Next