Array length

'https://rosettacode.org/wiki/Array_length
Imports System
Module Program
    Sub Main(args As String())
        Dim siList As Short() = {1, 2, 3, 4, 5, 6, 7, 8, 9, 0}

        Console.WriteLine(siList.Count)

    End Sub
End Module