主题：动态生成库存表

看帮助一定要按顺序，头一两遍可以不求甚解，第三遍开始要将每个例子实际操作演练一遍，不明白的就上论坛求助。
三遍之后才开始做系统，先设计好表，想做什么功能，就做什么功能，遇到问题在帮助找答案，找不到的在论坛提问，不断遇到问题，不断解决问题，慢慢就熟悉了。
此外一定要先掌握《使用指南》，然后再看《开发指南》

dr = .Find("产品名称='" & r("产品名称") & "' And 产品批号='"& r("产品批号") & "'" )    
     End With

if dr isnot nothing then

    r("成本价")=dr("产品成本价")
    r("piao面价")=dr("产品piao面价")