我的表单中有一个combo1和一个表grdduoxxz
combo1的值为1，2，3  
想实现选1时，表grdduoxxz显示pd 表的数据
想实现选2时，表grdduoxxz显示dxxz表的数据
想实现选3时，表grdduoxxz显示duoxxz 表的数据
但在运行时，如果反复选择1、2、3时同，除了出现pd 、dxxz、duoxxz ,还有d,e,f,g......在不同的工作区反复打开了pd 、dxxz、duoxxz 表。我想只出现pd 、dxxz、duoxxz 三个表，如何实现！


combo1的interactivechange事件中的代码
if  alltrim()="1"
thisform.grdduoxxz.recordsource='"c:\documents and settings\administrator\桌面\考试系统\pd.dbf"'
thisform.grdduoxxz.recordsourcetype=0
thisform.grdduoxxz.refresh
endif

if  alltrim()="2"
thisform.grdduoxxz.recordsource='"c:\documents and settings\administrator\桌面\考试系统\dxxz.dbf"'
thisform.grdduoxxz.recordsourcetype=0
thisform.grdduoxxz.refresh
endif

if  alltrim()="3"
thisform.grdduoxxz.recordsource='"c:\documents and settings\administrator\桌面\考试系统\duoxxz.dbf"'
thisform.grdduoxxz.recordsourcetype=0
thisform.grdduoxxz.refresh
endif

先关后开，现用现开

“锁定工作区”，很有创意的概念！
把所用到的三个表放到表单的数据环境中就OK了。

(1)新建一个表单，添加一个组合框Combo1，一个表格Grdduoxxz，一个命令按钮Command1，布局好
(2)表单的Init事件写代码
close all
use pd in 0
use dxxz in 0
use duoxxz in 0
('1')
('2')
('3')

thisform.grdduoxxz.recordsourcetype=1

(3)combo1.click代码
thisform.grdduoxxz.columncount=-1
thisform.grdduoxxz.recordsource=iif(,'pd',iif(,'dxxz',iif(,'duoxxz','')))

combo1的interactivechange事件中的代码

thisform.grdduoxxz.recordsourcetype=0
thisform.grdduoxxz.RecordSource =Null
DO case
       CASE alltrim()="1"
            this.Parent.grdduoxxz.RecordSource='"c:\documents and settings\administrator\桌面\考试系统\pd.dbf"'
    CASE alltrim()="2"
         thisform.grdduoxxz.recordsource='"c:\documents and settings\administrator\桌面\考试系统\dxxz.dbf"'
    CASE alltrim()="3"
         thisform.grdduoxxz.recordsource="'c:\documents and settings\administrator\桌面\考试系统\duoxxz.dbf'"
ENDCASE
thisform.grdduoxxz.refresh

[ 本帖最后由 qjbzjp 于 2010-9-24 22:00 编辑 ]

数据环境中添加表，表格的recordsourcetype选择别名就行了

估计楼主还没有使用VFP数据环境的习惯
利用数据环境控件不会出现你的问题

谢谢，我试试看