- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 怎样动态生成 窗口列表 菜单？求指教 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173252)
-- 发布时间：2021/11/21 14:53:00
-- 怎样动态生成 窗口列表 菜单？求指教
怎样动态生成 窗口列表 菜单？
[此贴子已经被作者于2021/11/21 14:53:13编辑过]
-- 发布时间：2021/11/21 20:22:00
--
参考：http://www.foxtable.com/webhelp/topics/1134.htm
Dim memu As RibbonMenu.MenuButton = TopToolBar.Items("窗口切换")
For Each f As WinForm.Form In Forms
Dim b As New RibbonMenu.Button(f.Name)
b.Text = f.Name
memu.Items.Add(b)
Next