主题：外部SQL数据源---用SQL语句设计加载树---怎样设置分页加载？

 直接用不行么？上例子。

 代码如下

Dim Value()As String
Dim s1 As String
If e.Sender.SelectedNode.Text = "加载所有数据" Then
    s1=""
Else
    Value =  e.Sender.SelectedNode.FullPath.Split("\")
    Select Case  e.Sender.SelectedNode.Level
        Case 0
            s1 ="Year(订单日期) = " & Value(0)
        Case 1
            s1 ="Year(订单日期) = " & Value(0) & " And Month(订单日期) = " & Value(1)
        Case 2
            s1 ="Year(订单日期) = " & Value(0) & " And Month(订单日期) = " & Value(1) & " And 客户 = '" & Value(2) & "'"
        Case Else
            s1=""
    End Select
End If
DataTables("销售订单_Table1").LoadFilter = s1
DataTables("销售订单_Table1").Load()

楼主，这下面的东西，就需要你自己去做了。

先弄一下，用控件去做，弄不好，再一个一个地提问。

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

 这种方法简单，设置一下参数就行。

 或者你可以通过自己写Sql语句完成，较为麻烦。