Gibt einen Ausdruck zurück, der in eine Variant-Variable vom Subtyp "Byte" konvertiert wurde.
Syntax
CByte(expression)
Anmerkungen
Das Argument für "expression" ist ein beliebiger gültiger Ausdruck.
Verwenden Sie die CByte-Funktion, um international angepasste Konvertierungen eines anderen Datentyps in einen Byte-Subtyp bereitzustellen. Beispiel: Je nach Gebietsschemaeinstellung Ihres Systems werden verschiedene Dezimaltrennzeichen korrekt erkannt, ebenso verschiedene Tausendertrennzeichen.
Wenn der Ausdruck außerhalb des zulässigen Bereichs für den Byte-Subtyp liegt, tritt ein Fehler auf. Im folgenden Beispiel wird die CByte-Funktion verwendet, um einen Ausdruck in ein Byte zu konvertieren:
Das folgende Beispiel veranschaulicht die Verwendung der CByte-Funktion:
Beispiel 1:
Dim MyDouble, MyByte MyDouble = 125.5678 ' MyDouble is a Double. MyByte = CByte(MyDouble) 'Output: 126
Beispiel 2:
Dim MyInt MyInt = 100 ' MyInt is an Integer. MyByte = CByte(MyInt) 'Output: 100
Beispiel 3:
Dim MyString MyString = "50" ' MyString is a String. MyByte = CByte(MyString) 'Output: 50
Beispiel 4:
Dim MyDouble, MyByte MyDouble = 125.4 ' MyDouble is a Double. MyByte = CByte(MyDouble) 'Output: 125
Beispiel 5:
Dim MyDouble, MyByte MyDouble = 125.5 ' MyDouble is a Double. MyByte = CByte(MyDouble) ' 125.5 round to 126 (nearest even number) 'Output: 126
Beispiel 6:
Dim MyDouble, MyByte MyDouble = 124.5 ' MyDouble is a Double. MyByte = CByte(MyDouble) ' 124.5 round to 124 (nearest even number) 'Output: 124
Hinweis:
CByte unterscheidet sich von den Funktionen "Fix" und "Int", die die Nachkommastellen einer Zahl abschneiden und nicht runden. Wenn die Dezimalzahl genau 0,5 ist, rundet die CByte-Funktion sie immer auf die nächste Ganzzahl. Beispiel: 0,5 wird auf 0 gerundet und 1,5 auf 2.