public static void createArray ( ) {
   // creates and initializes a new three-dimensional Array of type Int32.
   Array myArr = Array.CreateInstance ( typeof ( Int32 ), 2, 3, 4 );

   for ( int i = myArr.GetLowerBound ( 0 ); i <= myArr.GetUpperBound ( 0 ); i++ ) {

      for ( int j = myArr.GetLowerBound ( 1 ); j <= myArr.GetUpperBound ( 1 ); j++ ) {

         for ( int k = myArr.GetLowerBound ( 2 ); k <= myArr.GetUpperBound ( 2 ); k++ ) {
            myArr.SetValue ( ( i*100 ) + ( j*10 ) +k, i, j, k );
         }
      }
   }
   // Displays the properties of the Array.
   Response.Write ( "The Array has " + myArr.Rank + 
      dimension (s) and a total of " + myArr.Length + " elements.", 
   Response.Write ( "   Length   Lower   Upper" );
   for ( int i = 0; i < myArr.Rank; i++ ) {
      Response.Write ( l + ": " + myArr.GetLength ( l ) );
      Response.Write ( myArr.GetLowerBound ( l ) + " " + myArr.GetUpperBound ( l ) );
   }
   // displays the contents of the Array.
   Response.Write ( "The Array contains the following values:" );
   printValues ( myArr );
}

public static void printValues ( Array myArr ) {
   System.Collections.IEnumerator myEnumerator = myArr.GetEnumerator ( );
   int i = 0;
   int cols = myArr.GetLength ( myArr.Rank - 1 );
   while ( myEnumerator.MoveNext ( ) ) {
      if ( i < cols ) {
         i++;
      } else  {
         i = 1;
      }
      Response.Write ( myEnumerator.Current );
   }
}

Public Shared Sub createArray ( )
   ' creates and initializes a new three-dimensional Array of type Int32.
   Dim myArr As Array = Array.CreateInstance ( GetType ( Int32 ), 2, 3, 4 )
   Dim i As Integer
   For i = myArr.GetLowerBound ( 0 ) To myArr.GetUpperBound ( 0 )
      Dim j As Integer
      For j = myArr.GetLowerBound ( 1 ) To myArr.GetUpperBound ( 1 )
         Dim k As Integer
         For k = myArr.GetLowerBound ( 2 ) To myArr.GetUpperBound ( 2 )
            myArr.SetValue ( i * 100 + j * 10 + k, i, j, k )
         Next k
      Next j
   Next i
   ' displays the properties of the Array.
   Response.Write ( "The Array has " + myArr.Rank +  _
      dimension (s) and a total of " + myArr.Length + " elements.", 
   Response.Write ( "   Length   Lower   Upper" )
   For i = 0 To myArr.Rank - 1
      Response.Write ( l + ": " + myArr.GetLength ( l ) )
      Response.Write ( myArr.GetLowerBound ( l ) + " " + myArr.GetUpperBound ( l ) )
   Next i
   ' displays the contents of the Array.
   Response.Write ( "The Array contains the following values:" )
   printValues ( myArr )
End Sub

Public Shared Sub printValues ( myArr As Array )
   Dim myEnumerator As System.Collections.IEnumerator = myArr.GetEnumerator ( )
   Dim i As Integer = 0
   Dim cols As Integer = myArr.GetLength ( myArr.Rank - 1 )
   While myEnumerator.MoveNext ( )
      If i < cols Then
         i += 1
      Else
         i = 1
      End If
      Response.Write ( myEnumerator.Current )
   End While
End Sub

public static function createArray ( ) {
   // creates and initializes a new three-dimensional Array of type Int32.
   var myArr : System.Array = System.Array.CreateInstance ( Int32, 2, 3, 4 );

   for ( var i : int = myArr.GetLowerBound ( 0 ); i <= myArr.GetUpperBound ( 0 ); i++ ) {

      for ( var j : int = myArr.GetLowerBound ( 1 ); j <= myArr.GetUpperBound ( 1 ); j++ ) {

         for ( var k : int = myArr.GetLowerBound ( 2 ); k <= myArr.GetUpperBound ( 2 ); k++ ) {
            myArr.SetValue ( Int32 ( ( i*100 ) + ( j*10 ) +k ), i, j, k );
         }
      }
   }
   // displays the properties of the Array.
   Response.Write ( "The Array has " + myArr.Rank + 
      dimension (s) and a total of " + myArr.Length + " elements.", 
   Response.Write ( "   Length   Lower   Upper" );
   for ( var l : int = 0; l < myArr.Rank; l++ ) {
      Response.Write ( l + ": " + myArr.GetLength ( l ) );
      Response.Write ( myArr.GetLowerBound ( l ) + " " + myArr.GetUpperBound ( l ) );
   }
   // displays the contents of the Array.
   Response.Write ( "The Array contains the following values:" );
   printValues ( myArr );
}

public static function printValues ( myArr : System.Array ) {
   var myEnumerator : System.Collections.IEnumerator = myArr.GetEnumerator ( );
   var i : int = 0;
   var cols : int = myArr.GetLength ( myArr.Rank - 1 );
   while ( myEnumerator.MoveNext ( ) ) {
      if ( i < cols ) {
         i++;
      } else {
         i = 1;
      }
      Response.Write ( myEnumerator.Current );
   }
}