不知版上有没人用VB6这种古老的东西

dim a(10)
a(0)=Array(1,7,3,8,5,6,4,8)
a(1)=Array(3,2,3,4,5,5,7,8)
a(2)=Array(6,2,6,4,2,6,4,8)
a(3)=Array(7,2,3,4,3,9,7,8)
以上定义在VB6里是合法的，运行不出错。
但在VB.NET里却提示“对于用显式界限声明的数组不允许进行显式初始化”，

如果用.NET来重写这个该怎么写？
--
FROM 119.145.141.*