También podría ser esto:
intNum = miComando.ExecuteNonQuery
ponlo así:
intNum = miComando.ExecuteNonQuery
()
Y una recomendación: cierra la conexión con la BD en el bloque Finally:
try
...
catch
...
finally
conexion.Close()
end try
Si lo pones en el try y se produce una excepcion antes de llegar a la linea en que se cierra la conexión, esta queda abierta. Si la pones en el finally, se cierra pase lo que pase.
Salu2