菜单项不能按“名称串”存取,只能用CASE语句一条一条判断。
下面是例子。
for i=1 to aa.rowcount()
id1 =aa.object.id[i]
check1 =aa.object.check_box[i]
menu_text=aa.object.menu_label[i]
// messagebox('',string(id1)+' '+string(check1))
if ( check1<>1 ) then ////
CHOOSE CASE menu_text
case 'i_menu_m_1'
i_menu.m_1.visible=false
case 'i_menu.m_1.m_11.'
i_menu.m_1.m_11.visible=false
END CHOOSe
end if
next