CByte 函式

傳回已轉換為子類型 Byte 之變異的表示式。

語法

CByte(expression)

備註

表示式引數是任何有效的表示式。

使用 CByte 函式來提供從任何其他資料類型到 Byte 子類型的國際感知轉換。例如,根據您系統的地區設定,可以正確識別不同的小數分隔符號,也可以正確識別不同的千位數分隔符號。

如果表示式超出 Byte 子類型的可接受範圍,則會發生錯誤。下列範例使用 CByte 函式將表示式轉換為位元組:

下列範例說明 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

註:

CByte 與 Fix 和 Int 函式不同,它會截斷而非捨入數字的小數部分。當小數部分正好是 0.5 時,CByte 函式一律會將它捨入至最接近的偶數。例如,0.5 會捨入為 0,而 1.5 會捨入為 2。