RosettaCodeData/Task/Array-length/VBScript/array-length.vb

3 lines
85 B
VB.net

arr = Array("apple","orange")
WScript.StdOut.WriteLine UBound(arr) - LBound(arr) + 1