VB 怎么定义数组

 private static readonly int[,] cPatterns =
                     {
                        {2,1,2,2,2,2,0,0},  // 0
                        {2,2,2,1,2,2,0,0},  // 1
                        {2,2,2,2,2,1,0,0},  // 2
                        {1,2,1,2,2,3,0,0},  // 3...

这是C#的一段，如何转换成VB代码？

dim cPatterns(3,7)

'在过程里写下面的代码给数组赋值

cPatterns=array (array(2,1,2,2,2,2,0,0),array(2,1,2,2,2,2,0,0),array(2,1,2,2,2,2,0,0),array(2,1,2,2,2,2,0,0))