使用combo组合框进行第二次筛选时出错,怎么解决?
各位老师:我在做表单时,表单上有各条记录的字段TXT内容,另外还有一个GRID,在一个表单里放了几个combo组合框,分别用来筛选不同的条件,在valid属性设语句分别为
set filter to 设备类型=thisform.combo1.value
set filter to 设备厂家=thisform.combo2.value
运行时,第一次能执行筛选,点grid后,再去选combo筛选,就会出现:“thisform只能在方法程序中使用”,程序终止。
请问如何解决?对grid和combo应该怎样设置?
最好能给出代码,谢谢!!
[解决办法]
试试:
cf = '设备类型 = ' + thisform.combo1.value
set filter to &cf
另一个过滤条件类似
[解决办法]
对,用变量或自定义属性代替,如果提示变量找不到,就用全局变量。
[解决办法]
*--- 这个地方只有用全局变量
PUBLIC A1,A2
A1=thisform.combo1.value
A2=thisform.combo2.value
set filter to 设备类型=A1
set filter to 设备厂家=A2
*--- 或者用SQL-SELECT语句
SELECT 设备类型 FROM TABA WHERE 设备类型=thisform.combo1.value INTO CURSOR COMBO_1
THISFORM.GRID1.RECORDSOURCE="COMBO_1"
THISFORM.GRID1.SETFOCUS
THISFORM.GRID1.REFRESH
*--- 上述代码放在什么地方合适,自定。
*--- 另外的组合框设置同上