Imports System
Public Class Test
Public Shared Sub Main()
Dim arr(4) As String
arr(0) = "vb.net"
arr(1) = "c#"
arr(2) = "c"
arr(3) = "c++"
For i As Integer = 0 To arr.Length - 1
Console.WriteLine(arr(i))
Next
End Sub
End Class
' run
'
' vb.net
' c#
' c
' c++
'