insert lento desde Visual con Mysql

[sadas55]

aca les paso el ejemplo , lo probe de 3 formas ahora se las muestro y me dicen:
1) Procedimiento almacenado
Dim CadenaMySql As String
Set Cmd = New ADODB.Command
Cmd.ActiveConnection = Cnn
Cmd.CommandType = adCmdStoredProc
For i = 1 To Configuracion.txtTotalTiros.Text
CadenaMySql = "SN_CargarTotalTiros('" & i & "')"
Cmd.CommandText = CadenaMySql
Cmd.Execute
Next i
2) recordset
Set rs = New ADODB.Recordset
SQL = "select Numerotiro"
SQL = SQL & " from SN_Coincidencias "
rs.Open SQL, Cnn, adOpenKeyset, adLockOptimistic, adCmdText
For i = 1 To Configuracion.txtTotalTiros.Text --> texbox (1.000.000)
rs.AddNew
rs!numeroTiro = i
rs.Update
Next i
rs.Close
Set rs = Nothing
3)
For i = 1 To Configuracion.txtTotalTiros.Text
Cnn.Execute ("insert into sn_coincidencias (numeroTiro) values (" & i & ")")
Next i

Las 3 formas son muy lentas en Mysql las probe en access y funcionan perfecto
Gracias de antemano