Константа-массив

[JohnK]

Как в VB сделать как в Delphi?

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

rwst: Array [0..43] of Array [0..2] of string[3] = (
('39', 'A', ''''), // 0
('40', 'A', '('), // 1
('41', 'A', ')'), // 2
('44', 'A', ','), // 3
...


[Хакер]

Никак.

[JohnK]

А что же делать?
Неужели нужно каждую константу вбивать ? Мне нужен двухмерный массив с 0 по 255 для перекодировки.

[Хакер]

Есть функция Array() для фабрикации Variant-массивов. Можешь воспользоваться ею, но это уже не константа-массив.

[JohnK]

Но так получится одномерный массив. Придется использовать два для имитации двухмерного

[Хакер]

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

    Dim x As Variant
   
    x = Array(Array(11, 12, 13, 14), _
              Array(21, 22, 23, 24), _
              Array(31, 32, 33, 34), _
              Array(41, 42, 43, 44))
             
    MsgBox x(0)(0) + x(3)(3) = 55

ы?

[JohnK]

Ну если только как вариант

[Денис]

JohnK
Константы исторически сделаны в целях оптимизации кода. В порядке исключения сделай переменную-массив. Чем тебя это не устраивает?

[JohnK]

Я не против, поэтому и молчу. Уже реализовал .