Problema con Transacciones mySQL en VB.NET

[chcma]

Buenas tardes !!!

Verán, la cuestión es ke estoy haciendo un ejemplo para eliminar X filas de una tabla usando una transacción.

Mi intención es ke si no se pueden eliminar todas las filas, pues ke no se elimine ninguna.

Para ello, estoy intentando eliminar tres filas, basándome en un capo numérico, en la tercera fila, estoy metiendo un texto, para ke falle. Aún asi, me elimina las dos primeras.

El código es el siguiente:





Dim objTransaccionMySQL As MySqlTransaction
Dim objCmdMySQL As MySqlCommand
Dim Cadena() As String = {111, 222, "ww2"}
Dim i As Integer = 0

objCnMySQL.Open()
objTransaccionMySQL = objCnMySQL.BeginTransaction()
objCmdMySQL = objCnMySQL.CreateCommand()
objCmdMySQL.Connection = objCnMySQL
objCmdMySQL.Transaction = objTransaccionMySQL
Try
For i = 0 To Cadena.Length - 1
objCmdMySQL.CommandText = "delete from tusuarios where dni=" & Cadena(i)
objCmdMySQL.ExecuteNonQuery()
Next
objTransaccionMySQL.Commit()
Catch ex As Exception
MessageBox.Show(ex.Message)
objTransaccionMySQL.Rollback()
Finally
objCnMySQL.Close()
End Try

Por favor, ¿Alguien puede comentarme donde tengo el fallo?

Desde ya, muchas gracias por su atención.