主题：获取最后一次的采购价格，窗口

你可以看看这个，如何找出某产品最近一条记录：

http://www.foxtable.com/help/topics/0396.htm

例如找出产品编号为03的最后一次采购的记录：

Dim dr As DataRow
dr = DataTables("产品").Find("产品编号 = '03'","日期 Desc") '找出编号为03的产品