codice:
Dim connA As New OleDbConnection(_
    "DATA SOURCE=" & strPathDBRead & ";Persist Security Info=False")
Dim cmdA As New OleDbCommand("", connA)
cmdA.CommandType = CommandType.Text
Dim daA As New OleDbDataAdapter(cmdA)
Dim dtA As New DataTable

Dim strIns As String = "INSERT INTO tbTabelle(NomeTabella) " _
                      & "VALUES('[pippo]')"

'come vado avanti?

domandina.....CommandType.Text cosa contiene?