高分,找一个真正懂FOXPRO的人帮我解决表单运行中出现的一个错误,自己找半天找不出来
*设置筛选条件
cFilter=alltrim(thisform.combo1.value)
select salesview
if cFilter=="全部"
set filter to
else
set filter to val(cFilter)=month(date)
endif
thisform.grid1.refresh
运行之后,会出现
最好加我qq732828002,比较着急,解决问题了会追加分数的
追问:我擦,太NB了,能帮我讲讲你这个修改时啥意思不但是是这里出问题了
答案:cFilter=alltrim(thisform.combo1.value)
select salesview
if cFilter=="全部"
set filter to
else
cFilter = "Month(Date) = " + cFilter
set filter to &cFilter
endif
thisform.grid1.refresh
其他:你看是否变量为全局变量,
简单的办法,是在主程序中加上声明此全局变量试试
或者表单事件load前在表单中加前缀public Cfilter....... if cFilter=="全部"
应该为:if cFilter = "全部" 1、“==”是字符串比较;
2、“全部”是不是代表1-12月?用VAL( ) 函数“一”返回“1”代表1月,“二”返回“2”代表2月……这些可能,但在你的这种情况下要同时返回1-12似乎不可能,不知说的对不对? set filter to val(cFilter)=month(date)此句有问题。
通过报错提示,有可能函数写的还有问题。找不到CFILTER就是,
大概应该是val(&cFilter)这个样子吧。
上一个:请问FOXPRO能实现几张表联查吗(即一句查出下面3句的count(*)之和),如何实现~~感谢
下一个:visual foxpro 中 list 和display的区别?(希望可以详细点)