老师，您好，加粗带下划线的为新增的代码，在数据表中输入该材料代号且重置材料代号列时，新增的代码不显示是什么原因？
If e.DataCol.Name="材料代号" Then '如果发生变化的列是材料代号列
Select Case e.NewValue '赋予新值
Case 3120120002
e.DataRow("本体长度")= "25.5 Max"
e.DataRow("本体直径")="14.5 MAX"
e.DataRow("空载电压")="≥3.64 "
e.DataRow("负载电压")="≥3.20 "
Case 3120120003
e.DataRow("本体长度")= "25.5 Max"
e.DataRow("本体直径")="14.5 MAX"
e.DataRow("空载电压")="≥3.64 "
e.DataRow("负载电压")="≥3.20 "
Case 3120120021
e.DataRow("本体长度")= "25.4 Max"
e.DataRow("本体直径")="14.5 MAX"
e.DataRow("空载电压")="≥3.60"
e.DataRow("负载电压")="≥3.40"
Case Else
e.DataRow("本体长度")= Nothing
e.DataRow("本体直径")=Nothing
e.DataRow("空载电压")=Nothing
e.DataRow("负载电压")=Nothing
End Select
End If
加好友 
发短信
Post By：2019/10/30 10:46:00 [只看该作者]
