为什么Prompt只打印一次最后一次

poople

请教一个Prompt打印问题，上码先：

1. Private Sub test()
   
2.     Dim i As Integer
   
3.     For i = 0 To 5
   
4.         ThisDrawing.Utility.Prompt vbCr & "This is the " & i & " time!"
   
5.     Next
   
6. End Sub
   

Private Sub test()<br />     Dim i As Integer<br />     For i = 0 To 5<br />         ThisDrawing.Utility.Prompt vbCr & "This is the " & i & " time!"<br />     Next<br /> End Sub<br />

这是一个简单的测试代码，运行后命令栏里只有打印一行，“This is the 5 time!”，不知道是何故，如何解决，谢谢！

poople

找到答案了，将改vbCr为vbCrLf即可，正无语啊！