回复 2楼 吹水佬
&& init 事件SELECT 兽药订单
SELECT DISTINCT 姓名 FROM 兽药订单 INTO cursor abc
= 2
= "abc"
&& click事件
c1 = ALLTRIM(this.value)
SELECT RECNO() AS rec_no ,* FROM 兽药订单 WHERE 姓名 == c1 INTO CURSOR temp readwrite
thisform.grid1.RecordSourceType = 1
thisform.grid1.RecordSource = "temp"
thisform.Refresh