How to convert a two-dimensional array to one-dimensional array in VB.NET

1 Answer

0 votes
Imports System

Public Class Program
	Public Shared Sub Main()
        Dim array2d As Integer(,) = {
					{4, 6},
					{5, 7},
					{0, 1},
					{9, 12},
					{8, 16},
					{69, 98}}
        Dim index As Integer = 0
        Dim rows As Integer = array2d.GetLength(0)
        Dim cols As Integer = array2d.GetLength(1)
        Dim arr As Integer() = New Integer(rows * cols - 1) {}

        For i As Integer = 0 To cols - 1
            For j As Integer = 0 To rows - 1
                arr(index) = array2d(j, i)
                index += 1
            Next
        Next

        For Each n As Integer In arr
            Console.Write(n & " ")
        Next
    End Sub
End Class

  

  
  
' run:
' 
' 4 5 0 9 8 69 6 7 1 12 16 98
'

 



answered Sep 5, 2021 by avibootz
...