晕死了，用了XP风格菜单控件后认不出菜单类型

Dim mnu As Menu
..For Each mnu In main.Controls '设置菜单权限没有用云飞的.net菜单控件前可以通过的
现在用了云飞的.net菜单控件，执行到上面 For Each就说类型错误了

解决方案 »

  1.   

    麻烦你给我发个袁飞的菜单控件，我正在找，十分感谢！
    [email protected]
      

  2.   

    我也想要，能发个给我吗？万分感谢~！
    [email protected]
      

  3.   

    你到底是用 VB6 还是 VB.NET 呢?
    #IF VB6 THEN
       dim c as control
        for each c in me.controls
           if typeof c is menu then
                  ........
           end if
        next
    #ENDIF
      

  4.   

    无论 VB6 版,还是 .Net 版 ,均免费下载使用:http://ygyuan.yeah.net/