for each Strip As WinForm.Strip in e.Form.Strips("某主菜单")for each itm As WinForm.StripItem in Strip .items
msgbox(itm.name)
next
next
ct.Strips("主菜单").Items("设置").Items("打开设置").text ="关闭设置"
为什么赋值后退出程序再次打开后显示更改的菜单名称没修改呀?
代码更改的都是临时的,把代码放到afterload,每次启动窗口都要改一下。永久的请到菜单设计里改
If e.Form.Strips.Contains("工具栏1") Then
MessageBox.Show("工具栏1已经存在")
End If
这句代码不能判断子菜单名称是否存在吗?怎么没有反应呀?
这个判断的是"工具栏1"是否存在,没反应说明不存在