datacolchanged事件:
http://www.foxtable.com/webhelp/topics/2481.htm,看最后一种用法
select case e.datacol.name
case "A","B","C"
dim x as string =e.datarow("A") & " " & e.datarow("B") & " " & e.datarow("C")
dim dr as datarow = e.datatable.find("FullCol = '" & x & "'") '这里FullCol 是A + ‘ ’ + B + ‘ ’ + C的表达式
if dr isnot nothing then
e.DataRow(e.DataCol.Name) = e.OldValue
end if
end select