2010 olarak eklerseniz yardımcı olurum...
Eğer tüm alanlar metin ise aşağıdaki çözümü uygulamanıza ekleyin...
komut.CommandText = ("insert into kayit(adi,soyadi,cep,cinsiyet,tarih,mail) Values('" & AdiTextBox.Text & "','" & SoyadiTextBox.Text & "','" & CepTextBox.Text & "','" & CinsiyetTextBox.Text & "','" & TarihTextBox.Text & "','" & MailTextBox.Text & "')")