SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: JDaniel en Lunes 1 de Septiembre de 2003, 12:01

Título: Re: Variables Single
Publicado por: JDaniel en Lunes 1 de Septiembre de 2003, 12:01

Hola:

      Me gustaria saber como obtener una variable single dividida en cada uno de sus 4 bytes por separado.

Gracias

Título: Variables Single
Publicado por: Brroz en Lunes 1 de Septiembre de 2003, 13:27

Utiliza el código que te indiqué en http://foros.solocodigo.com/viewthread.php?tid=4724 (http://foros.solocodigo.com/viewthread.php?tid=4724).

El valor para cada byte lo obtendrás como elemento de la matriz que le pases como parámetro.

Por ejemplo:

después de añadir el código aquel, añade este otro para probar en algún sitio.

Dim byt1() as Byte
PackNro 23434 , byt1 , LittleEndianByteOrder
Msgbox "Primer byte " & byt1(1)  'byt1(1) = 138
Msgbox "Segundo byte " & byt1(2)  'byt1(2) = 91
Msgbox "Tercer byte " & byt1(3)  'byt1(3) = 0
Msgbox "Cuarto byte " & byt1(4)  'byt1(4) = 0

Si te das cuenta 23434 = 138 * 256^0 + 91 * 256^1 + 0 * 256^2 + 0 * 256^3

A ver si esto te va bien.
Suerte y a ver que tal.