主题：如何写订单编码

楼主：你是不是想要这个，在DATACOLCHANGED中加入

If e.DataCol.name ="物料编码" Then
e.DataRow("订单号") =e.DataRow("物料编码") & "DD" & e.DataRow("_Identify")
End If