bonjour
voila je suis entrain de faire un programme qui fait l'acquisition d'un appareille de mesure , quand je fait l'éxécution pas a pas cela fonctionne correctement avec F8 , mais quand je le fait avec F5 le buffer est vide
valeur du buffer avec F8 = 01A+00000
dois je me servire d'une temporisation ?
si c'est le cas ,comment ?
merci de bien vouloir m'aider
voila je suis entrain de faire un programme qui fait l'acquisition d'un appareille de mesure , quand je fait l'éxécution pas a pas cela fonctionne correctement avec F8 , mais quand je le fait avec F5 le buffer est vide
valeur du buffer avec F8 = 01A+00000
dois je me servire d'une temporisation ?
si c'est le cas ,comment ?
merci de bien vouloir m'aider
Private Sub CommandButton1_Click()
' Utilise COM1
MSComm1.CommPort = 1
MsgBox "le port est active"
' 9600 bauds, pas de parité, 8 bits de données et 1 bit d'arrêt.
MSComm1.Settings = "9600,N,8,1"
MsgBox "la configuration est faite "
' Indique au contrôle qu'il doit lire la totalité
' du tampon si la propriété Input est utilisée.
MSComm1.RThreshold = 1
MsgBox "l'évenement est apeler"
MSComm1.InputLen = 0
MSComm1.InputMode = comInputModeText
' Ouvre le port.
MSComm1.PortOpen = True
' Envoie la commande Attention a l'apareille.
MSComm1.Output = Chr$(49) & Chr$(13)
buffer$ = buffer$ & MSComm1.Input 'jarrive a lire le contenu du buffer pas a pas
Debug.Print "la valeur d'entree = " & buffer$
buffer$ = Right(buffer$, 6)
Range("A1").Value = buffer$
MsgBox "valeur mesurer=" & buffer$
MSComm1.PortOpen = False
End Sub