Visual Basic - ayuda con Getportbit

hola, necesito un ejemplo de codigo para saber el estado de un bit (1 o 0)del puerto paralelo Salida. Se utiliza la funcion Getporbit, pero no se como extraer el valor . ejm. Quiero saber el estado del bit (0) que corresponde al pin 2 puerto &H378

El segundo parámetro se envía por referencia como dice el prototipo:

Private Declare Function GetPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte) As Boolean

Dim bRetVal As Boolean, aData As Byte
bRetVal = GetPortBit(&H378, aData)

Debug.Print bRetVal

Debug.Print aData