Function Convertir(b1 As Byte, b2 As Byte) As Integer Convertir = b1 * 256 + b2
End Function
?
HelloWorld
Non ... type mismatch
avec :
Type pouf
byte1 As Byte
byte2 As Byte
End Type
Function Convertir(b1 As Byte, b2 As Byte) As Integer
Dim blam As pouf
blam.byte1 = b1
blam.byte2 = b2
Convertir = CInt(blam) <= ici "type mismatch"
End Function
thegti
Bah y'a plein de possibilités différentes mais regarde la doc msdn pour les opérations sur les bytes
Mais sinon tu te fait un type (commande TYPE) de 16 bits (=2 bytes), tu fait une petite fonction de construction qui prend en paramètres tes deux bytes, et après tu essaye CInt sur ton type, ca devrait passer
HelloWorld
non ...
cint ca me converti UN byte (=89 par exemple) en un integer(=89)
moi il faut me convertir 2 bytes en UN integer ... (2 octet) ..
C'est une histoire d'adresse ... de type ...
bref : soit ma variable : dim var() as byte
pouvoir la considérer en var() as integer
donc si dim var(1 to 100) as byte
devient dim var(1 to 50) as integer