Función CByte

Devuelve una expresión que se ha convertido en una variante de subtipo Byte.

Sintaxis

CByte(expression)

Observaciones

El argumento expression es cualquier expresión válida.

Utilice la función CByte para proporcionar conversiones de alcance internacional de cualquier otro tipo de dato a un subtipo Byte. Por ejemplo, se reconocen correctamente distintos separadores decimales en función de la configuración regional del sistema, al igual que diferentes separadores de miles.

Si la expresión se encuentra fuera del rango aceptable para el subtipo Byte, se produce un error. En el siguiente ejemplo se utiliza la función CByte para convertir una expresión en Byte:

En el siguiente ejemplo se muestra el uso de la función CByte:

Ejemplo 1:

Dim MyDouble, MyByte
MyDouble = 125.5678        ' MyDouble is a Double.
MyByte = CByte(MyDouble)   
'Output:  126

Ejemplo 2:

Dim MyInt
MyInt = 100                ' MyInt is an Integer.
MyByte = CByte(MyInt)      
'Output: 100

Ejemplo 3:

Dim MyString
MyString = "50"            ' MyString is a String.
MyByte = CByte(MyString)   
'Output: 50

Ejemplo 4:

Dim MyDouble, MyByte
MyDouble = 125.4        ' MyDouble is a Double.
MyByte = CByte(MyDouble)   
'Output:  125

Ejemplo 5:

Dim MyDouble, MyByte
MyDouble = 125.5       ' MyDouble is a Double.
MyByte = CByte(MyDouble)   ' 125.5 round to 126 (nearest even number)
'Output:  126

Ejemplo 6:

Dim MyDouble, MyByte
MyDouble = 124.5       ' MyDouble is a Double.
MyByte = CByte(MyDouble)   ' 124.5 round to 124 (nearest even number)
'Output:  124