红色代码忘记叫什么了
If e.Node.Level = 1 Then '如果单击的是第二层节点 Dim dr As DataRow = e.Node.DataRow '获取生成此节点的DataRow Tables("文件管理").position = Tables("文件管理").FindRow(dr) vars("编辑校验xxx") = 0End If