Foro de elhacker.net

Hola a Todos: Me aparece un error al digitar el siguite código:
Private Sub BTN_GRABAR_Click(sender As Object, e As EventArgs) Handles BTN_GRABAR.Click
        Dim conexion As String
        conexion = "Data Source=LAPTOP-97SCGT1G;Initial Catalog=SISTEMATIPO;Integrated Security=True"
        Dim cn As New SqlConnection
        cn.ConnectionString = conexion

        Dim adaptador As New SqlCommand("Insert into Clientes values ('" & TXT_RUTCLIENTE.Text & "', '" & TXT_NOMBRECLIENTE.Text & "', '" & TXT_DIRECCIONCLIENTE.Text & "', '" & TXT_COMUNACLIENTE.Text & "', '" & TXT_CONTACTOCLIENTE.Text & "', '" & TXT_TELEFONOCLIENTE.Text & "', '" & TXT_MAILCLIENTE.Text & "', '" & TXT_CONTACTO2CLIENTE.Text & "', '" & TXT_TELEFONO2CLIENTE.Text & "', '" & TXT_MAIL2CLIENTE.Text & "', '" & TXT_CONTACTO3CLIENTE.Text & "', '" & TXT_TELEFONO3CLIENTE.Text & "', '" & TXT_MAIL3CLIENTE.Text & "')", cn)
        cn.Open()
        adaptador.ExecuteNonQuery()
        MsgBox("Se registró corectamente")


al principio declaré lo siguiente:
Imports System.Data.Sql
Imports System.Data.SqlClient
Imports System.Data.SqlTypes

y la conexión con la base de datos está ok, pero me sigue salisndo el error. ¿Alguien sabe a qué se debe? (Marqué con rojo los errores)

Muchas gracias.