怎么 输出 动态数组的所有元素

如何 输出 动态数组的所有元素
Module Module1

  Sub Main()
  Dim sMoths() As String = {"jan", "feb", "Mar", "Apr"}
  Console.WriteLine(sMoths(0)) ‘这里我想把 jan, feb, Mar, Apr 都输出来 怎么做？  
  End Sub

End Module


谢

[解决办法]
Module Module1 

Sub Main() 
Dim sMoths() As String = {"jan", "feb", "Mar", "Apr"} 
for each tstr is string in smoths
Console.WriteLine(tstr) ‘这里我想把 jan, feb, Mar, Apr 都输出来 怎么做？
next
End Sub 

End Module 

[解决办法]
Module Module1

Sub Main()
Dim sMoths() As String = {"jan", "feb", "Mar", "Apr"}
Dim i As Integer
For i = 0 To 3
Debug.WriteLine(sMoths(i))
Next
End Sub

End Module
这个是把结果输出到了输出窗口，可以在最后一行加断点。在输出窗口看到结果。