' Primero haces referencia a los siguientes Namespaces
Imports System.Data
Imports System.Data.OleDb
' Donde quieras que se conecte a la base pones el codigo segun tu comando
Dim strConexion As String = "" ' Cadena de conexion
Dim miConexion As OleDbConnection = New OleDbConnection(strConexion)
Dim strComando As String = "" ' Comando que deseas ejecutar
Dim miComando As OleDbCommand = New OleDbCommand(strComando, miConexion)
' Si el comando es INSERT INTO, UPDATE, DELETE
miComando.ExecuteNonQuery()
' Si el comando es SELECT
Dim Query As OleDbDataReader
Query = miComando.ExecuteReader
esta es una forma de hacerlo
