以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  程序问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189636)

--  作者:侠客1985
--  发布时间:2023/12/13 10:36:00
--  程序问题

老师,对于这个程序如果改为用Filter 会报错,这两个程序的本质有什么区别么

Dim drs As List(Of DataRow)
drs = DataTables("订单").Select("[产品] = \'PD01\' And [日期]= #1/4/1999#")
For Each
dr As Datarow In drs
    Output.show(dr("客户"))

Next



Dim drs As List(OfRow)
drs = Tables("订单").Filter="[产品] = \'PD01\' And [日期]= #1/4/1999#"
For Each
dr As Datarow In drs
    Output.show(dr("客户"))

Next



--  作者:linyunu
--  发布时间:2023/12/13 10:44:00
--  
http://www.foxtable.com/webhelp/topics/1664.htm

排序与筛选

属性名说明

Filter

返回或设置过滤条件表达式

Sort

返回或设置排序方式

StateFilter

状态筛选

ApplyFilter

用于切换筛选

ApplySort

用于切换排序
AllowBackEndFilter逻辑型,当分页加载某表时,是否允许通过菜单筛选后台数据


--  作者:有点蓝
--  发布时间:2023/12/13 10:55:00
--  
Select是一个函数,有返回值
Filter是一个属性,没有返回值

Tables("订单").Filter = "[产品] = \'PD01\' And [日期]= #1/4/1999#"
For Each r As Row In Tables("订单").rows
    Output.show(r("客户"))
Next