Bonjour les développeurs,
Voila j'ai une question. Je récupère une données Rs232 en héxadécimal et je les affiches ensuite dans une TextBox et mon problème et l'orsque je reçois ma donnée hexa (par exemple : "05") ben il m'affiche juste "5", pour les autres aucun soucis (par exemple :"88" s'affiche "88"). je voudrais donc que dans ma TextBox il m'affiche bien le 0 devant les chiffres.
Je vous montre des Parties de mon code. Plus partique pour voir les variables:
Voila si certain on une petite astuce ou la solution...
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 Public Class Form1 Dim Data As Byte Dim don1(900000) As String Dim i As Integer = 1 '-------------------------------Reception des données du port série ----------------------- Private Sub SerialPort1_DataReceived() Handles SerialPort1.DataReceived Do While SerialPort1.BytesToRead <> 0 Data = Data & Hex(SerialPort1.ReadByte) don1(i) = Data i = i + 1 Data = 0 Loop Me.Invoke(New EventHandler(AddressOf DoUpdate)) End Sub Public Sub DoUpdate() TextBox2.Text = don1(1) & " " & don1(2) & " " & don1(3) & " " & don1(4)
Merci d'avance
Partager