代码从changed 改到changing就出现这个了问题了,请问一下:
If
此主题相关图片如下:bug1.png
代码:
e.DataCol.Name = "内部审计年度风险评估调查表_主流程维度_流程编号" Then
If e.NewValue Is Nothing Then
e.DataRow("内部审计年度风险评估调查表_主流程维度_流程编号") = Nothing
Else
dr = DataTables("流程架构维护").Find("[流程编号]= '" & e.NewValue & "'")
If dr IsNot Nothing Then
e.DataRow("内部审计年度风险评估调查表_主流程维度_一级业务流程") = dr("一级业务流程")
e.DataRow("内部审计年度风险评估调查表_主流程维度_二级业务流程") = dr("二级业务流程")
e.DataRow("内部审计年度风险评估调查表_主流程维度_三级业务流程") = dr("三级业务流程")
End If
End If
End If