Controlla che nella riga

myDr2.Item(sProva1) = ctrl.Text.ToString

sProva1 assuma valori corretti rispetto ai campi della tua tabella.

Esegui il debugging passo passo.