主题：我想做一个页面集合的通用会计科目目录树，结果没有目录树显示

Dim nd As WinForm.TreeNode = args(0)
Dim dt As DataTable = args(1)
For Each dr As DataRow In dt.Select("","科目代码")
    Dim km As String = dr("科目代码")
    If km.StartsWith(nd.name) AndAlso km.Length = nd.Name.Length + 2 Then
        Dim cd As Winform.TreeNode = nd.Nodes.Add(km,km & " " & dr("科目名称"))
        Functions.Execute("AddChildren",cd,dt)
    End If
Next

你的代码里要用这个函数，你又不定义，咋用啊？

你都不往卡里存钱，到了银行说要取1万块，JC一会就来了