Restituisce un'espressione convertita in una variabile Variant di sottotipo String.
Sintassi
CStr(expression)
Note
L'argomento (expression) è qualsiasi espressione valida.
In generale, è possibile documentare il codice utilizzando le funzioni di conversione del tipo di dati per indicare che il risultato di un'operazione deve essere espresso come un tipo di dati specifico anziché come tipo di dati predefinito. Ad esempio, utilizzare CStr per forzare l'espressione del risultato come stringa.
Utilizzare la funzione CStr anziché Str per specificare conversioni riconosciute a livello internazionale da qualsiasi altro tipo di dati a un sottotipo String. Ad esempio, diversi separatori decimali vengono riconosciuti correttamente a seconda delle impostazioni nazionali del sistema.
I dati nell'espressione determinano gli elementi restituiti in base a quanto riportato nella tabella seguente.
Tabella 11-8 Mapping dei valori restituiti da un'espressione
| Se l'espressione è | CStr restituisce |
|---|---|
| Di tipo Boolean | Valore di tipo String contenente True o False. |
| Date | Valore di tipo String contenente una data nel formato di data breve del sistema. |
| Empty | Valore di tipo String di lunghezza zero (" "). |
| Altro valore numerico | Valore di tipo String contenente il numero. |
Nell'esempio seguente viene utilizzata la funzione CStr per convertire un valore numerico in un valore di tipo String.
Esempio 1
Dim MyDouble, MyString MyDouble = 437.324 ' MyDouble is a Double. MyString = CStr(MyDouble) ' MyString contains "437.324". 'Output: "437.324"
Esempio 2
Dim MyBool MyBool = True ' MyBool is a Boolean. MyString = CStr(MyBool) ' MyString contains "True". 'Output: "True"
Esempio 3
MyBool = False ' MyBool is a Boolean. MyString = CStr(MyBool) ' MyString contains "False". 'Output: "False"
Esempio 4
Dim MyDate
MyDate = CDate("10/19/1962")
MyString = CStr(MyDate)
'Output: "19/10/1962" (or your system's short-date format)
Esempio 5
Dim MyInt MyInt = 100 MyString = CStr(MyInt) 'Output: "100"
Esempio 6
Dim MyValue MyValue = Empty MyString = CStr(MyValue) 'Output: ""
Esempio 7
Dim MyLong MyLong = 1234567890 MyString = CStr(MyLong) 'Output: "1234567890"