ник: snipe
Это от шаловливых ручек пользователей
Familya=UCase(mid(Me!ФамилияР,1, 1)) & StrConv(mid(Me!ФамилияР,2, первый_пробел-1),vbLowerCase) + " " + & _
UCase(mid(Me!ФамилияР,первый_пробел+1, 1)) + "." + & _
UCase(mid(Me!ФамилияР,второй_пробел+1, 1)) + "."
или про это тоже в следующем семестре 
для справки
http://hiprog.com/index.php?option=com_content&task=view&id=271
http://hiprog.com/index.php?option=com_content&task=view&id=331