在一个表单上有一个 EDIT1控件 ,有一个GRID1，有5列，字段依次对应：A1,A2,A3,A4,A5

任意点一格，就要将 THISFORM.EDIT1.ControlSource 改为当前格的数据源

THISFORM.EDIT1.ControlSource=THIS.Parent.ControlSource 不能达到目的

试试这个行不行

行。

“不能达到目的”是什么意思? 或者想要达到什么目的。
先观察一下 THISFORM.EDIT1.ControlSource 和 THIS.Parent.ControlSource 是不是想要的东东。