Liosha_nove4ok, а что тут может быть "как", если messagebox() запихнут в InteractiveChange! :)
(один из великого множества путей решения этой нетривиальной проблемы прилагается...)

(что-то файл не приложился... Ну тогда листинг)

cStroka - искомое выражение (thisform.textbox1.value)
Таблица проиндексирована; индексное выражение - fam+ima+otch
(при создании индекса set idxcollate to "RUSSIAN" для нечувствительности к регистру)

if !empty(cStroka)
cStroka=allt(cStroka)
do while at([ ],cStroka)>0
cStroka=strtran(cStroka,[ ],[ ])
enddo
Z=occurs([ ],cStroka)
local fm,im,ot,rec
store [] to fm,im,ot

do case
case Z<1 && fam only
fm=cStroka
case Z=1 && fam+ima
x=at([ ],cStroka)
fm=left(cStroka,x-1)
im=subs(cStroka,x+1)
case Z>1
x=at([ ],cStroka)
fm=left(cStroka,x-1)
cStroka=subs(cStroka,x+1)
x=at([ ],cStroka)
im=left(cStroka,x-1)
cStroka=subs(cStroka,x+1)
x=at([ ],cStroka)
ot=IIF(x<1,cStroka,left(cStroka,x-1))
endcase
rec=recno()
if seek(fm)
if !empty(im)
rec=recno()
scan while fam=fm.and.ima<>im
rec=recno()
endscan
if ima<>im
go rec
else
if !empty(ot)
rec=recno()
scan while fam=fm.and.ima=im.and.otch<>ot
rec=recno()
endscan
if otch<>ot
go rec
endif
endif
endif
endif
else
if betw(rec,1,reccount())
go rec
endif
endif
endif
* (далее - вывод информации из текущей строки куда надо) *

gepard45, причина, наверное в том, что не было сделано обрезание... :) (конечных пробелов)