用随机函数。
先给表增加一个编号字段，把每个人名编号后放入编号字段中，然后用来随机取出：
int(RAND( )*10)
……

use 你的表
do while .t.
  go int(rand()*recc()+1)
  ?name     &&随机显示表中的姓名,name是你的表中存放姓名的字段
  yn= messagebox('继续显示吗?',32+4)
  if yn = 7
    exit
  endif
enddo