>For n=1 to thisform.listbox.listcount
> if seek(thisform.listbox.list(n),"mytable","mytag")=.t.
>  if mytable.fieldn=.T.
>   thisform.listbox.picture(n)=....
>  endif
> endif
>Endfor
>