Bonjour

je rencontre un petit problème avec le port com1:
je cherche à entrer dans un USF une serie de trois mesures effectué à l'aide d'un comparateur digital je doit effectué sur 8 pièces d'une moulée un relevé de cote
ceci sur trois moulée

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
Private Sub CommandButton3_Click()
'paramétrage du comparateur sylvac
MSComm1.Settings = "4800,e,7,2"
'ouverture du Port
If MSComm1.PortOpen = False Then
MSComm1.PortOpen = True
End If
Moul_Mes = Moul_Mes + 1
'Controls("textbox" & Moul_Mes).SetFocus  ' ça c'est en attente 
'interrogation du port
MSComm1.Output = "?" + Chr$(13)
'inscritption de la lecture dans le textbox(x)  3<=x<=10
Controls("textbox" & Moul_Mes).Value = MSComm1.Input
If Moul_Mes = 10 Then
Moul_Mes = 2
CommandButton2.Enabled = True 'activation du bouton de validation
CommandButton2.SetFocus 'selection du bouton de validation
End If
End Sub
probleme le programme commenc à ecrire dans le textbox4 (au lieu du trois)
la lecture inscrit prend un à deux texbox de retard l'appui sur le bouton trois ne prends pas la valeur du comparateur
Moul_Mes est declarée public dans un module
si quel qu'un peut me dépanner
Merci
Daranc