connection = manager.OpenDevice(device, interface, True)
Dim bytes() As Byte
Dim b As ByteConverter
Dim responseBuffer( outEndpoint.MaxPacketSize) As Byte
bytes = b.HexToBytes("62000000000000000A404000BF38100000253455249440100")
dataTransferred=connection.BulkTransfer (inEndpoint, responseBuffer,responseBuffer.Length,500)
Dim sResponse As String
sResponse=b.HexFromBytes(responseBuffer)
'this last line is cut....