Bonjour,

Je suis étudiant et je me lance dans le langage de programmation Visual basic. J'ai pour projet de lire les données d'une carte RFID via un lecteur en RS232. J'ai donc commencer à écrire mon code. J'arrive à lui envoyer une trame mais impossible d'afficher la réception des trames. Je sais que c'est un problème pas compliquée mais cela fait 2 jours que je tourne en rond sur les forums donc voici mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Public Class Form1
 
    Dim a As Integer
 
    Public Event DataReceived As IO.Ports.SerialDataReceivedEventHandler
 
    ' -------------------------   Fenetre du Programme -------------------------------
    Private Sub Form1_Load() Handles MyBase.Load
 
        Try                     'Ouverture du port serie
            SerialPort1.Open()
        Catch ex As Exception
            MessageBox.Show("Impossible d'ouvrir le port ")
        End Try
 
    End Sub
    '---------------------------------  Bouton pour l'arret du Port---------------------------
 
    Private Sub BP_arret_Click() Handles BP_arret.Click
        SerialPort1.Close()
 
    End Sub
    '-------------------------------Reception des données du port série -----------------------
    Private Sub SerialPort1_DataReceived() Handles SerialPort1.DataReceived
        Dim inputData As Byte
        inputData = SerialPort1.ReadExisting
        Me.Invoke(New EventHandler(AddressOf DoUpdate))
 
    End Sub
    '------------------------------Envoie d'une Trame avec un Bouton -------------------
    Private Sub donnee_Click() Handles donnee.Click
 
        SerialPort1.Write(Chr(18) & Chr(1) & Chr(32)) 
 
    End Sub
 
    Public Sub DoUpdate()
        TextBox1.Text = TextBox1.Text & inputData
    End Sub
 
End Class
Voila mon problème vient de la réception des données je souhaite les afficher dans un TextBox en Hexadecimal.

Je remercie d'avance celui qui prendra le temps de m'aider.

A bientôt ....