- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 无极限目录树 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90264)
-- 发布时间：2016/9/8 15:36:00
-- 无极限目录树
这种无极限目录树，如何设计的呢
此主题相关图片如下：qq截图20160908153930.png
-- 发布时间：2016/9/8 16:00:00
--
这是菜单，不是目录树http://www.foxtable.com/webhelp/scr/3108.htm
-- 发布时间：2016/9/8 16:01:00
--
当然知道是菜单了，想问的是，如何设计这种无限级别的目录树
是递归吧
[此贴子已经被作者于2016/9/8 16:01:44编辑过]
-- 发布时间：2016/9/8 16:16:00
--
1、直接在设计器添加
2、一个循环即可
Dim mnu As Winform.Strip
Dim itm As WinForm.StripItem
mnu = e.Form.Strips.Add("主菜单",StripTypeEnum.MainMenu)
itm = mnu.Items.Add("项目0","文件0","",StripItemTypeEnum.MenuItem)
For i As Integer = 1 To 10
itm = itm.Items.Add("项目" & i,"文件" & i,"",StripItemTypeEnum.MenuItem)
Next