Dim dr As DataRowdr = DataTables("进货").Find("货物 = 'A'","日期 Desc")If dr IsNot Nothing Then msgbox(dr("日期"))End If
http://www.foxtable.com/help/topics/0396.htm
加好友 
发短信
Post By：2014/6/13 15:54:00 [只看该作者]
