Dim sqlEkle As New OleDb.OleDbCommand("Insert into fakulte (fakulte_adi,fakulte_adres) values ('" & TextBox1.Text & "','" & TextBox2.Text & "')", baglanti)
baglanti.Open()
sqlEkle.ExecuteNonQuery()
Label3.Text = "Yeni kayıt eklendi."
Label3.ForeColor = Color.Red
TextBox1.Text = ""
TextBox2.Text = ""
Formum bu.