 加好友  发短信
等级：三尾狐
帖子：702
积分：6293
威望：0
精华：0
注册：2018/5/10 9:05:00
|
如何获取触发事件的菜单名称  Post By：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编辑过]
|
|
