当前位置: 代码迷 >> VFP >> 使用combo组合框进行第二次筛选时出错,如何解决
  详细解决方案

使用combo组合框进行第二次筛选时出错,如何解决

热度:2179   发布时间:2013-02-26 00:00:00.0
使用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
*--- 上述代码放在什么地方合适,自定。
*--- 另外的组合框设置同上