URGENT pb d'affichage recption port com

Question

je n'ariive pas afficher ce que je recois de mon port serie
la chaine que je recois ' 12120kg 02' est variable en fonction du poids

si je veut l'afficher dans un champ label il ne m'affiche que "g 02"
comment faire pour avoir l'integralite de ma chaine
ci dessous le code que j'utilise
Merci d'avance de votre aide

Private Sub MSComm1_OnComm()
Dim Tampon As String


Select Case MSComm1.CommEvent
Case comEvReceive
      Tampon = (MSComm1.Input)
      chaine = Tampon + MSComm1.Input
      Call Traitement(Tampon) 'traitement donn&#233;es
      Case comEvSend 


Case comEvEOF 
End Select


End Sub


Private Sub Traitement(chaine As String)



'cette proc&#233;dure sert &#224; traiter l&#146;information re&#231;ue dans le tampon
    Text2.SelStart = Len(Text2.Text)
     Text2.SelText = chaine
     Text1.Text = chaine
     Label1.Caption = chaine

cs_Jack · Answer

-1- Je ne sais pas ce que tu fais avec ton 
   Tampon = (MSComm1.Input)
   chaine = Tampon + MSComm1.Input
Du coup, les donn&#233;es re&#231;ues apparaissent deux fois.
Les donn&#233;es sont vid&#233;es apr&#232;s l'utilisation de MSComm1.Input, donc le    chaine = Tampon + MSComm1.Input   ne sert &#224; rien
... d'autant plus que tu ne t'en sers pas ensuite !

-2- Quand OnComm se d&#233;clenche, c'est que de nouvelles donn&#233;es viennent d'arriver.
Par contre, rien ne dit qu'il n'y en aura pas d'autre par la suite.
Donc, il faut m&#233;moriser les infos qui arrivent au fur et &#224; mesure (regarde dans l'aide le dimensionnement de variables en Static) et ne traiter ta chaine que lorsque tu es s&#251;r d'avoir tout re&#231;u (Timer de 2 sec ou d&#233;tection comEvEOF si applicable)

-3- Ton code est tr&#232;s brouillon, tu ne d&#233;clares pas tes variables : le "chaine =" dans le MSComm1_OnComm ne sert strictement &#224; rien.
Apprends &#224; dimensionner tes variables en Public, en Private, ou en Dim dans tes Sub ... et tu comprendras quel devient leurs &#233;tendues (tout le projet, toute ta feuille ou seulement ta sub)
Pour t'obliger &#224; d&#233;clarer toutes tes variables (ce que je te conseille pour &#233;viter des bugs et prises de t&#234;te interminable), ajoute "Option Explicit" en t&#234;te de toutes tes pages de codes (voir menu Outils, Options, onglet Editeur, ligne "D&#233;claration des variables obligatoire")

-4- Il doit bien y avoir des sources sur vbfrance qui lisent des ports COM : charges-en qques unes et tu verras comment ils font

Vala
Jack
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Le savoir est la seule mati&#232;re qui s'accroit quand on la partage. (Socrate)

URGENT pb d'affichage recption port com

1 réponse

Discussions similaires