如果在入库表【产品】列输入一个新产品，能否自动将这个新产品加到库存表【产品】列里，以前是手动加到库存表【产品】列里。考虑到使用表事件

If e.DataCol.Name = "产品" Then                                                                \'如果是【产品】列的内容变动
    If e.NewValue 不属于【产品】   then    库存表【产品】= e.NewValue              \' 不会了  那位大师帮一下 谢谢了

早年陋做，内有相应功能，仅供您参考：

 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=5&ID=96&replyID=&skin=1

这个简单，设置在DataColChanged事件中:

if e.DataCol.Name = "产品" And e.NewValue > ""Then

     if DataTables("库存").Find("产品 = \'" & E.NewValue & "\'") is Nothing Then

            Dim dr As DataRow = DataTables("库存").AddNew()

            dr("产品") = e.NewValue

     End if

End if