小编Dan*_*iro的帖子

下面的代码就ok了。

Dim myNumber As Long
If myNumber = 4 Or myNumber = 7 Or myNumber = 10 Or myNumber = 13 Or myNumber = 16 Or myNumber = 19 Or myNumber = 22 Then
    MsgBox "Hello"
End If

如何根据这个串行逻辑来缩短上面的代码？

4、4 +3、4+ 3+3、4 +3+3+3、4 +3+3+3+3、4 +3+3+3+3+3，依此类推。