Hola Ehureka. Para enviar y recibir datos del puerto paralelo desde VB, necesitas descargar y registrar una libreria.
Te adjunto la libreria debajo de este mensaje asi ya la tienes.
Luego en tu programa, necesitas declarar la funcion y procedimiento a utilizar de dicha libreria:
Private Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Private Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal value As Integer)
Su utilizacion es facil. Ejemplo:
Out &H378, 128 'Epulsa el valor binario 10000000 en el puerto paralelo
msgbox inp(&H37A) 'Muestra un cuadro de mensaje con el valor del puerto 37AH
Luego, te recomiendo que mires este link para saber qué hace cada uno de los pines del puerto paralelo y en que registro esta ubicado cada uno:
http://www.anser.com.ar/pc.htmGralmente el puerto paralelo de la PC se encuentra en la direccion 378H, aunque puede variar.Ingresando al administrador de dispositivos del Windows y mirando las propiedades del puerto paralelo, puedes facilmente ver donde esta ubicado en tu PC.
Saludos.