Imports System
Public Module Module1
Public Sub Main()
Dim Grid(3,3) As String
Dim Row as Integer
Dim Column As Integer
For Column = 1 To 3
For Row = 1 To 3
Grid(Column,Row) = x
console.writeline(Grid(Column,Row))
Next
End Sub
End Module