以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  如何获取触发事件的菜单名称  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=177534)

--  作者：chen_sheng --  发布时间：2022/5/26 9:49:00 --  如何获取触发事件的菜单名称 Dim Strip As WinForm.Strip Strip = e.Form.Strips.Add("工具栏1", StripTypeEnum.ToolBar) Strip.Items.Add("New", "新建", "new.ico", StripItemTypeEnum.Button) Strip.Items.Add("Open", "打开", "Open.ico", StripItemTypeEnum.Button) Strip.Items.Add("Save", "保存", "Save.ico", StripItemTypeEnum.Button) Strip.Items.Add("Print", "打印", "Print.ico", StripItemTypeEnum.Button) Strip.Items.Add("Separator1", "分割条", "", StripItemTypeEnum.Separator) Strip.Items.Add("Cut", "剪切", "Cut.ico", StripItemTypeEnum.Button) Strip.Items.Add("Copy", "复制", "Copy.ico", StripItemTypeEnum.Button) Strip.Items.Add("Brush", "格式刷", "Brush.ico", StripItemTypeEnum.Button) Strip.Items.Add("Separator2", "分割条", "", StripItemTypeEnum.Separator) Strip.Items.Add("Help", "帮助", "Help.ico", StripItemTypeEnum.Button) e.Form.Controls("Panel1").basecontrol.controls.Add(Strip.basecontrol) 动态生成多个  菜单后 点 "工具栏1"  新建   如何用代码获取触发事件的 工具栏1  类似于 e.Form.Name & "_table2"  [此贴子已经被作者于2022/5/26 9:58:16编辑过]

--  作者：有点蓝 --  发布时间：2022/5/26 10:14:00 --   到菜单事件里才能获取：http://www.foxtable.com/webhelp/topics/3222.htm