Dim gys As WinForm.ComboBox = e.Form.Controls("供应商") Dim clmc As WinForm.ComboBox = e.Form.Controls("材料名称") Dim clbm As WinForm.TextBox = e.Form.Controls("材料编码")
Tables("大宗原材料").Filter="供货厂家 = '" & gys.Text & "' and 材料名称 like '*" & clmc.Text & "*' and 材料编码 like '*" & clbm.Text & "*'"
加好友 
发短信
Post By：2013/3/4 22:04:00 [只看该作者]
