Imports System
Public Class MatrixCorners
Public Shared Sub printMatrixCorners(ByVal matrix As Integer(,))
Console.WriteLine("left top corner: " & matrix(0, 0))
Console.WriteLine("right top corner: " & matrix(0, matrix.GetUpperBound(0) + 1))
Console.WriteLine("left bottom corner: " & matrix(matrix.GetUpperBound(1) - 1, 0))
Console.WriteLine("right bottom corner: " & matrix(matrix.GetUpperBound(1) - 1, matrix.GetUpperBound(0) + 1))
End Sub
Public Shared Sub Main(ByVal args As String())
Dim matrix(,) As Integer = New Integer(,) {
{1, 2, 3, 4},
{5, 6, 7, 8},
{9, 3, 2, 0}}
printMatrixCorners(matrix)
End Sub
End Class
' run:
'
' left top corner: 1
' right top corner: 4
' left bottom corner: 9
' right bottom corner: 0
'
