在vb中，我想每行5个数，但是出来后变成了这样：请各位帮忙给修改并指出不足，谢了！

a = 0
b = 0
c = 1
n = 3
Print a, b, c
Do
d = a + b + c
n = n + 1
a = b
b = c
c = d
Print d
If n Mod 5 = 0 Then Print
Loop While d <= 500

Print a, b, c,
Print d,
这两句最后加一个逗号

不明白为什么n的初值你要设为3 那之后的n mod 5 是从4开始的吧？那第一行肯定不是五个数啊 还有就是print d 是要换行的吧，如果记得没错的话好像是print d;

你好！ 你的代码不上来怎么知道你想干嘛的？ Private Sub Form_Click() Dim a, b, c, d, e, f a = "1" b = "2" c = "3" d = "4" e = "5" f = "6" Print a + b + c + d + e + Chr(13) + f End Sub 打字不易，采纳哦！