You can automatically generate the Insert command using this code

Dim builder As OleDbCommandBuilder = New OleDbCommandBuilder(dbAdapter)
builder.GetInsertCommand()

or as you suggested create the InsertCommand manually