加上数据源名
Tables("模糊查询_Table1").Fill("select 编号,姓名 ,部门,职务 f rom{员工} where [_Identify] > 0", "数据源名", True)
http://www.foxtable.com/help/topics/2912.htm