主题：关于状态按钮代码

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

参考帮助http://www.foxtable.com/help/topics/2720.htm

没有看明白，可否给个代码，示意一下。谢谢

帮助的例子已经非常详细的给出代码,并且带有说明.  请认真看一下

 例子已经有了吧？

 

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