Escrever Byte em TextBox

[Maffeis]

Boa Noite

Gostaria de saber como escrever um byte recebido pela Porta Serial em um TextBox na forma decimal, até agora eu consegui escrever o caracter ASCII correspondente ao valor somente.

Obrigado.

[cfreund]

Código: Selecionar todos

Dim codeInt As Integer
' The following line of code sets codeInt to 65.
codeInt = Asc("A")
' The following line of code sets codeInt to 97.
codeInt = Asc("a")
' The following line of code sets codeInt to 65.
codeInt = Asc("Apple")

[Maffeis]

oq eu tenho hj é isso aqui

Código: Selecionar todos

Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As SerialDataReceivedEventArgs)
        Dim n As Integer = SerialPort1.BytesToRead
        Dim comBuffer As Byte() = New Byte(n - 1) {}

        SerialPort1.Read(comBuffer, 0, n)

        If comBuffer(n - 1) = 65 Then
            Comunicação.Text = "Dado Recebido"
        Else
            Comunicação.Text = "Dado Recebido diferente de 65"
        End If
    End Sub

eu queria colocar uma linha de código assim

Código: Selecionar todos

textbox.text = comBuffer(0)


e que apareceça escrito no text Box o valor que eu receber na serial na forma decimal no caso 65

o VB da erro falando que combuffer(0) não está forma correta

obrigado.

[Maffeis]

fiz a seguinte coisa e funcionou

Código: Selecionar todos

Dim BufferTX As Byte() = New Byte(8) {}
BufferTX(0) = 25
TextBox1.Text = "" & BufferTX(0)


só preciso aprender pq funcionou assim e que função é essa &

[tcpipchip]

limpa buffer e concatena

[Maffeis]

legal

deu pra entender essa parte

agora eu estou sem o programa para colocar oque eu fiz

toda vez que ele recebe um dado eu armazeno em uma variável global

quando eu tento escrever esse valor no textbox ele gera um erro de thead

fala que o textbox está sendo acessado por um thead diferente doque foi criado.