以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [目录树]求代码编写  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=71115)
--  作者：吾家细草
--  发布时间：2015/7/5 17:00:00
--  [目录树]求代码编写

按照帮助文件http://www.foxtable.com/help/topics/1988.htm做了一个目录树窗口，在窗口上加了一个文本框。

如何编写代码，使生成的目录树文件名等于文本框中输入的值。
--  作者：大红袍
--  发布时间：2015/7/5 17:04:00
--  

 保存成这个文件名？

 

保存 Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim fn As String = ProjectPath & e.Form.Controls("TextBox1").Text & ".foxtr"
tr.Save(fn)
--  作者：吾家细草
--  发布时间：2015/7/5 22:37:00
--  

太牛了，原来是这么组合的。谢谢老师。