添加
思路用split(),函数实现。把,1,2,3这样的字符串用split()函数转化成数组如 Dim TestAry TestAry=split(",1,2,3",",") 转化成数组后 判断修改那个权限然后就把选中的权限写回去没选中的抛弃掉。或者用replace加instr函数来实现instr判断某个选中权限是否存在,不存在添加权限。然后用replace把删除的权限文字删除掉。