主题：二次筛选求助

不好意思，对话框能打开，但不会在目录树控件中加载目录树文件，还是公开吧

贴出你写的代码，我帮你看看问题在什么地方。

 

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "文本文件|*.foxtr" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    MessageBox.Show("你选择的是：" & dlg.FileName,"提示") '提示用户选择的文件
End If

 

 

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "文本文件|*.foxtr" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
        Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
         trv.Nodes.Clear() 
        trv.Load(dlg.FileName)
End If

好的

能再告诉我狐表菜单目录树编辑器中"保存"按钮的代码吗?(不是帮助中的)

再提一下

Dim dlg As New SaveFileDialog
dlg.Filter= "文本文件|*.foxtr" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
     Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
      trv.Save(dlg.FileName)
End If

你这是“另存为”代码，我要的是“保存”按钮代码

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.Save(“文件名")

这个文件名要指定吗？狐表的目录树编辑工具不需要指定，打开什么文件就保存什么文件