Foxtable(狐表)用户栏目专家坐堂 → [求助]如何遍历未打开窗体的菜单名称


  共有1700人关注过本帖平板打印复制链接

主题:[求助]如何遍历未打开窗体的菜单名称

帅哥哟,离线,有人找我吗?
2900819580
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1327 积分:9648 威望:0 精华:0 注册:2015/6/30 8:46:00
[求助]如何遍历未打开窗体的菜单名称  发帖心情 Post By:2019/9/22 8:31:00 [只看该作者]

如下代码是遍历当前窗体所有菜单,但如果窗体没有打开,如窗体名称是 “物料表”

Dim fi As String
For Each st As WinForm.Strip In e.form.Strips
    For Each it As WinForm.StripItem In st.Items
    If fi > "" Then fi &= "|"
        fi &=  it.Name
    Next
Next
InputValue(fi,"","")

 

代码应该怎么修改1


 回到顶部