ник: Силblч
при условии, что фамилии имена отчества разделяются пробелами и сохранена последовательность ввода
arrFIO=split([Фамилия Имя Отчество],chr(32))
ну а дальше обращаетесь к ним по одному :)
"сократить" имя, например arrFIO[1]=left(arrFIO[1],1) & "."
... ка кто так...