Бесконечного количества полей быть не может. Может быть вы имели в виду - записей?

МмихалычНа сколько смог понять масcив(c произведенной разбивкой по словам) здесь запихан в цикл For, а вот как работает Ubound....

Затем присваивается полю значение массива от цикла и вот в чем опять воропрос.... как работает Ubound.... ;)

Функция UBound

Возвращает значение типа Long, содержащее максимальный доступный индекс указанной размерности массива.

Синтаксис

UBound(имяМассива[, размерность])

Синтаксис функции UBound содержит следующие элементы:

Элемент Описание
имяМассива Обязательный. Имя переменной массива, удовлетворяющее стандартным правилам именования переменных.
размерность Необязательный; Variant (Long). Целое число, указывающее размерность, верхнюю границу которой возвращает функция. Для первой размерности используется значение 1, для второй 2 и т.д. Если аргумент размерность опущен, подразумевается значение 1.
Дополнительные сведения

Функция UBound вместе с функцией LBound используется для определения размеров массива. Функция LBound применяется для выяснения нижнего предела размерности массива.
UBound возвращает значения, перечисленные в приводимой ниже таблице, для массива со следующими размерностями:

Dim A(1 To 100, 0 To 3, -3 To 4)

Инструкция Возвращаемое значение
UBound(A, 1) 100
UBound(A, 2) 3
UBound(A, 3) 4

Вам, для вашей постановки задачи, нужно применять UBound вместе с инструкцией Redim, для переопределения изначально заданного массива.


Инструкция ReDim
Применяется на уровне процедуры для перераспределения памяти для переменных динамического массива.

Синтаксис

ReDim [Preserve] имяПеременной(индексы) [As тип] [, имяПеременной(индексы) [As тип]] . . .

Синтаксис инструкции ReDim содержит следующие элементы:

Элемент Описание
Preserve Необязательный. Ключевое слово, используемое для сохранения данных в существующем массиве при изменении значения последней размерности.
имяПеременной Обязательный. Имя переменной, удовлетворяющее стандартным правилам именования переменных.
индексы Обязательный. Размерности переменной массива; допускается описание до 60 размерностей. Аргумент индексы использует следующий синтаксис:
[нижний To] верхний [,[нижний To] верхний] . . .
Если нижний индекс не задан явно, нижняя граница массива определяется инструкцией Option Base. Если отсутствует инструкция Option Base, нижняя граница массива равняется нулю.
тип Необязательный. Тип данных переменной; поддерживаются типы Byte, Boolean, Integer, Long, Currency, Single, Double, Decimal (в настоящее время не поддерживается), Date, String (для строк переменной длины), String * длина (для строк фиксированной длины), Object, Variant, определяемый пользователем тип или объектный тип. Для каждой описываемой переменной следует использовать отдельное предложение As тип. Для значения типа Variant, содержащего массив, тип описывает тип данных каждого элемента массива, но не заменяет тип Variant на какой-либо другой тип.
Дополнительные сведения

Инструкция ReDim используется для задания или изменения размера динамического массива, который уже был формально описан с помощью инструкции Private, Public или Dim с пустыми скобками (без индексов размерностей).
Имеется возможность повторно использовать инструкцию ReDim для изменения числа элементов и размерностей массива. Однако не допускается описание массива с одним типом данных и использование инструкции ReDim для последующего изменения типа данных этого массива, если массив не содержится в переменной типа Variant. Тип элементов массива, содержащегося в переменной типа Variant, может быть изменен с помощью предложения As тип, если ранее не было использовано ключевое слово Preserve, запрещающее изменение типа данных.

При использовании ключевого слова Preserve имеется возможность изменить значение только последней размерности массива и не допускается изменение числа размерностей. Например, если массив имеет только одну размерность, имеется возможность изменить эту размерность, так как она является последней и единственной размерностью. Однако, если массив имеет две или более размерности, возможно изменение значения только последней размерности, сохраняя при этом содержимое массива. В следующем примере показывается, как можно увеличить значение последней размерности динамического массива без уничтожения данных, содержащихся в этом массиве.

ReDim X(10, 10, 10)
. . .
ReDim Preserve X(10, 10, 15)

Кроме того, при использовании ключевого слова Preserve допускается изменение размера массива только за счет изменения верхней границы индекс; попытка изменить нижнюю границу приведет к ошибке.

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

При инициализации переменных числовая переменная получает значение 0, строка переменной длины получает значение пустой строки (""), а строка фиксированной длины заполняется нулями. Переменные типа Variant получают при инициализации значение Empty. Каждый элемент переменной типа, определяемого пользователем, при инициализации получает значение, которые он получил бы, если бы являлся одиночной переменной. Переменной со ссылкой на объект перед ее использованием необходимо присвоить существующий объект с помощью инструкции Set. До присвоения объекта описанная объектная переменная имеет специальное значение Nothing, которое указывает, что она не содержит ссылку на какой-либо определенный экземпляр объекта.

Внимание! Инструкция ReDim действует как инструкция описания, даже если описываемая в ней переменная не существует на уровне модуля или на уровне процедуры. При создании в дальнейшем переменной с тем же именем, возможно, в более широкой области определения, инструкция ReDim будет ссылаться на эту последнюю переменную и не обязательно вызовет ошибку компиляции, даже при действующей инструкции Option Explicit. Во избежание подобных конфликтов не следует использовать инструкцию ReDim как инструкцию описания. Пользуйтесь ей только для изменения размеров массивов.

Примечание. Для изменения размера массива, содержащегося в переменной типа Variant, нужно явно описать переменную типа Variant перед попыткой изменения размера.

Программист-ЛюбительВ книжном магазине. В гугле. В ненавистной Фы1.Абсолютно! Нет королевских путей.

2 Ммихалыч
Для того, чтобы иметь "ненавистную Фы1 на русском можно поставить Асцесс 97. Именно там есть развитой хелп на русском. Но надо иметь в виду разницу между Аксом97 и используемой вами, для чего сразу же прочитать главу из хелпа (вашего - 2000, ХР или 2003, на английском!) что нового в этой версии по сравнению с 97.