Imports System

​

Public Module Module1

​

    public sub Main()

        dim sColours(,) = {{"red", "FFOOOO"}, {"green", "00FF00"}, {"Blue", "0000FF"}, {"yellow", "FFFF00"}, {"cyan", "00FFFF"}, {"magenta", "FF00FF"}}

        dim iRow as integer

        dim iCol as integer

        for iRow = 0 to 5

            for iCol = 0 to 1

                console.writeline(sColours(iRow, iCol))

            next iCol

        next iRow

    End Sub

End Module

​