怎么定义常量数组

如何定义常量数组
我要定义一个常量数组   dom   da(0   to   3,   0   to   3)   as   integer.他的内容是
0     1     2     3  
4     5     6     7  
8     9     10   11  
12   13   14   15  
不想去一个个去赋值.   应该如何定义呢.   我用的VB6

[解决办法]
写个循环语句,赋值就好了.
[解决办法]
for i = 0 to 3
for j = 0 to 3
da(i,j) =i * 4 + j
next
next
[解决办法]
即使你定义的是常量,难道在定义的时候就不用一个一个写么??
[解决办法]
只有能代码去初始你的数组,不能和C一样的,直接写的