Поправьте код, плз

[d3drm]

у меня есть массив, я его хочу заполнить подобным образом, но что-то так выдает ошибку... Поправьте код, плз!

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

Dim Indecies() As Integer
Indecies(0) = Array(0, 1, 2, 0, 2, 3, 4, 0, 3, 5, 0, 4, 0, 6, 1, 5, 6, 0, 7, 2, 1, 7, 1, 8, 9, 5, 4, 9, 4, 10, 6, 8, 1, 11, 8, 6, 9, 11, 6, 9, 6, 5)

[Amed]

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

Dim Indecies
Indecies = Array(0, 1, 2, 0, 2, 3, 4, 0, 3, 5, 0, 4, 0, 6, 1, 5, 6, 0, 7, 2, 1, 7, 1, 8, 9, 5, 4, 9, 4, 10, 6, 8, 1, 11, 8, 6, 9, 11, 6, 9, 6, 5)


[d3drm]

Да, я уже так и сделал, все равно спасибо

[A.A.Z.]

d3drm, убери, плиз, из твоей проги генерирование желтым шрифтом - читаемость и так не на высоте, а с ним ваще близка к нулю

[_Мика_]

Да.. и шоб шрифтом одинаковым писал!

[d3drm]

желтый убрал, хотя мне так нравица желтый... А вот на счет размера мне Amed клевую штуку посоветовал )))