RosettaCodeData/Task/Create-a-two-dimensional-array-at-runtime/Visual-Basic-.NET/create-a-two-dimensional-array-at-runtime.vb

15 lines
407 B
VB.net
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Module Program
Sub Main()
Console.WriteLine("Enter two space-delimited integers:")
Dim input = Console.ReadLine().Split()
Dim rows = Integer.Parse(input(0))
Dim cols = Integer.Parse(input(1))
' VB uses max-index for array creation.
Dim arr(rows - 1, cols - 1) As Integer
arr(0, 0) = 2
Console.WriteLine(arr(0, 0))
End Sub
End Module