在品类型号表中修改产品型号后,希望销售明细中相应商品编号的产品型号也同时修改,代码中select改为sqlselect后不执行:Select Case e.DataCol.name
Case "型号" ,"品牌","品类","单位"
Dim filter As String="[商品编号] ='" & e.DataRow("商品编号") & "'"
Dim drxs As List(of DataRow)=DataTables("销售明细表").sqlSelect(filter)
For Each drx As DataRow In drxs
drx("型号")=e.DataRow("型号")
drx("品类")=e.DataRow("品类")
drx("品牌")=e.DataRow("品牌")
drx("单位")=e.DataRow("单位")
Next
End Select