如何得到窗体中菜单的句柄/关于权限的设置

Question

目的：将菜单子项名称存在字符串变量s中，要求通过变化s的控制菜单。
　　　其实是这样的：
　　　我想提取权限表中的菜单名称，如果权限为FALSE，则相应的菜单项不可用
思路如下：
Dim t As Variant（或MENU）
Dim s As String
set s = ”zlcx_xmcx“　’从表里提取的字段，代表菜单项的NAME值
Set t = s
t.Enabled = False 欢迎提出一些好的意见，在这里先谢了！

Answer 1

to:lnwwh(wwh
mnuItem5(intMenu)这是什么意思?

Answer 2

//Dim t As Variant（或MENU）
//Dim s As String
//set s = ”zlcx_xmcx“　’从表里提取的字段，代表菜单项的NAME值
//Set t = s
//t.Enabled = False 被动式Dim C As Object
For Each C In Me.Controls
  If C.Name = "zlcx_xmcx" Then
    Set T = C
    T.Enabled = False
  End If
Next C