y al tratar de conectar los dispositivos a la placa de potencia el codigo q creia q funcionaba se echo a rodar y me dejo tirado.
es el sgte
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)