Нет, блин, не выходит.
Ни так ни этак.
Кроме того, я глянул, что Integer в VB6 2байтовый.
И справил, но лучше не стало.

Вижу, что всё упирается в массив так или иначе. Почему-то он некоректно размещён, хотя вроде бы всё ок.

Непобедимое какое-то...