主题：[讨论]这个可视化授权能不能把菜单菜权设置这个去了

就你这个例子，代码要改成这样

        For Each s As String In ss
            cmd.CommandText = "Insert Into 授权表 (用户组,bm,lm,不可见,不可编辑) Values" & s
            msgbox(cmd.CommandText)
            cmd.ExecuteScalar
        Next