为什么显示只有一行啊？？？高人指点啊

Private Sub Command1_Click()
Dim A(6) As Long
Dim I As Long
'Picture1.Cls
For I = 0 To 6
  A(I) = I
  Picture1.Print A(I);
Next I
Print
End Sub
输出的是01234560123456.....
只有一行而已啊,
怎么变成0123456
  0123456
  .
  .

只有一行呀，没有楼主你说换行的情况呀 。

只有保存到一个字符串变量中然后一起输出来。
VB code

Private Sub Command1_Click()
Dim A(6) As Long
Dim I As Long
Dim s$
'Picture1.Cls
For I = 0 To 6
  A(I) = I
  
  s = s & A(I)
Next I
Picture1.Print s
Print
End Sub

VB code

Private Sub Command1_Click()
Dim A(6) As Long
Dim I As Long
'Picture1.Cls
For I = 0 To 6
  A(I) = I
  Picture1.Print A(I)
Next I
Print
End Sub