以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  代码动态的主菜单 赋值  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=139763)

--  作者:yifan3429
--  发布时间:2019/8/20 22:20:00
--  代码动态的主菜单 赋值
直接用代码动态创建一个简单的主菜单
Dim mnu As Winform.Strip
Dim itm As WinForm.StripItem
mnu = e.Form.Strips.Add("主菜单",StripTypeEnum.MainMenu)
mnu.Items.Add("File","文件(&F)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("Edit","编辑(&E)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("Option","选项(&O)","",StripItemTypeEnum.MenuItem)
mnu.Items.Add("Help","帮助(&H)","",StripItemTypeEnum.MenuItem)

怎么赋值代码呢。ItemClick中吗
[此贴子已经被作者于2019/8/20 22:34:15编辑过]

--  作者:有点蓝
--  发布时间:2019/8/20 22:23:00
--  
参考:http://www.foxtable.com/webhelp/topics/3222.htm