把这个代码放在你的表的datacolchanged事件中:
If e.DataCol.name = "库存时长" Then Dim ts As timespan = e.DataRow("出库日期")-e.DataRow("入库日期") e.DataRow("库存时长")= ts.TotalDays
End If