问题描述:本人有两个表,表一(基础数据)和表二(订单)。两个表内有共同的列“系统编号”。目前,已实现在表二中的系统编号列输入系统编号,对应的基础数据自动从表一中提取。但表一中规格为三列“规格1”“规格2”“规格3”,但在表二中,规格合并为一列,即将表一中的三个规格数据用“*”连接,填入表二中规格这一列当中,表示形式为:“规格1”*“规格2”*“规格3”,如何实现?本人现在写的代码是:If e.DataCol.Name = "L0" Then '发生变化的是产品编号吗?
'在产品表找出该产品
Dim dr As DataRow
dr = DataTables("GCYW_CJDD").Find("GCYW_CJDD_L0 = '" & e.DataRow("L0") & "'" )
If dr IsNot Nothing '如果找到, 则设置各列内容
e.DataRow("L38")= dr("GCYW_CJDD_L12")
e.DataRow("L4")= dr("GCYW_CJDD_L11")
e.DataRow("L5")= dr("GCYW_CJDD_L6"&"*"&"GCYW_CJDD_L7"&"*"&"GCYW_CJDD_L8")
e.DataRow("L6")= dr("GCYW_CJDD_L9")
End If
End If
加横线的一行就是问题所在,请各位大神指点!