列有6个,指定的值只有5个,是不是应该:
cmd.CommandText = "insert into {授权表} (部门,用户名,表名,列名,不可见,不可编辑) values ('" & lst1 & "','" & lst2 & "','" & lst3 & "','" & lst4 & "', True ,True)"