Oncelikle access 2003 te veri isimli bir veri tabanı oluşturduk. kimlik isimli tablonun icine ad,soyad,tc isimli alanlar oluşturduk.

Ardından Visual Basic Formumuza 3 adet metin kuttusu ve 1 adet komut duğmesi ekledik

Kodlar aşağıdaki gibidir.

Not: Programın hata vermemesi icin formu oluşturduktan sonra projenin tamamını kayıt edin . ardından veri tabanı dosyanızı proje klasoru icerisindeki bin dizinindeki debug dizinine kopyalayın.



Imports System.Data.OleDb 'Bu kısım General Decleration kısmına(En uste)

----------------------

Public Class Form1
Dim baglan As OleDbConnection
Dim komut As New OleDbCommand


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim yol As String = Application.StartupPath.ToString()
Dim baglan As New OleDbConnection("provider=microsoft.jet.oledb.4.0; Data Source=" & yol & "\veri.mdb")
baglan.Open()
komut.Connection = baglan
komut.CommandType = CommandType.Text
komut.CommandText = "insert into kimlik (ad,soyad,tc) values ('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "') "
komut.ExecuteNonQuery()
baglan.Close()
End Sub


End Class
__________________