Visual Basic - Necesito ayuda, no me guada el base de datos

hola a todos tengo lo siguiente , estoy trabajando con una base de datos hecha en access y vb.net , una aplicacion sencillo, la operacion insertar y modificar me funcione bien dentro de programa, el problema es que ingreso y solo lo guarda en memoria , no en la base de datos , al salir de programa los datos pierde....

No se si no conecte bien el base de datos, error de mi programacion o error de mi base de datos....

Dim conectar As New System.Data.OleDb.OleDbConnection
conectar.ConnectionString = conection_string
Try
conectar.Open()
Catch ex As Exception
MsgBox("Error en conectar base de datos!!!!", MsgBoxStyle.Critical)
MsgBox("Busca alguien para revisar el base de datos!!!!", MsgBoxStyle.Critical)
End Try

Dim sSql As String = "insert into USUARIOS (NOMBRE, USUARIO, PASS, PRIVILEGIO) values('" & Trim(Replace(TextBox1.Text, "'", "k")) & "', '" & Trim(Replace(TextBox2.Text, "'", "k")) & "', '" & Trim(Replace(TextBox3.Text, "'", "k")) & "', '" & Trim(Replace(ComboBox1.Text, "'", "k")) & "')"
Dim comando As New OleDbCommand
Dim imagentabla As New DataTable
Dim adaptador As New OleDbDataAdapter
comando.Connection = conectar
comando.CommandText = sSql
adaptador.SelectCommand = comando

comando.ExecuteNonQuery()
comando.Dispose()
conectar.Close()

MsgBox("Usuario agregada", MsgBoxStyle.ApplicationModal)

limpiar()
Me.USUARIOSTableAdapter.Fill(Me.BASEDATOSCONODataSet.USUARIOS)

aqui dejo el programa....

http://www.mediafire.com/download/nna50sg47hcwfgk/cono+system.rar

estoy trabajando en VB2008 con Access 2010. Agradeceria mucho por su ayuda....

Yo te sugiero que hagas una prueba poniendo la base de datos en otra ruta, por ejemplo: C:\Sistemas\XXXXX

En windows7 y 8 algunas rutas se tratan de manera especial, entonces para no meterme en una larga explicacion te hice la sugerencia anterior... prueba y veras...