Question

How to initialize three dimensional int array in VB.NET

Answer 1

Imports System

Public Class Program
	Public Shared Sub Main()
        Dim array3d As Integer(,,) = New Integer(,,) {
        { {1, 2, 3, 4},
          {5, 6, 7, 8}},
        { {10, 20, 30, 40},
          {50, 60, 70, 80}},
        { {9, 10, 11, 12},
          {13, 14, 15, 16}}}

        For i As Integer = 0 To array3d.GetLength(0) - 1
            For j As Integer = 0 To array3d.GetLength(1) - 1
                For k As Integer = 0 To array3d.GetLength(2) - 1
                    Console.Write("{0} ", array3d(i, j, k))
                Next
                Console.WriteLine()
            Next
            Console.WriteLine()
        Next
    End Sub
End Class


  

  
  
' run:
' 
' 1 2 3 4 
' 5 6 7 8 
' 
' 10 20 30 40 
' 50 60 70 80 
' 
' 9 10 11 12 
' 13 14 15 16
'

 

70+ SQL courses for beginners and professionals