没有指定数据源，看这里 http://www.foxtable.com/help/topics/2344.htm

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT DISTINCT Year(订购日期) As 年, Month(订单日期) As 月, 客户，工作号 From {订单明细表}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt, "年|月|客户|工作号")

--------------------------------

Dim Value()As String
Dim Filter As String
Dim d1 As Date
Dim d2 As Date
Value = e.Node.FullPath.Split("\\")
Select Case e.Node.Level
    Case 0
        Dim y As Integer = value(0)
        d1 = New Date(y,1,1) \'取得该年的第一天
        d2 = new Date(y,12,31) \'取得该年的最后一天
        Filter = "订购日期 >= #" & d1 & "# And 订购日期 <= #" & d2 & "#"
    Case 1
        Dim y As Integer = value(0)
        Dim m As Integer = value(1)
        d1 = New Date(y, m, 1) \'取得该月的第一天
        d2 = new Date(y, m, Date.DaysInMonth(y,m)) \'取得该月的最后一天
        Filter = "订购日期 >= #" & d1 & "# And 订购日期 <= #" & d2 & "#"
    Case 2
        Dim y As Integer = value(0)
        Dim m As Integer = value(1)
        d1 = New Date(y, m, 1) \'取得该月的第一天
        d2 = new Date(y, m, Date.DaysInMonth(y,m)) \'取得该月的最后一天
        Filter = "订购日期 >= #" & d1 & "# And 订购日期 <= #" & d2 & "# And 客户 = \'" & Value(2) & "\'"
    Case 3
        Dim y As Integer = value(0)
        Dim m As Integer = value(1)
        d1 = New Date(y, m, 1) \'取得该月的第一天
        d2 = new Date(y, m, Date.DaysInMonth(y,m)) \'取得该月的最后一天
        Filter = "订购日期 >= #" & d1 & "# And 订购日期 <= #" & d2 & "# And 客户 = \'" & Value(2) & " And 工作号 = \'" & Value(3) &"\'"
End Select
Tables("订单明细表").Filter = Filter

错误：

至少一个参数没有被指定值。

 目测代码没有错，是不是这句错了？

cmd.CommandText = "SELECT DISTINCT Year(订购日期) As 年, Month(订单日期) As 月, 客户，工作号 From {订单明细表}"

数据库名称正确， 列名正确， 还是提示：

至少一个参数没有被指定值。

.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2014.3.8.1
错误所在事件：
详细错误信息：
至少一个参数没有被指定值。

.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2014.3.8.1
错误所在事件：窗口,订单查询,AfterLoad
详细错误信息：

未将对象引用设置到对象的实例。订购日期和客户为表达式， 来源于订单主表？？？

是不是表达式不能被查询呢？