主题：求助老师递归函数输入问题

Dim nd As WinForm.TreeNode = args(0)

Dim dt As DataTable = args(1)

Dim drs As  List(of DataRow)

drs = dt.Select("[上级编号] = '" & nd.name & "'")

For Each dr As DataRow In drs

    Dim cd As Winform.TreeNode = nd.Nodes.Add(dr("本级编号"),dr("科项目名称"))

    cd.Tag = dr("_Identify")

    Functions.Execute("AddChildren",cd,dt)

Next