fork download
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim a(,) As Integer = {{0, 0}, {1, 2}, {2, 4}, {3, 6}, {4, 8}}
  6. Dim i, j As Integer
  7. ' output each array element's value '
  8. For i = 0 To 2
  9. For j = 0 To 1
  10. Console.WriteLine("a[{0},{1}] = {2}", i, j, a(i, j))
  11. Next j
  12. Next i
  13. Console.ReadKey()
  14.  
  15. End Sub
  16. End Class
Success #stdin #stdout 0.04s 24232KB
stdin
Standard input is empty
stdout
a[0,0] = 0
a[0,1] = 0
a[1,0] = 1
a[1,1] = 2
a[2,0] = 2
a[2,1] = 4