Module Module1
Sub Main()
PrintArray()
PrintArray(5)
PrintArray(98, 8)
PrintArray(3, 45, 2)
PrintArray(999, 34, 1, 9283)
End Sub
Sub PrintArray(ParamArray arr() As Integer)
Console.WriteLine("Array Length: " + arr.Length.ToString())
For Each n As Integer In arr
Console.WriteLine(n)
Next
End Sub
End Module
' run:
'
' Array Length: 0
' Array Length : 1
' 5
' Array Length : 2
' 98
' 8
' Array Length : 3
' 3
' 45
' 2
' Array Length : 4
' 999
' 34
' 1
' 9283