Função CByte

Retorna uma expressão que foi convertida em uma Variante do subtipo Byte.

Sintaxe

CByte(expression)

Comentários

O argumento expression é qualquer expressão válida.

Use a função CByte para fornecer conversões com conhecimento internacional de qualquer outro tipo de dados em um subtipo Byte. Por exemplo, diferentes separadores decimais são devidamente reconhecidos com base na configuração regional do sistema, assim como diferentes separadores de milhar.

Se a expressão ficar fora do intervalo aceitável para o subtipo de byte, ocorrerá um erro. O exemplo a seguir usa a função CByte para converter uma expressão em um byte:

O exemplo a seguir ilustra o uso da função CByte:

Exemplo 1:

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

Exemplo 2:

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

Exemplo 3:

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

Exemplo 4:

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

Exemplo 5:

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

Exemplo 6:

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