主题：表达式不产生值

msgbox(e.DataCol.Name)

Select Case e.DataCol.Name

   Case "材料费小计", "加工费小计", "刷新"

msgbox("工序号=" & e.DataRow("工序号"))

    Dim pr As DataRow

      pr = DataTables("零件加工报价系统_Table3").Find("工序号 = '" & e.DataRow("工序号") & "'")

      If pr IsNot Nothing Then

msgbox("pr IsNot Nothing")

      DataTables("零件加工报价系统_Table3").DataCols("工序号").RaiseDataColChanged(pr)

 End If

End Select

'父表DataColChanged 

msgbox("父表：" & e.DataCol.Name)

Select Case e.DataCol.Name 

Case "工序号"

msgbox(11)

   e.DataRow("估工") = DataTables("零件加工报价系统_Table3").Compute("Sum(工步时间小计)/60", "[工步号] Like '" & e.DataRow("工序号") & "-*'")

msgbox(12)

End Select

我改到 e.DataRow("估工") = DataTables("零件加工报价系统_Table3")后，无报警