- Код: Выделить всё
Module Module1
Sub Main()
Dim arrarr(300, 300, 300, 300) As Double '
arrarr(1, 1, 1, 1) = 11
arrarr(1, 1, 1, 1) = 111
Debug.Print(arrarr(1, 1, 1, 1))
End Sub
End Module
Если в определении мпссива поставить такую строчку, то прокатывает:
- Код: Выделить всё
Dim arrarr(103, 103, 103, 103) As Double '
Свободной памяти у меня 1 Гб. Может в этом дело?
Такая математика: 300*300*300*300*8 байт?
