如何计算BOM零件数量 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

'自动更新JIP612任务单的含零件数

Dim pr As DataRow

msgbox(e.DataRow("产品代号"))

msgbox(e.DataRow("零件代号"))

pr = DataTables("JPK612任务单").Find("类型一 = '" & e.DataRow("产品代号") & "'")

If pr IsNot Nothing Then

msgbox("找到")

DataTables("JPK612任务单").DataCols("类型一").RaiseDataColChanged(pr)

Else

msgbox("没找到")

End If

改为

DataTables("JPK612任务单").DataCols("类型一").RaiseDataColChanged("类型一 = '" & e.DataRow("产品代号") & "'")

主题：如何计算BOM零件数量