Обработка массива. Нужна помощь. - VB

Формулировка задачи:

Коллеги!
У меня проблема не могу разрулить обработку данных.
Есть текстовый файл структурированный.
Файл могу распарсить и превести к массиву данных:
№;К1 ;К2
1;А ;Б
0; ;В
2;Г ;Д
3;Е ;Ё
0; ;Ж
Нужно обработать массив и на выходе получить следующее:
№;К1 ;К2
1;А ;БВ
2;Г ;Д
3;Е ;ЁЖ
Второй день бьюсь. Помогите!!!
Всё это реализуется на VBA.

Решение задачи: «Обработка массива. Нужна помощь.»

textual
                            Листинг программы 
                        

                            dim a(0 to ... , 0 to ...)
' здесь запись в массив
' и предположим, что первый элемент массива - не 0
' далее - обрабатываем
last = 0
for i=lbound(a,1) to ubound(a,1)
  if a(i,1)=0 then a(last,2)=a(last,2) & a(i,2) else last=i
next
' далее - например, копируем/экпортируем массив, пропуская строчки с 0

                        