' per l'esempio utilizziamo il sqlclient, ma se utilizzi Access, devi usare oledb.. 
' comunque il concetto è lo stesso, cambia il nome degli oggetti.
imports System.Data.SqlClient

...

' dichiaro il comando sql parametrizzato
Dim sql as string = "INSERT INTO Tabella (Campo1, Campo2, Campo3) VALUES (@Param1, @Param2, @Param3)"

' creo il command per eseguire lo statement
Dim objCmd as New SqlCommand(sql,tuoObjConnection)

' imposto i parametri con i valori necessari
objCmd.Parameters.Add("@Param1",SqlDbType.Int).Value = 1
objCmd.Parameters.Add("@Param2",SqlDbType.Varchar,50).Value = "CIAO"
objCmd.Parameters.Add("@Param3",SqlDbType.Varchar,20).Value = "PROVA"

' eseguo il comando
objCmd.ExecuteNonQuery()