主题：插入那里的有错误，帮我看一看，不可见和不可编辑是逻辑型

Dim result As DialogResult
    result=messagebox.show("确实要对表授权吗?点击[是]后,将增加记录!","提示!!!",MessageBoxButtons.YesNo,MessageBoxIcon.Question)
If Result=DialogResult.Yes Then
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim lst1,lst2,lst3 As String

    lst1=e.Form.controls("ComboBox1").text
    lst2=e.Form.controls("ComboBox2").text
    lst3=e.Form.controls("ComboBox3").text   
    If lst1<>"" And lst2<>"" And lst3<>"" Then   
    cmd.C
    cmd.CommandText="insert into {授权表} (部门,用户名,表名,列名,不可见,不可编辑) values ('" & lst1 & "','" & lst2 & "','" & lst3 & "',"" ,  True ,True) "  //这段有错误帮我看一看
    cmd.ExecuteNonQuery
    Else
        MessageBox.Show("数据不能为空!", "提示")
    End If

列有6个，指定的值只有5个，是不是应该：

cmd.CommandText = "insert into {授权表} (部门,用户名,表名,列名,不可见,不可编辑) values ('"  & lst1 & "','" & lst2 & "','" & lst3 & "','" & lst4 & "', True ,True)"