以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于状态按钮代码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=63420)

--  作者:wh420
--  发布时间:2015/1/20 17:14:00
--  关于状态按钮代码
Dim Filter As String
If e.ToggleButton.Pressed = True Then
    Filter = "YNKP = 1"
    
    With DataTables("Order")
        .LoadFilter = Filter \'加载条件
        .LoadPage = 0 \'加载第一页
        .LoadTop = 100%
        .Load()
    End With
Else
    ‘当状态按钮弹起时,如何实现筛选的条件为表1中日期字段(值如:2015-1-20)等于当前年和月的记录。   日期字段=2015-1月的记录
End If

--  作者:Bin
--  发布时间:2015/1/20 17:16:00
--  
参考帮助http://www.foxtable.com/help/topics/2720.htm
--  作者:peterx
--  发布时间:2015/1/22 17:13:00
--  
没有看明白,可否给个代码,示意一下。谢谢
--  作者:Bin
--  发布时间:2015/1/22 17:14:00
--  
帮助的例子已经非常详细的给出代码,并且带有说明.  请认真看一下

搞不定,就上例子吧.

--  作者:有点甜
--  发布时间:2015/1/22 17:24:00
--  

 例子已经有了吧?

 

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