[问题求助] 麻烦修改VBS代码分20行显示指定数字

1078292299

分20行，显示红框中的数字，谢谢！

麻烦修改以下代码：

For i = 1 To 100
If i Mod 5 <> 0 Then
j = j & vbTab & i
Else
j = j & vbTab & i & vbCrLf
End If
Next
MsgBox j
复制代码

1078292299

本人已实现。