Question

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

Answer 1

Imports System

Public Class Program
	Public Shared Sub Main()
        Dim arr As Integer() = {3, 5, 6, 9, 0, 1, 7, 8, 2, 4, 11, 12}
        Dim rows As Integer = 3
        Dim cols As Integer = 4
        Dim index As Integer = 0
        Dim arr2d As Integer(,) = New Integer(rows - 1, cols - 1) {}

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

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

            Console.WriteLine()
        Next
    End Sub
End Class



  

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

 

70+ SQL courses for beginners and professionals