Question

How to pass matrix to function as parameter in VB.NET

Answer 1

Imports System

Public Class Program
	Public Shared Sub print(ByVal matrix As Integer(,))
        Dim rows As Integer = matrix.GetLength(0)
        Dim cols As Integer = matrix.GetLength(1)

        For i As Integer = 0 To rows - 1

            For j As Integer = 0 To cols - 1
                Console.Write(matrix(i, j) & " ")
            Next

            Console.WriteLine()
        Next
    End Sub

    Public Shared Sub Main()
        Dim matrix As Integer(,) = {
									{1, 2, 3},
									{4, 5, 6},
									{7, 8, 9}}
        print(matrix)
    End Sub
End Class





' run:
'
' 1 2 3 
' 4 5 6 
' 7 8 9
'

 

70+ SQL courses for beginners and professionals