Imports System
Public Class Test
Public Shared Function f(ByVal arr() As String)
For i As Integer = 0 To arr.length - 1
Console.WriteLine(arr(i))
Next
End Function
Public Shared Sub Main()
f(New String() {"vb.net", "c", "c++", "java", "php"})
End Sub
End Class
' run
'
' vb.net
' c
' c++
' java
' php