在datacolchanged ,表事件中写入。请问怎么改?
Select Case e.DataCol.Name
Case "进货日期","进货批次","操作员","合同编号","供应商编号"
Dim drs() As String = {"进货日期","进货批次","操作员","合同编号","供应商编号"}
For Each dr As String In drs
DataTables("采购进货").ReplaceFor("'" & DataCol("dr") & "'" ,e.DataRow(dr) ,"进货批次 = '" & e.DataRow("进货批次") & "'")
Next
End Select