У меня есть задача перенести старый код VB6 в проект .NET. Все шло гладко с преобразованием старого кода в современный VB-диалект, пока я не столкнулся с проблемой индексации массивов. Старый код VB написан с учетом того, что все массивы начинаются с индекса 1, а массивы в .NET начинаются с 0.
Как мне с этим справиться?
Переписать весь VB-код так, чтобы позиции предполагали индекс, начинающийся с нуля? (много изменений)
Добавить нижнюю границу массива нулем (0)?
Другое решение?
Я бы порекомендовал выбрать вариант 1 и найти время, чтобы преобразовать код во что-то похожее на .NET.
Вариант 2 также требует большой доработки (на первый взгляд более чем очевидной):
@GSerg: Если вы попробуете
Dim myArray As Int32()
ReDim myArray(10) 'creates an array with 11 elements (0..10), could be handy
For i As Int32 = LBound(myArray) To UBound(myArray) 'LBound is 0, UBound is 10
Console.Out.WriteLine(i)
Next
вы получаете неправильный результат и вам нужно настроить свою логику, поскольку 11 элементов зациклены.
То же самое, если вы создадите такой массив:
Dim myArray(10) As Int32
Вам нужно будет заменить LBound на 1:
Dim myArray As Int32()
ReDim myArray(10) 'creates an array with 11 elements (0..10), could be handy
For i As Int32 = 1 To UBound(myArray) 'LBound is 0, UBound is 10
Console.Out.WriteLine(i)
Next
Но поскольку вам все равно придется настраивать каждый массив, лучше выбрать вариант 1 ...
Option Base: https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/option-base-инструкция - person DBro schedule 23.08.2019lboundиubound, их следует использовать. Я бы переписал старый код, чтобы использовать его везде, тогда он легко переносился. - person GSerg schedule 23.08.2019DimиRedimметодами и свойством по умолчаниюItem,LboundиUbound. Вам нужно только изменить объявления массива, остальной код не изменится, включая те длинные уравнения, которые вы упомянули. - person MarkJ schedule 23.08.2019