Buenas.. ya hablamos de como leer datos del puerto paralelo y esto me funciona, ahora ... cómo puedo hacer para que estos datos que recibi (q a mi .. como plantee en la discucion anterior, me dan "255, 247" etc... ) sea una cadena de bites que provienen de los datos de una balanza electrónica, lo hago con el anterior cód. y en vez de 255 me daria el cadena de caracteres q ingresa al puerto ???.
El cód. anterior era este...
en un módulo:
Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
en el form:
Private Sub Form_Load()
Text1.Text = Str(Inp(Val(&H378))) ? aca me devolveria la cadena de bits q
End Sub
GRACIAS.
Lau
