If e.DataCol.name = "物品名称" Then
  If e.DataRow.IsNull("物品名称") Then
     e.DataRow("规格") = Nothing
     e.DataRow("单位") = Nothing
     \'其他列加在这里 
  Else
   Dim dr As DataRow = DataTables("库存").Find("物品名称 = \'" & e.DataRow("物品名称") & "\'")
     If dr IsNot Nothing
       e.DataRow("规格") = dr("规格")
       e.DataRow("单位") = dr("单位")
        \'其他列加在这里 
    End If
 End If
End If

我想问下，当"库存"表里A物品"规格"发生变动时，当前表格的A物品"规格"还是保持不变，怎么让A物品的"规格"跟随"库存"表里的A物品"规格"更新呢

在库存表设置代码，根据规格列的变化改变其值，代码用法和一楼的类似。

另外你也可以参考一下RaiseDataColChanged方法。

http://www.foxtable.com/help/index.html?n=2141.htm

找到更合适的啦