Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:afterload事件设置完后 打开项目没显示 只有点窗口应用才行

1楼
gaoyong30000 发表于:2011/8/7 15:56:00
什么情况? 打开项目 不自动跳出 要手动点应用 按照帮助文件  用目录树管理表  这项来做的


要实现这样的功能很简单,设计步骤:

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编辑过]
2楼
kylin 发表于:2011/8/7 18:04:00

1、窗口属性之“自动打开”选择True

2、窗口设计器状态下的工具栏的最右侧,可以选择“窗口2(窗口)”就可以进行窗口的任何设计了

 

呵呵

3楼
gaoyong30000 发表于:2011/8/8 14:58:00

多谢了~~~ 又进步了一点!

共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .05469 s, 3 queries.