通过treeview建一个嵌套文件夹的目录,然后点击节点名称,在表内显示文件夹内的文件夹和文件名称。遇到的问题是treeview里的节点可能是重复的,用indexof搜到的结果有问题。请问还有其它更好的方式吗?谢谢!
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1") For Each nd As WinForm.TreeNode In trv.AllNodes If nd.Text.IndexOf(tab1.current("名称")) >= 0 Then 'nd.Checked = True 'messagebox.show(ProjectPath & "DocumentManu\" & nd.FullPath) txt1.text = ProjectPath & "DocumentManu\" & nd.FullPath 'messagebox.show(ProjectPath & "DocumentManu\" & nd.FullPath) End If Next
|