RosettaCodeData/Task/Array-length/Gambas/array-length.gambas

Public Sub Main()
Dim siList As Short[] = [1, 2, 3, 4, 5, 6, 7, 8, 9, 0]

Print siList.Count

End