Public Sub criar()
Try
Dim adc As New Adcionar
Acess.AddParam("@email", Adc.txt_email.Text)
Acess.AddParam("@nome", Adc.txt_lgn.Text)
Acess.AddParam("@pass", Adc.txt_pass.Text)
Acess.ExecuteQuery("INSERT INTO LOGIN (User,Senha,Email) VALUES (@nome,@pass,(@email)")
Acess.Fechar()
MessageBox.Show("Seu usário foi cadastrado.")
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try
End Sub
Erro de sintaxe no insert into, o que tem de errado? ja tentei com letras minusculas mas não consigo!