Nepravilno čitanje sa serijskog porta??

[ Bojan11 @ 28.04.2006. 10:05 ] @

Ovako,
Čitam sa serijskog porta , ali mi funkcija koju imam razdvaja podatke u msgbox-ove i to u svaki BOX mi stavi jedan hex-a znak, ja bi htio da mi se svi ti podaci idu u jedan textbox, šta moram promjenit na funkciji Inače radim sa vb.net-om(2.0) a ova funkcija je pisana u nekoj ranije verziji tako da on nije koristio Serial.IO.Ports klasu

Code:

Private Sub Com_Recieve(ByVal Source As Rs232, ByVal mask As
Rs232.EventMasks) Handles CommPort.CommEvent

On Error Resume Next

Dim data() As Byte

Dim i As Int16

data = CommPort.InputStream()

' ovdje obradujete primljene podatke

For i = 0 To data.Length - 1

MsgBox(data(i).ToString)

Next i

End Sub

[ Bojan11 @ 28.04.2006. 11:32 ] @

A ovaj kod mi blokira aplikaciju, tj. pročita prvi HEX znak:

Code:

    Public Sub InvokeMethod1()

        On Error Resume Next

        Dim returnValue As Byte = SerialPort1.ReadByte
        Dim i As Int16

        For i = 0 To returnValue - 1

            MsgBox(returnValue.ToString)

        Next i

    End Sub

[ silthereen @ 28.04.2006. 18:14 ] @

1. Ako hoces da ti svi podaci idu u jedan msgBox, moraš ga izbaciti iz petlje.
U petlji definiši string koji dobija zbir vrednosti, pa ga posle petlje ubaci u msgBox.

2. Mislim da je u drugom slučaju problem mešanja tipova podataka (byte i integer).

[ Bojan11 @ 29.04.2006. 09:44 ] @

Je, riješio sam! Hvala