從你的代碼可以看出

你的查詢步驟應該如下：
1. 初始時thisform.check1.Value=0
2. 首先從btyszwzy主表查大范圍資料，存入到臨時表curtemp
3. 將thisform.check1.Value=1
4. 繼續縮小查找范圍時：執行ELSE，從第一步臨時表curtemp中查資料，存入到臨時表curtemp1中
5. thisform.check1.Value=1的情況下繼續縮小查找范圍.(依你的思路此步你希望從curtemp1中查找資料，但實際你是從curtemp中查找資料的)

所以你的程式只能縮小查詢一次，再一次時就不會達到預期的效果了。

給你如下建議：
在初始時
public grd_tbl
grd_tbl = 'btyszwzy'

IF thisform.check1.Value=0
    TMP_TBL = SYS(2015)
    cSearch=ALLTRIM(thisform.text1.value)
    SELECT * FROM btyszwzy WHERE 种形态特征 like "%&cSearch%" INTO CURSOR &TMP_TBL
    SELECT &TMP_TBL
    thisform.grid1.RecordSource= TMP_TBL 
    grd_tbl = TMP_TBL
    thisform.text2.Value=RECCOUNT()
    thisform.refresh
ELSE
    TMP_TBL = SYS(2015)
    SELECT * FROM &grd_tbl WHERE 种形态特征 like "%&cSearch%" INTO CURSOR &TMP_TBL
    SELECT &TMP_TBL
    thisform.grid1.RecordSource= TMP_TBL
    grd_tbl = TMP_TBL
    thisform.text2.Value=RECCOUNT()   
    thisform.refresh  
ENDIF

不行啊，没反应啊！

thisform.refresh
換成
thisform.grid1.refresh
看看