Imports System
Public Class Program
Public Shared Sub Main()
Dim arr As String() = {"VB", "c#", "java", "python", "c++"}
Dim size As Integer = arr.Length
For i As Integer = 0 To size - 1
Console.WriteLine(arr(i))
Next
End Sub
End Class
' run:
'
' VB
' c#
' java
' python
' c++
'