Problemas con Puerto paralalelo en Visual Basic

[electrokaki]

Buen dia estuve leyendo un manual sobre VB en este sitio eh hice todo como dicen ahi entendi todo pero tengo problemas cuando apreto el Boton me tira un error y me deja de fucionar la aplicacion... Aclaro q tengo Windows Vista Ultimate 32 Bits
este es el codigo q utilice:

Module 1

Código:

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)

Formulario

Código:

Private Sub Command1_Click()
Out &H378, 255
End Sub
Private Sub Command2_Click()
Out &H378, 1
End Sub
Private Sub Command2_Click()
Out &H378, 
End Sub

la entrada y salida es 0378 - 037F

Este es el error q me da:


Si alguien tiene la solucion aeste problema... ya prove de todo busque de todo...

 

[fernandoae]

Yo te sugiero que uses la io.dll
Y si sigue sin funcionar volveria al XP... el vista es un asco ademas consume muchos recursos!

 

[electrokaki]

tu la sabes usar? me ayudas a entender como se utilisa

 

[electrokaki]

buenas mas información.....
Me vaje mil ejemplos y no me anda ninguna todos el mismo erroe se tilda y o me dice q el EL puerto paralelo dejo de funcionar....

La cuestion es q me baje un ejemplo en C y anda bien... llegue a la conclucion q es problema de Visual Basic.... debe ser culpa de este vista q es una mierda....

si alguien tiene algo q decirme o algon consuelo jaja+

 

[Meta]

Mejor utiliza el nuevo VB .net 2008

http://www.microsoft.com/express/download/