以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]根据年份筛选记录的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=86409)
--  作者：ehomecd
--  发布时间：2016/6/16 16:52:00
--  [求助]根据年份筛选记录的问题
问题：组合框已经获得考核年度列表；希望选择年度后，筛选出相应年度的考核记录，但下边代码有问题，请老师指点。


Dim khnd As WinForm.ComboBox = e.Form.Controls("考核年度")
If khnd.value IsNot Nothing Then
Tables("员工考核信息查询_员工考核记录").Filter = "考评日期 like %\'" & khnd.value & "\'% "
End If
--  作者：狐狸爸爸
--  发布时间：2016/6/16 16:53:00
--  

可以学一下：

http://www.foxtable.com/help/topics/2720.htm

 
--  作者：ehomecd
--  发布时间：2016/6/16 16:57:00
--  
修改成这样也是提示错误，【考评日期】是日期格式字段，好像不能用like运算符，这样的话这个功能该如何实现？


Dim khnd As WinForm.ComboBox = e.Form.Controls("考核年度")
If khnd.value IsNot Nothing Then
Tables("员工考核信息查询_员工考核记录").Filter = "考评日期 like \'*khnd.value*\' "
End If
--  作者：ehomecd
--  发布时间：2016/6/16 16:58:00
--  
好的，知道了，解决问题的思路出了问题，谢谢。