14 lines
407 B
Text
14 lines
407 B
Text
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
|