Projenizi açamadım ama;


cnn.Open()

Dim s As String

s = "insert into ARAÇBİLGİLERİ(Adı_Soyadı) Values ('" & TextBox1.Text & "')"

Dim cmd As New OleDbCommand(s, cnn)
cmd.ExecuteNonQuery()


ListBox1.Items.Add(TextBox1.Text)

cnn.Close()


kodlarını butonun click olayına yazarsanız hem listboxa atar hem de veri tabanına kaydeder.

Umarım aradığınız cevaptı.