Se non indichi QUALE riga genera l'errore...

Tra l'altro, spiega cosa c'entra questa riga

codice:
Dim cb As New OleDb.OleDbCommandBuilder(da)
con il resto del codice ???
Non mi sembra usato da nessuna parte...