Bonjour,
je n'arrive pas à lire des données avec SerialPort sous VB Express 2008 dans une appli toute simple:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
SerialPort1.Open()
End Sub
Private Sub Btn_envoi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_envoi.Click
SerialPort1.Write(TextBox1.Text + vbCrLf)
End Sub
Private Sub Btn_lec_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_lec.Click
While SerialPort1.BytesToRead <> 0
TextBox2.Text &= ChrW(SerialPort1.ReadChar)
End While
End Sub
End ClassLes données sont bien envoyées (l'appareil RS232 réagit bien) mais impossible de lire qqe chose, BytesToRead est toujours à 0!!!
Un prog similaire sous VB5 avec MsComm fonctionne très bien ...
Merci de m'aider