The "best"? Probably this:

=adir(adbf,"*.dbf")
for idbf=1 to alen(adbf,1)
  use (adbf[idbf,1])
  release afld
  =afield(afld)
  for ifld=1 to alen(afld,1)
       if afld[ifld,1]=="A"
           ?adbf[idbf,1],afld[ifld,2],afld[ifld,3]
           EXIT
       endif
  endfor
endfor

>VFP 7
>
>What is the best way to find all tables that contain a field and it's format in each table? For example assume field a is in tables c and e. I would like a report that shows some thing like
>

>The field a occurs in:
>
>Table      Format
>c          i 2
>e          i 3
>

>FWIW I have the stonefeild database toolkit for this application (but it may not aways be available).