很多错误
1、datacolchanged的代码中不应该出现Current,Current表示选定的行,和触发事件的行是两回事。
2、表达式的合成也有问题。
正常的代码估计是:
Dim A As DataRow = e.DataRow
Dim n As String = A("客户")
Dim b As DataRow=DataTables("目录表").find("客户 = '" & n & "'")
If b IsNot Nothing Then
A("外勤")=b("外勤")
A("内勤")=b("内勤")
End If
建议您看看这个:
http://www.foxtable.com/help/topics/1284.htm