Nightguest
Messages postés3Date d'inscriptionmardi 28 décembre 2010StatutMembreDernière intervention29 décembre 2010
-
28 déc. 2010 à 17:49
Nightguest
Messages postés3Date d'inscriptionmardi 28 décembre 2010StatutMembreDernière intervention29 décembre 2010
-
29 déc. 2010 à 13:48
Bonjour,
Je doit réaliser une application de surveillance d'automate,
l'automate m'envoie 2 mots de 8bits et j'ai besoin de récupérer le mot de 16bits
Je sais lire sur mon programme la réponse de l'automate
Par exemple:
J'obtient dans une textbox "38 148" et je doit convertir ces 2 mots en un seul mots de 16 bits qui doit me donner 9876
J'ai une source qui parle de Cstr mais je n'arrive pas à le faire fonctionner
Ou bytes contient "38 148" et returndata devrait me retourné 9876.
Dim i as integer
Dim returndata as string
For I = 9 to 10
Returndata &= Cstr(Bytes(i)) & " "
next
return returndata
cs_ShayW
Messages postés3253Date d'inscriptionjeudi 26 novembre 2009StatutMembreDernière intervention 3 décembre 201957 28 déc. 2010 à 21:29
Bonsoir
Dim w1, w2 As Byte
Dim str As String
Dim result As Int16
str = Nothing
w1 = 38
w2 = 148
str = Convert.ToString(w1, 2)
str = str & Convert.ToString(w2, 2)
result = Convert.ToInt16(str, 2)