主题：多列判断

老师，我想问问： 

 If e.DataCol.Name = "产品编号" Then '发生变化的是产品编号吗?
    '在产品表找出该产品
    Dim dr As DataRow
    dr = DataTables("产品").Find("编号 = " & "'" & e.DataRow("产品编号") & "'" )
    If dr IsNot Nothing '如果找到, 则设置各列内容
        e.DataRow("品名")= dr("品名")
        e.DataRow("型号")= dr("型号")
        e.DataRow("规格")= dr("规格")
    End If
End If

这段代码是判断一个列满足要求其它列自动填充，可我有4个列需要判断怎么编写代码，就是那4个列的值符合其它表中4个列的内容，后面的自动填充