Codigo de barras

Hola tengo que generar el codigo de barras de un producto desde visual basic y al mismo tiempo que lo pueda leer el lector espero haberme explicado bien y gracias de antemano x la atencion.

La verdad es que apenas me hicieron el comentario, pero yo quisiera ir viendo algunas cosas para ver como funciona no si tengas algo que me pueda ayudar de antemano te agradeco tu atención.

pues si me pudieras proporcionar tu algoritmo para ir viendo como trabaja o informacion todo es bueno de verdad y muchas gracias

Como te comentaba es la pimera vez que veo este tema no se si me puedas sugerir alguno porque desconosco cual pedirte gracias.

Te voy a simplificar la pregunta ¿Que fuentes de código de barras tienes en la actualidad? en base a esas fuentes puedo enviarte algoritmos.

3of9:
Solo agrega un asterisco al principio y al final del texto



****************
128:

El caracter final es Chr(138)

Tipo A:
cInicio = Chr(135)
nLimite = 64

Tipo B:
cInicio = Chr(136)
nLimite = 99

Para los dos tipos anteriores:
El control es el valor ASCII de cInicio -32 más la suma del valor ASCII del caracter por la posición en el valor a convertir.


Tipo C:
debe ser numérico de longitud par
cInicio = Chr(137)
.nVerifica = 105
El valor ASCII de cada dos dígitos se agrega a la cadena.
El control es el valor númérico de cada caracter de la cadena más la posición del caracter.
El caracter verificador en los tres tipos se obtiene con el valor ASCII del módulo 103 del control

*********************************
EAN13
Debe ser de longitud 12
Se tiene un arreglo:
m.aTabla[01] = "000000aaaaaa"
m.aTabla[02] = "00A0AAaaaaaa"
m.aTabla[03] = "00AA0Aaaaaaa"
m.aTabla[04] = "00AAA0aaaaaa"
m.aTabla[05] = "0A00AAaaaaaa"
m.aTabla[06] = "0AA00Aaaaaaa"
m.aTabla[07] = "0AAA00aaaaaa"
m.aTabla[08] = "0A0A0Aaaaaaa"
m.aTabla[09] = "0A0AA0aaaaaa"
m.aTabla[10] = "0AA0A0aaaaaa"
El control se obtiene con la suma del valor de cada caracter de la cadena por 3 en el vaso de posición par y por uno en el de posiciones nones
El dígito verificador es el módulo 10 de control y se suma a la cadena a convertir.
El resultado es el valor del primer dígito de la cadena más 35 más la conversión de de cada caracter en el valor del caracter que ocupa el espacio en el arreglo de la posición modulo 9 del valor a convertir.

********************************
EAN8
Debe ser de longitud 7
El control se obtiene con la suma del valor de cada caracter de la cadena por 3 en el vaso de posición par y por uno en el de posiciones nones
El dígito verificador es el módulo 10 de control y se suma a la cadena a convertir.
El resultado es el valor de cada caracter más 48 en los primeros cuatro caracteres y 97 en los últimos cuatro.