Send data PIC to PC

[aratti]

konter you have an array of text1(n).text boxes and, with your VB code, in every box you transfer just one byte, so you must have all the boxes on the form to see something.

Text1(1).Text = BufferIn(2)
Text1(2).Text = BufferIn(3)
Text1(3).Text = BufferIn(4)
Text1(4).Text = BufferIn(5)
Text1(5).Text = BufferIn(6)
Text1(6).Text = BufferIn(7)
Text1(7).Text = BufferIn(8)
Text1(8).Text = BufferIn(9)

It is much better with one single text box

Dim I as Integer
Text1.text = ""
' first byte is the report ID, e.g. BufferIn(0) so you start with 1
For I=1 to 9
Text1.text = text1.text + BufferIn(I)
next

In the above example you will have all the bytes nicely added to text1.text box

Al.

[konter]

Thanks for the clarification, well I put it with intent for all who would help them to understand, because if everyone does not know how to program in VB.
Anyway still not working,
I put a Timer every 1ms buffer but I read nothing at all, for me the bug is in the sequence of programming the PIC, but no where with. "GoSub DoUSBOut" or "Gosub DoUSBIn" I've changed so many ways not to do.
For the program to read the VB inside PIC and see it in textBox.

THX