代码有点长，你到别的网站去看一看吧，

如果没有找到，我明天给你

我就是没找到，才请教你呀！！！！！
我现在急用呀，能不能马上发给我呀？？？
万分感激！！！！

本人是个菜鸟,互相交流一下,请指教:
我认为你是想动态设置表单控件的数据源,即controlsource.现在假设表单上
有text1和text2两控件,其中text1的controlsource来自自由表dbf1的某个字段zd1,text2的controlsource来自自由表dbf2的某个字段zd2.在表单设计阶段先将text1的controlsource设置为temp1.zd1,text2的controlsource设置为temp2.zd2.
在表单的Load事件中使用以下代码:
     use dbf1 alias temp1 in 0
     use dbf1 alias temp2 in 0
在text1的getfocus事件中使用以下代码:
   sele temp1
在text2的getfocus事件中使用以下代码:
   sele temp2

对不起!本菜鸟在第3楼的回复方法有问题,现作修改如下:
把Load事件中的代码放到此表单的调用命令中,其它设置不变.
有一点要说明,利用这种方法,在表单释放后,表单的数据环境中不在有dbf1和dbf2.
如果要实现永久保存,本人也想知道.

表单2不设置数据环境，使用一个字符型变量将表单1所选的数据表表名赋于该变量，在表单2的init事件中用以下语句：'use &字符变量名'将表单2中与数据表相关控件的controlsource动态地改变为字符变量所指的数据表。
也可以在运行表单1的选择数据表功能后，打开所选的数据表，退出表单1时不能关闭该数据表，再运行表单2(当然表单2也不能设置数据环境)，那么表单2的数据环境就自动使用当前打开的数据表。