Bueno, [url="http://www.idautomation.com/fonts/"]aquí [/url]tenés una serie de fuentes de códigos de barra.
Sólo tenés que escribir el texto que querés codificar (por ejemplo, en Word), e imprimirlo...
Para leerlo, en nuevo Form, agregá:
2 Labels
1 Textbox
A uno de los labels, escribile en la propiedad "Caption": "Ingrese código:"
Al TextBox, en propiedad "Text" dejale una cadena vacía, y ubicalo junto al Label1.
En Text1.KeyPress
Código:
If KeyAscii = 13 Then
Label2.Caption = Text1.Text
Text1.Text = "" ' para que te habilite la búsqueda de otro libro rápidamente
EndIf
Esto es sólo para mostrarte cómo funciona... En Text1.Text, vas a tener lo que dice la etiqueta del libro, y ahí ya podés, por ejemplo, utilizarlo para buscar las propiedades del libro en la base de datos...
Marcadores