主题：treeview 代码移动节点

参考 http://www.foxtable.com/webhelp/scr/1988.htm

直接用代码这样写

Dim btr As object = e.form.controls("Treeview1").basecontrol
Dim nd = btr.nodes(1)
btr.nodes.remove(nd)
btr.nodes.insert(0, nd)