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

[youlitai0116]

Module Module1

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

End Module


谢

[taick]

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

[dlmeijianyu]

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
这个是把结果输出到了输出窗口，可以在最后一行加断点。在输出窗口看到结果。

[dlmeijianyu]

Debug换成Console也可以。Console.WriteLine(sMoths(i))