Assistance Required with VB.net

[LEDave]

Hi Henrik,

Success, but..........!

First of all the success. I changed the PIC code to:

SEROUT2 PORTC.3, 16780, [ z]

Then changed this line in the VB program:

 Me.AddListBoxItem(SerialPort1.ReadExisting)

To:

Me.AddListBoxItem(SerialPort1.ReadByte)

And away it went reading and displaying Random Bytes, brilliant

Now for the but part. I actually want the VB program to read a WORD sent from the PIC (a short in VB?) however for the AddListBoxItem(SerialPort1.Readxxxx there is:

ReadByte
ReadChar
ReadExisting
ReadLine
ReadTo

No ReadShort

Now I'm thinking somehow it's send a High Byte from the PIC then a Low Byte and join them together in VB, unless there's a 'ReadShort' option.

Dave

[HenrikOlsson]

Hi Dave,

Nope, a word is two bytes and you have to treat like that.

The serial port object has a RecevieThreshold property that you can use to fire the Receive event only when so many characters has arrived. If you set it to 2 it will fire every time there's two bytes in the buffer, then you can do something like:

myHighByte = SerialPort1.ReadByte
myLowByte = SerialPort1.ReadByte

Then you have to put them back together with something like

Me.AddListBoxItem((myHighByte * 256 + myLowByte).ToString)

That's ONE way and it'll probably work if "all" your doing is sendning a word over at certain intervals.

/Henrik.

[LEDave]

Hi Henrik,

Thanks for that, Ill get on it tonight.

Good to get the program receiving and displaying Bytes correctly though.

Dave

[LEDave]

Hi Henrik,

Quick question:

The serial port object has a RecevieThreshold property

In VB6 it does but does it in VB2008?

Dave

[HenrikOlsson]

Hi,Mine does....but it's called ReceivedBytesThershold, by default it's set to 1.

I told you my syntax might be off ;-)

/Henrik.

[LEDave]

So does mine and I've set it to two

How did you copy yours and make it an attachment?

Dave

[mackrackit]

I like this
http://sourceforge.net/projects/greenshot/