主题：在表中判断是否为末级节点

就判断节点的子节点数量或者用level属性

if Node.Node.Count = 0 then

if Node.Level = ... then

其实很简单，你在命令窗口执行：

For Each dr1 As DataRow In DataTables("data").DataRows
    Dim dr2 As DataRow = DataTables("data").Find("totalcpno Like '" & dr1("totalcpno") & "\*'")
    If dr2 Is Nothing Then
        dr1("Istree") = True
    Else
        dr1("Istree") = False
    End If
Next

本来想留个你做练习的：

For Each dr1 As DataRow In DataTables("data").DataRows
    Dim dr2 As DataRow = DataTables("data").Find("totalcpno Like '" & dr1("totalcpno") & "\*'")
    If dr2 Is Nothing Then
        dr1("Istree") = True
    Else
        dr1("Istree") = False
        dr1("V") = DataTables("data").Compute("Count(sortkey)","totalcpno Like '" & dr1("totalcpno") & "\*'")
    End If
Next

你要多看帮助，你看看上面的代码，其实没有技巧可言，全部来自帮助的哦。

好好看看：

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

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