CByte 函数

返回已转换为子类型 Byte 的变体的一个表达式。

语法

CByte(expression)

注释

expression 参数是任何有效的表达式。

可使用 CByte 函数实现从任何其他数据类型到 Byte 子类型的国际化转换。例如，根据系统的区域设置，可以正确识别不同的小数分隔符，也可以识别不同的千位分隔符。

如果 expression 超出 Byte 子类型的可接受范围，则会出现错误。以下示例使用 CByte 函数将表达式转换为 Byte 子类型：

以下示例说明了 CByte 函数的用法：

示例 1：

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

示例 2：

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

示例 3：

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

示例 4：

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

示例 5：

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

示例 6：

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