Gibt einen Ausdruck zurück, der in eine Variant-Variable vom Subtyp "String" konvertiert wurde.
Syntax
CStr(expression)
Anmerkungen
Das Argument für "expression" ist ein beliebiger gültiger Ausdruck.
Im Allgemeinen können Sie Ihren Code mit den Datentyp-Konvertierungsfunktionen dokumentieren, um zu zeigen, dass das Ergebnis eines Vorgangs als bestimmter Datentyp und nicht als der Standarddatentyp ausgedrückt werden sollte. Beispiel: Verwenden Sie CStr, um zu erzwingen, dass das Ergebnis als eine Zeichenfolge ausgedrückt wird.
Verwenden Sie dieCStr-Funktion anstelle von Str, um international angepasste Konvertierungen eines beliebigen anderen Datentyps in einen Subtyp "String" bereitzustellen. Beispiel: Je nach Gebietsschemaeinstellung Ihres Systems werden verschiedene Dezimaltrennzeichen korrekt erkannt.
Die Daten im Ausdruck bestimmen, was zurückgegeben wird, wie in der folgenden Tabelle dargestellt:
Tabelle 11-8 Zuordnung für Ausdrucksrückgabe
| Ausdruck | CStr-Rückgabe |
|---|---|
| Boolesch | Eine Zeichenfolge mit "True" oder "False". |
| Datum | Eine Zeichenfolge, mit Datum im kurzen Datumsformat Ihres Systems. |
| Leer | Eine Zeichenfolge mit Nulllänge (" "). |
| Anderer numerischer Ausdruck | Eine Zeichenfolge mit der Zahl. |
Im folgenden Beispiel wird mit der CStr-Funktion ein numerischer Wert in eine Zeichenfolge konvertiert:
Beispiel 1:
Dim MyDouble, MyString MyDouble = 437.324 ' MyDouble is a Double. MyString = CStr(MyDouble) ' MyString contains "437.324". 'Output: "437.324"
Beispiel 2:
Dim MyBool MyBool = True ' MyBool is a Boolean. MyString = CStr(MyBool) ' MyString contains "True". 'Output: "True"
Beispiel 3:
MyBool = False ' MyBool is a Boolean. MyString = CStr(MyBool) ' MyString contains "False". 'Output: "False"
Beispiel 4:
Dim MyDate
MyDate = CDate("10/19/1962")
MyString = CStr(MyDate)
'Output: "19/10/1962" (or your system's short-date format)
Beispiel 5:
Dim MyInt MyInt = 100 MyString = CStr(MyInt) 'Output: "100"
Beispiel 6:
Dim MyValue MyValue = Empty MyString = CStr(MyValue) 'Output: ""
Beispiel 7:
Dim MyLong MyLong = 1234567890 MyString = CStr(MyLong) 'Output: "1234567890"