- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- afterload事件设置完后 打开项目没显示 只有点窗口应用才行 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=11675)
-- 发布时间：2011/8/7 15:56:00
-- afterload事件设置完后 打开项目没显示 只有点窗口应用才行
什么情况？ 打开项目 不自动跳出 要手动点应用 按照帮助文件 用目录树管理表 这项来做的
要实现这样的功能很简单，设计步骤：
1、新建一个窗口，窗口类型设置为共享，停靠区域设置为左。
2、在窗口增加一个TreeView控件，停靠属性设置为Fill。
3、窗口的AfterLoad事件代码设置为：
Dim trv As WinForm.TreeView =
e.Form.Controls("TreeView1")
Dim nd As WinForm.TreeNode
nd = Trv.Nodes.Add("分类1","分类1")
nd.Nodes.Add("表A")
nd.Nodes.Add("表B")
nd.Nodes.Add("表C")
nd = Trv.Nodes.Add("分类2","分类2")
nd.Nodes.Add("表D")
nd.Nodes.Add("表E")
4、TreeView控件的NodeMouseClick事件代码设置为：
If e.Node.Level =
1
Then
MainTable = Tables(e.Node.Text)
End
If
下载信息 [文件大小： 下载次数： ] 
点击浏览该文件:目录树管理.rar
还有这个帖子 附带的一个问题就是 我把Treeview停靠属性设置成Fill后 怎么取消选择Treeview控件 我想切换到窗口设置事件 却怎么也切换不过去！
[此贴子已经被作者于2011-8-7 15:59:22编辑过]
-- 发布时间：2011/8/7 18:04:00
--
1、窗口属性之“自动打开”选择True
2、窗口设计器状态下的工具栏的最右侧，可以选择“窗口2（窗口）”就可以进行窗口的任何设计了
呵呵
-- 发布时间：2011/8/8 14:58:00
--
多谢了~~~ 又进步了一点！