主题：怎么加载这两个月

问题不够具体啊，不知道该怎么回复你的。

1、将默认加载行数设置为10

2、将排序规则设置为：日期 Desc

这个不能直接设置，需要用代码：
 
http://www.foxtable.com/help/topics/0670.htm

 
大概就是：
If e.DataTableName = "订单" Then

    Dim dt As Date = Date.Today.AddMonths(-1)

    dt = New Date(dt.Year,dt.Month,1)
    e.SelectString = "Select * From {订单} Where [折扣] 日期 >= #" &  dt & "#"
End If

DataTables("订单").LoadFilter = "日期 >= #5/1/2012# "
DataTables("订单").load()
DataTables("一车间").LoadFilter = "日期 >= #5/1/2012# "
DataTables("一车间").load()
DataTables("二车间").LoadFilter = "日期 >= #5/1/2012# "
DataTables("二车间").load()

呵呵，你没有写任何代码的啊，怎么知道你错在哪里？

你应该贴出你的代码，说明这段代码的目的是什么，遇到了什么问题。

内部表应该是：

If e.DataTableName = "订单"
    Dim StartDate As Date = Date.Today().AddDays(-10)
    e.filter = "[日期] > #" & StartDate & "#"
End If

什么意思，我没有看明白

这样改一下：

If e.DataTableName = "订单"
    Dim StartDate As Date = Date.Today().AddDays(-10)
    e.filter = "[日期] > #" & StartDate & "# Or [日期] Is NuLL"
End If