主题：[求助]判定是否存在指定列名的列的代码如何写？

A表的DataColChanged

'向工序合并表写入记录模块

If e.DataCol.Name = "审核" AndAlso e.DataRow("审核") = True Then

    Dim dr As DataRow = DataTables("工序合并表").AddNew

    For Each dc As DataCol In DataTables("工序合并表").DataCols

        If A表上存在名为dc.name的列 Then

            dr(dc.Name) = e.DataRow(dc.Name)

        End If

    Next

End If