主题：等于

你是说，不允许输入额外的内容？你可以控制这两列锁定。

或者用代码

Select Case e.DataCol.Name
    Case "卡号", "持卡人", "分配地点"
        Dim dr As DataRow
        dr = DataTables("油卡明细").Find("卡号 = '" & e.DataRow("卡号") & "'" )
        If dr IsNot Nothing '如果找到, 则设置各列内容
            e.DataRow("持卡人")= dr("持卡人")
            e.DataRow("分配地点")= dr("分配地点")
        End If
End Select