主题：NodeMouseDoubleClick

If e.Node.Level = 0 Then '如果单击的是第二层节点
    Dim txt1 As String = e.Form.Controls("TextBox1").text
    Dim dr As DataRow = e.Node.DataRow '获取生成此节点的DataRow
    txt1 = dr("加工人")
    e.Form.DropDownBox.Value = dr("加工人")
End If

双击节点后，数据不能引入TextBox1