方法一:可以在TextChanged或者是ValueChanged事件写代码
Tables("表A").Current("第一列") = e.sender.Text
方法二:可以写 http://www.foxtable.com/webhelp/scr/1497.htm