Dim _Con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=mydatabase.mdb;User Id=;Password=;")
Dim _Cmd As OleDbCommand
Dim _String As String
_Con.Open()
_String = "Insert Into ชื่อ Table ของเรา(ฟิวล์ของเรา,ฟิวล์ของเรา,.....) Values(ค่าของเรา,ค่าของเรา,...)"
_Cmd = New OleDbCommand(_String, _Con)
_Cmd.ExecuteNonQuery()
_Con.Close()