Algoritmo para generar un número de tarjeta bancaria usando VB

El algoritmo para generar números de tarjetas bancarias usando VB es el siguiente:

1 Después de eliminar el dígito de control, comience desde 0 y codifique el número de tarjeta de derecha a izquierda.

2. Suma números pares × 2 y el resultado es bit a bit. Si el número par es 6, × 2 = 12, 1 más 2 es igual a 3. Los bits impares intervienen directamente en la suma.

3. Repita el paso 2 para obtener la suma. La suma debe ser divisible por 10 más el dígito de control; de lo contrario, el dígito de control es incorrecto.