How to combine two 2D arrays by summing element‑by‑element in VB.NET

1 Answer

0 votes
Imports System

Module Program

    Sub Main()
        Dim a(,) As Integer = {
            {1, 2},
            {3, 4}
        }

        Dim b(,) As Integer = {
            {10, 20},
            {30, 40}
        }

        Dim rows As Integer = a.GetLength(0)
        Dim cols As Integer = a.GetLength(1)

        Dim merged(rows - 1, cols - 1) As Integer

        For i As Integer = 0 To rows - 1
            For j As Integer = 0 To cols - 1
                merged(i, j) = a(i, j) + b(i, j)
            Next
        Next

        PrintMatrix(merged)
    End Sub

    Sub PrintMatrix(arr(,) As Integer)
        For i As Integer = 0 To arr.GetLength(0) - 1
            For j As Integer = 0 To arr.GetLength(1) - 1
                Console.Write(arr(i, j) & " ")
            Next
            Console.WriteLine()
        Next
    End Sub

End Module


' run:
'
' 11 22 
' 33 44 
'

 



answered Jan 25 by avibootz

Related questions

...