Проблемма с массивом структур

[Dethlord]

В модуле:
Public Structure NEYRON
Public DNA() as String
End Structure


В форме:

Dim NET(0 to 50) as NEYRON
REdim NET(0 to 50).DNA(0 to 50)
NET(49).DNA(0)="ГЦЦГ"


Данный код вызовет ошибку (а именно последняя строка):В экземпляре не заданна сылка на обьект.

Так почему код начинает работать при такой ситуации если последнюю строку заменить на

NET(50).DNA(0)="ГЦЦГ"

Я весь день сидел так и не понял че за тема?
Причем реализовывая массив структур руководвовался MSDN.
Бред какой-то.
Что предложите?

[Nord777]

Массивы в Net начинаются с нуля, поэтому нет необходимости в такой форме записи Dim NET(0 to 50) As NEYRON

1) Dim NET(50) As NEYRON - выделил память под массив структур типа NEYRON, размером в 51 элемент
2) ReDim NET(50).DNA(50) - Для пятьдесят первой структуры NEYRON выделил память под массив строк размером в пятьдесят один элемент
3) NET(49).DNA(0) = "ГЦЦГ" - Для пятидесятой структуры не была выделена память под массив типа String, поэтому исключение.

Что предложите?

Для каждой структуры в массиве NET делать инициализацию строкового массива DNA

Код: Выделить всё

        For i As Integer = 0 To NET.Length - 1
            ReDim NET(i).DNA(50)
        Next

или так, оба варианта идентичны

        For i As Integer = 0 To NET.Length - 1
            NET(i).DNA = New String(50) {}
        Next

[Dethlord]

СПАСИБИЩЕ БОЛЬШОЕ
Я смысл уловил
но почему например нам не потребовалось проитись и по DNA вот так:

Код: Выделить всё

For t=0  as integer to 50
Redim NET(i).DNA(i)
next t


такое чувство что программа коректно понимает DNA(50) но не понимает NET(50)(в более раннем примере)
это из за спецефичности ситуации? или не доработка системы программирования?
СПАСИБО!!!

[Nord777]

но почему например нам не потребовалось проитись и по DNA вот так:

Я ничего не понял, сформулируй свой вопрос более ясно. Если ты хочешь одним оператором инициализировать несколько массивов, то это не получится.

[Sebas]

Жёсткая проверка типов стоит?

Redim "редимит" только массив структур 50го элемента. Что тут не понятно? Есстестно 49 нах.

[Nord777]

Жёсткая проверка типов стоит?

А это-то тут каким боком? У него ссылочный тип(Public DNA() as String) в структуре = Nothing, отсюда и исключение. При чем тут проверка типов...