以文本方式查看主题

-  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=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