Tiger5392 在 2008-7-12 11:14 的发言:
select 1
set filter to alltrim(thisform.text1.value)$thisform.combo1.displayvalue
go top
thisform.refresh
Combo1是
字段名的话,需要修改。
If Type(thisform.combo1.displayvalue)='C'
set filter to alltrim(thisform.text1.value)$Evaluate(thisform.combo1.displayvalue)
Else
set filter to
EndIf
go top
thisform.refresh