主题：目录树文件

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

Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim fn As String = ProjectPath & "Product.foxtr"
If Filesys.FileExists(fn) Then
    tr.Load(fn)
End If

你看上面的代码像是编辑么？

让你在输入窗口加载目录树文件啊，加载了不就能调用吗

窗口,商品类别设置,Button1,Click

代码贴出来