Prueba colocar String(Len(cedula.Text), CStr(Looping)), yo había puesto 8 porque todos los ejemplos que me habías puesto tenían 8 caracteres, pero me lo cambiaste a 10

, ahora yo lo vuelvo a cambiar para que compruebe de acuerdo a la longitud del campo

.