Premetto che mi sto avvicinando da poco al vb.net.
Girovagando per la rete sono riuscito a fare questo:

codice:
Imports System.Data.OleDb

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim objconn As OleDbConnection
        Dim stringaconn As String
        Dim stringasql As String
        Dim objcomm As OleDbCommand
        stringaconn = "Provider=Microsoft.JET.OLEDB.4.0;Data Source="
        stringaconn = stringaconn & "C:\Users\Silvia\Desktop\prova.mdb"
        objconn = New OleDbConnection(stringaconn)
        objconn.Open()
        stringasql = "Insert into Tabella1(cognome,nome) values('"
        stringasql = stringasql & Me.txt_cognome.Text & "'" & ","
        stringasql = stringasql & "'" & Me.txt_nome.Text & "'" & ")"
        objcomm = New OleDbCommand(stringasql, objconn)
        Dim risputente As Integer
        Try
            risputente = objcomm.ExecuteNonQuery()
            If risputente = 1 Then
                MsgBox("Inserimento effettuato con successo")
                objconn.Close()
                Me.txt_cognome.Text = ""
                Me.txt_nome.Text = ""
                Me.txt_cognome.Focus()
            End If
        Catch es As Exception
            MsgBox("Errore: il campo cognome e/o nome sono vuoti")
            objconn.Close()
        End Try
    End Sub
Tuttavia riscotro che anche se non immetto dati ottengo sempre il messaggio di inserimento con successo.
Secondo voi dove sbaglio ??

Grazie