Funzioni di conversione del tipo (Visual Basic)Type Conversion Functions (Visual Basic)

Queste funzioni vengono compilate inline, ovvero il codice di conversione fa parte del codice che valuta l'espressione.These functions are compiled inline, meaning the conversion code is part of the code that evaluates the expression. A volte non viene eseguita alcuna chiamata a una procedura per eseguire la conversione, migliorando le prestazioni.Sometimes there is no call to a procedure to accomplish the conversion, which improves performance. Ogni funzione assegna un'espressione a un tipo di dati specifico.Each function coerces an expression to a specific data type.

SintassiSyntax

CBool(expression)
CByte(expression)
CChar(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CObj(expression)
CSByte(expression)
CShort(expression)
CSng(expression)
CStr(expression)
CUInt(expression)
CULng(expression)
CUShort(expression)

PartePart

expression
Obbligatorio.Required. Qualsiasi espressione del tipo di dati di origine.Any expression of the source data type.

Tipo di dati del valore restituitoReturn Value Data Type

Il nome della funzione determina il tipo di dati del valore restituito, come illustrato nella tabella seguente.The function name determines the data type of the value it returns, as shown in the following table.

Nome funzioneFunction name Tipo di dati restituitoReturn data type Intervallo per argomento expressionRange for expression argument
CBool Tipo di dati BooleanBoolean Data Type Qualsiasi espressione Char o String o numeric valida.Any valid Char or String or numeric expression.
CByte Tipo di dati ByteByte Data Type Byte.MinValue (0) tramite Byte.MaxValue (255) (senza segno); le parti frazionarie sono arrotondate. 1Byte.MinValue (0) through Byte.MaxValue (255) (unsigned); fractional parts are rounded.1

A partire da Visual Basic 15,8, Visual Basic ottimizza le prestazioni della conversione da virgola mobile a byte con la funzione CByte; Per ulteriori informazioni, vedere la sezione osservazioni .Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to byte conversion with the CByte function; see the Remarks section for more information. Per un esempio, vedere la sezione di esempio CInt .See the CInt Example section for an example.
CChar Tipo di dati CharChar Data Type Qualsiasi espressione Char o String valida; viene convertito solo il primo carattere di un String; il valore può essere compreso tra 0 e 65535 (senza segno).Any valid Char or String expression; only first character of a String is converted; value can be 0 through 65535 (unsigned).
CDate Tipo di dati DateDate Data Type Qualsiasi rappresentazione valida di data e ora.Any valid representation of a date and time.
CDbl Tipo di dati DoubleDouble Data Type -1.79769313486231570 e + 308 a-4.94065645841246544 E-324 per i valori negativi; 4.94065645841246544 e-324 tramite 1.79769313486231570 E + 308 per i valori positivi.-1.79769313486231570E+308 through -4.94065645841246544E-324 for negative values; 4.94065645841246544E-324 through 1.79769313486231570E+308 for positive values.
CDec Tipo di dati DecimalDecimal Data Type +/-79.228.162.514.264.337.593.543.950.335 per numeri con scala zero, ovvero numeri senza posizioni decimali.+/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, that is, numbers with no decimal places. Per i numeri con 28 cifre decimali, l'intervallo è +/-7.9228162514264337593543950335.For numbers with 28 decimal places, the range is +/-7.9228162514264337593543950335. Il numero più piccolo possibile diverso da zero è 0,0000000000000000000000000001 (+/-1E-28).The smallest possible non-zero number is 0.0000000000000000000000000001 (+/-1E-28).
CInt Tipo di dati IntegerInteger Data Type Int32.MinValue (-2.147.483.648) tramite Int32.MaxValue (2.147.483.647); le parti frazionarie sono arrotondate. 1Int32.MinValue (-2,147,483,648) through Int32.MaxValue (2,147,483,647); fractional parts are rounded.1

A partire da Visual Basic 15,8, Visual Basic ottimizza le prestazioni della conversione da virgola mobile a integer con la funzione CInt; Per ulteriori informazioni, vedere la sezione osservazioni .Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to integer conversion with the CInt function; see the Remarks section for more information. Per un esempio, vedere la sezione di esempio CInt .See the CInt Example section for an example.
CLng Tipo di dati LongLong Data Type Int64.MinValue (-9.223.372.036.854.775.808) tramite Int64.MaxValue (9.223.372.036.854.775.807); le parti frazionarie sono arrotondate. 1Int64.MinValue (-9,223,372,036,854,775,808) through Int64.MaxValue (9,223,372,036,854,775,807); fractional parts are rounded.1

A partire da Visual Basic 15,8, Visual Basic ottimizza le prestazioni della conversione di interi a virgola mobile a 64 bit con la funzione CLng; Per ulteriori informazioni, vedere la sezione osservazioni .Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to 64-bit integer conversion with the CLng function; see the Remarks section for more information. Per un esempio, vedere la sezione di esempio CInt .See the CInt Example section for an example.
CObj Tipo di dati ObjectObject Data Type Qualsiasi espressione valida.Any valid expression.
CSByte Tipo di dati SByteSByte Data Type SByte.MinValue (-128) tramite SByte.MaxValue (127); le parti frazionarie sono arrotondate. 1SByte.MinValue (-128) through SByte.MaxValue (127); fractional parts are rounded.1

A partire da Visual Basic 15,8, Visual Basic ottimizza le prestazioni della conversione in byte a virgola mobile e con firma con la funzione CSByte; Per ulteriori informazioni, vedere la sezione osservazioni .Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to signed byte conversion with the CSByte function; see the Remarks section for more information. Per un esempio, vedere la sezione di esempio CInt .See the CInt Example section for an example.
CShort Tipo di dati ShortShort Data Type Int16.MinValue (-32.768) tramite Int16.MaxValue (32.767); le parti frazionarie sono arrotondate. 1Int16.MinValue (-32,768) through Int16.MaxValue (32,767); fractional parts are rounded.1

A partire da Visual Basic 15,8, Visual Basic ottimizza le prestazioni della conversione da virgola mobile a a 16 bit con la funzione CShort; Per ulteriori informazioni, vedere la sezione osservazioni .Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to 16-bit integer conversion with the CShort function; see the Remarks section for more information. Per un esempio, vedere la sezione di esempio CInt .See the CInt Example section for an example.
CSng Tipo di dati SingleSingle Data Type -3 402823e38 e + 38 fino a-401298E E-45 per i valori negativi; 401298E e-45 tramite 3 402823e38 E + 38 per i valori positivi.-3.402823E+38 through -1.401298E-45 for negative values; 1.401298E-45 through 3.402823E+38 for positive values.
CStr Tipo di dati StringString Data Type Restituisce per CStr dipendono dall'argomento expression.Returns for CStr depend on the expression argument. Vedere valori restituiti per la funzione CStr.See Return Values for the CStr Function.
CUInt Tipo di dati UIntegerUInteger Data Type UInt32.MinValue (0) tramite UInt32.MaxValue (4.294.967.295) (senza segno); le parti frazionarie sono arrotondate. 1UInt32.MinValue (0) through UInt32.MaxValue (4,294,967,295) (unsigned); fractional parts are rounded.1

A partire da Visual Basic 15,8, Visual Basic ottimizza le prestazioni della conversione a virgola mobile e Unsigned Integer con la funzione CUInt; Per ulteriori informazioni, vedere la sezione osservazioni .Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to unsigned integer conversion with the CUInt function; see the Remarks section for more information. Per un esempio, vedere la sezione di esempio CInt .See the CInt Example section for an example.
CULng Tipo di dati ULongULong Data Type UInt64.MinValue (0) tramite UInt64.MaxValue (18.446.744.073.709.551.615) (senza segno); le parti frazionarie sono arrotondate. 1UInt64.MinValue (0) through UInt64.MaxValue (18,446,744,073,709,551,615) (unsigned); fractional parts are rounded.1

A partire da Visual Basic 15,8, Visual Basic ottimizza le prestazioni della conversione a virgola mobile e long integer senza segno con la funzione CULng; Per ulteriori informazioni, vedere la sezione osservazioni .Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to unsigned long integer conversion with the CULng function; see the Remarks section for more information. Per un esempio, vedere la sezione di esempio CInt .See the CInt Example section for an example.
CUShort Tipo di dati UShortUShort Data Type UInt16.MinValue (0) tramite UInt16.MaxValue (65.535) (senza segno); le parti frazionarie sono arrotondate. 1UInt16.MinValue (0) through UInt16.MaxValue (65,535) (unsigned); fractional parts are rounded.1

A partire da Visual Basic 15,8, Visual Basic ottimizza le prestazioni della conversione di interi a 16 bit senza segno a virgola mobile con la funzione CUShort; Per ulteriori informazioni, vedere la sezione osservazioni .Starting with Visual Basic 15.8, Visual Basic optimizes the performance of floating-point to unsigned 16-bit integer conversion with the CUShort function; see the Remarks section for more information. Per un esempio, vedere la sezione di esempio CInt .See the CInt Example section for an example.

1 le parti frazionarie possono essere soggette a un tipo speciale di arrotondamento denominato arrotondamento del banco.1 Fractional parts can be subject to a special type of rounding called banker's rounding. Per ulteriori informazioni, vedere la sezione "osservazioni".See "Remarks" for more information.

NoteRemarks

Come regola, è consigliabile usare le funzioni di conversione dei tipi di Visual Basic in preferenza ai metodi di .NET Framework, ad esempio ToString(), nella classe Convert o in una singola struttura o classe del tipo.As a rule, you should use the Visual Basic type conversion functions in preference to the .NET Framework methods such as ToString(), either on the Convert class or on an individual type structure or class. Le funzioni Visual Basic sono progettate per un'interazione ottimale con il codice Visual Basic e rendono anche il codice sorgente più breve e più facile da leggere.The Visual Basic functions are designed for optimal interaction with Visual Basic code, and they also make your source code shorter and easier to read. Inoltre, i metodi di conversione .NET Framework non producono sempre gli stessi risultati delle funzioni di Visual Basic, ad esempio quando si converte Boolean in Integer.In addition, the .NET Framework conversion methods do not always produce the same results as the Visual Basic functions, for example when converting Boolean to Integer. Per ulteriori informazioni, vedere risoluzione dei problemirelativi ai tipi di dati.For more information, see Troubleshooting Data Types.

A partire da Visual Basic 15,8, le prestazioni della conversione da virgola mobile a integer sono ottimizzate quando si passa il valore Single o Double restituito dai metodi seguenti a una delle funzioni di conversione integer (CByte, CShort, CInt @no__ t_5, CSByte, CUShort, CUInt, CULng):Starting with Visual Basic 15.8, the performance of floating-point-to-integer conversion is optimized when you pass the Single or Double value returned by the following methods to one of the integer conversion functions (CByte, CShort, CInt, CLng, CSByte, CUShort, CUInt, CULng):

Questa ottimizzazione consente di eseguire il codice che esegue un numero elevato di conversioni di valori integer fino a due volte più velocemente.This optimization allows code that does a large number of integer conversions to run up to twice as fast. Nell'esempio seguente vengono illustrate le conversioni a virgola mobile ottimizzate:The following example illustrates these optimized floating-point-to-integer conversions:

Dim s As Single = 173.7619
Dim d As Double = s

Dim i1 As Integer = CInt(Fix(s))               ' Result: 173
Dim b1 As Byte = CByte(Int(d))                 ' Result: 173
Dim s1 AS Short = CShort(Math.Truncate(s))     ' Result: 173
Dim i2 As Integer = CInt(Math.Ceiling(d))      ' Result: 174
Dim i3 As Integer = CInt(Math.Round(s))        ' Result: 174

ComportamentoBehavior

  • Coercizione.Coercion. In generale, è possibile utilizzare le funzioni di conversione del tipo di dati per assegnare il risultato di un'operazione a un tipo di dati specifico anziché al tipo di dati predefinito.In general, you can use the data type conversion functions to coerce the result of an operation to a particular data type rather than the default data type. Usare, ad esempio, CDec per forzare l'aritmetica decimale nei casi in cui in genere si verificano operazioni aritmetiche a precisione singola, a precisione doppia o Integer.For example, use CDec to force decimal arithmetic in cases where single-precision, double-precision, or integer arithmetic would normally take place.

  • Conversioni non riuscite.Failed Conversions. Se il expression passato alla funzione non è compreso nell'intervallo del tipo di dati in cui deve essere convertito, viene eseguita una OverflowException.If the expression passed to the function is outside the range of the data type to which it is to be converted, an OverflowException occurs.

  • Parti frazionarie.Fractional Parts. Quando si converte un valore non integrale in un tipo integrale, le funzioni di conversione integer (CByte, CInt, CLng, CSByte, CShort, CUInt, CULng e CUShort) rimuovono la parte frazionaria e arrotondano il valore all'intero più vicino.When you convert a nonintegral value to an integral type, the integer conversion functions (CByte, CInt, CLng, CSByte, CShort, CUInt, CULng, and CUShort) remove the fractional part and round the value to the closest integer.

    Se la parte frazionaria è esattamente 0,5, le funzioni di conversione integer arrotondano al numero intero pari più vicino.If the fractional part is exactly 0.5, the integer conversion functions round it to the nearest even integer. 0,5, ad esempio, viene arrotondato a 0, 1,5 e 2,5 entrambi arrotondati a 2.For example, 0.5 rounds to 0, and 1.5 and 2.5 both round to 2. Questa operazione viene talvolta denominata arrotondamento del bancoe il suo scopo consiste nel compensare la distorsione che potrebbe accumularsi durante l'aggiunta di molti di questi numeri.This is sometimes called banker's rounding, and its purpose is to compensate for a bias that could accumulate when adding many such numbers together.

    CInt e CLng differiscono dalle funzioni Int e Fix, che troncano, anziché arrotondare, la parte frazionaria di un numero.CInt and CLng differ from the Int and Fix functions, which truncate, rather than round, the fractional part of a number. Inoltre, Fix e Int restituiscono sempre un valore dello stesso tipo di dati passato.Also, Fix and Int always return a value of the same data type as you pass in.

  • Conversioni di data e ora.Date/Time Conversions. Utilizzare la funzione IsDate per determinare se un valore può essere convertito in una data e ora.Use the IsDate function to determine if a value can be converted to a date and time. CDate riconosce i valori letterali di data e ora, ma non i valori numerici.CDate recognizes date literals and time literals but not numeric values. Per convertire un valore di Date Visual Basic 6,0 in un valore Date in Visual Basic 2005 o versioni successive, è possibile usare il metodo DateTime.FromOADate.To convert a Visual Basic 6.0 Date value to a Date value in Visual Basic 2005 or later versions, you can use the DateTime.FromOADate method.

  • Valori di data/ora neutri.Neutral Date/Time Values. Il tipo di dati date contiene sempre le informazioni di data e ora.The Date Data Type always contains both date and time information. Ai fini della conversione del tipo, Visual Basic considera 1/1/0001 (1 gennaio dell'anno 1) come valore neutro per la data e 00:00:00 (mezzanotte) come valore neutro per l'ora.For purposes of type conversion, Visual Basic considers 1/1/0001 (January 1 of the year 1) to be a neutral value for the date, and 00:00:00 (midnight) to be a neutral value for the time. Se si converte un valore Date in una stringa, CStr non include valori neutri nella stringa risultante.If you convert a Date value to a string, CStr does not include neutral values in the resulting string. Se ad esempio si converte #January 1, 0001 9:30:00# in una stringa, il risultato sarà "9:30:00 AM"; le informazioni sulla data vengono omesse.For example, if you convert #January 1, 0001 9:30:00# to a string, the result is "9:30:00 AM"; the date information is suppressed. Tuttavia, le informazioni sulla data sono ancora presenti nel valore di Date originale e possono essere ripristinate con funzioni come DatePart funzione.However, the date information is still present in the original Date value and can be recovered with functions such as DatePart function.

  • Sensibilità delle impostazioni cultura.Culture Sensitivity. Le funzioni di conversione dei tipi che coinvolgono stringhe eseguono conversioni in base alle impostazioni cultura correnti dell'applicazione.The type conversion functions involving strings perform conversions based on the current culture settings for the application. @No__t_0, ad esempio, riconosce i formati di data in base alle impostazioni locali del sistema.For example, CDate recognizes date formats according to the locale setting of your system. È necessario specificare il giorno, il mese e l'anno nell'ordine corretto per le impostazioni locali o la data potrebbe non essere interpretata correttamente.You must provide the day, month, and year in the correct order for your locale, or the date might not be interpreted correctly. Un formato di data estesa non viene riconosciuto se contiene una stringa del giorno della settimana, ad esempio "mercoledì".A long date format is not recognized if it contains a day-of-the-week string, such as "Wednesday".

    Se è necessario eseguire la conversione da o verso una rappresentazione di stringa di un valore in un formato diverso da quello specificato dalle impostazioni locali, non è possibile usare le funzioni di conversione del tipo di Visual Basic.If you need to convert to or from a string representation of a value in a format other than the one specified by your locale, you cannot use the Visual Basic type conversion functions. A tale scopo, usare i metodi ToString(IFormatProvider) e Parse(String, IFormatProvider) del tipo di tale valore.To do this, use the ToString(IFormatProvider) and Parse(String, IFormatProvider) methods of that value's type. Usare, ad esempio, Double.Parse durante la conversione di una stringa in una Double e usare Double.ToString quando si converte un valore di tipo Double in una stringa.For example, use Double.Parse when converting a string to a Double, and use Double.ToString when converting a value of type Double to a string.

CType FunctionCType Function

La funzione CType accetta un secondo argomento, typename e assegna expression a typename, dove typename può essere qualsiasi tipo di dati, struttura, classe o interfaccia a cui esiste una conversione valida.The CType Function takes a second argument, typename, and coerces expression to typename, where typename can be any data type, structure, class, or interface to which there exists a valid conversion.

Per un confronto tra CType con le altre parole chiave di conversione dei tipi, vedere Operatore DirectCast e operatore TryCast.For a comparison of CType with the other type conversion keywords, see DirectCast Operator and TryCast Operator.

Esempio di CBoolCBool Example

Nell'esempio seguente viene utilizzata la funzione CBool per convertire espressioni in valori Boolean.The following example uses the CBool function to convert expressions to Boolean values. Se un'espressione restituisce un valore diverso da zero, CBool restituisce True; in caso contrario, restituisce False.If an expression evaluates to a nonzero value, CBool returns True; otherwise, it returns False.

Dim a, b, c As Integer
Dim check As Boolean
a = 5
b = 5
' The following line of code sets check to True.
check = CBool(a = b)
c = 0
' The following line of code sets check to False.
check = CBool(c)

Esempio di CByteCByte Example

Nell'esempio seguente viene utilizzata la funzione CByte per convertire un'espressione in un Byte.The following example uses the CByte function to convert an expression to a Byte.

Dim aDouble As Double
Dim aByte As Byte
aDouble = 125.5678
' The following line of code sets aByte to 126.
aByte = CByte(aDouble)

Esempio di CCharCChar Example

Nell'esempio seguente viene utilizzata la funzione CChar per convertire il primo carattere di un'espressione String in un tipo di Char.The following example uses the CChar function to convert the first character of a String expression to a Char type.

Dim aString As String
Dim aChar As Char
' CChar converts only the first character of the string.
aString = "BCD"
' The following line of code sets aChar to "B".
aChar = CChar(aString)

Il tipo di dati dell'argomento di input CChar deve essere Char o String.The input argument to CChar must be of data type Char or String. Non è possibile usare CChar per convertire un numero in un carattere, perché CChar non può accettare un tipo di dati numerico.You cannot use CChar to convert a number to a character, because CChar cannot accept a numeric data type. Nell'esempio seguente viene ottenuto un numero che rappresenta un punto di codice (codice carattere) e lo converte nel carattere corrispondente.The following example obtains a number representing a code point (character code) and converts it to the corresponding character. Usa la funzione InputBox per ottenere la stringa di cifre, CInt per convertire la stringa nel tipo Integer e ChrW per convertire il numero nel tipo Char.It uses the InputBox function to obtain the string of digits, CInt to convert the string to type Integer, and ChrW to convert the number to type Char.

Dim someDigits As String
Dim codePoint As Integer
Dim thisChar As Char
someDigits = InputBox("Enter code point of character:")
codePoint = CInt(someDigits)
' The following line of code sets thisChar to the Char value of codePoint.
thisChar = ChrW(codePoint)

Esempio di CDateCDate Example

Nell'esempio seguente viene usata la funzione CDate per convertire le stringhe in valori Date.The following example uses the CDate function to convert strings to Date values. In generale, le date e le ore di codifica hardcoded come stringhe, come illustrato in questo esempio, non sono consigliate.In general, hard-coding dates and times as strings (as shown in this example) is not recommended. Usare i valori letterali di data e ora, ad esempio #Feb 12, 1969 # e #4:45:23 PM #, in alternativa.Use date literals and time literals, such as #Feb 12, 1969# and #4:45:23 PM#, instead.

Dim aDateString, aTimeString As String
Dim aDate, aTime As Date
aDateString = "February 12, 1969"
aTimeString = "4:35:47 PM"
' The following line of code sets aDate to a Date value.
aDate = CDate(aDateString)
' The following line of code sets aTime to Date value.
aTime = CDate(aTimeString)

Esempio di CDblCDbl Example

Dim aDec As Decimal
Dim aDbl As Double
' The following line of code uses the literal type character D to make aDec a Decimal.
aDec = 234.456784D
' The following line of code sets aDbl to 1.9225456288E+1.
aDbl = CDbl(aDec * 8.2D * 0.01D)

Esempio di CDecCDec Example

Nell'esempio seguente viene utilizzata la funzione CDec per convertire un valore numerico in Decimal.The following example uses the CDec function to convert a numeric value to Decimal.

Dim aDouble As Double
Dim aDecimal As Decimal
aDouble = 10000000.0587
' The following line of code sets aDecimal to 10000000.0587.
aDecimal = CDec(aDouble)

Esempio di CIntCInt Example

Nell'esempio seguente viene utilizzata la funzione CInt per convertire un valore in Integer.The following example uses the CInt function to convert a value to Integer.

Dim aDbl As Double
Dim anInt As Integer
aDbl = 2345.5678
' The following line of code sets anInt to 2346.
anInt = CInt(aDbl)

Esempio di CLngCLng Example

Nell'esempio seguente viene utilizzata la funzione CLng per convertire i valori Long.The following example uses the CLng function to convert values to Long.

Dim aDbl1, aDbl2 As Double
Dim aLng1, aLng2 As Long
aDbl1 = 25427.45
aDbl2 = 25427.55
' The following line of code sets aLng1 to 25427.
aLng1 = CLng(aDbl1)
' The following line of code sets aLng2 to 25428.
aLng2 = CLng(aDbl2)

Esempio di CObjCObj Example

Nell'esempio seguente viene utilizzata la funzione CObj per convertire un valore numerico in Object.The following example uses the CObj function to convert a numeric value to Object. La variabile Object contiene solo un puntatore a quattro byte, che punta al valore Double assegnato.The Object variable itself contains only a four-byte pointer, which points to the Double value assigned to it.

Dim aDouble As Double
Dim anObject As Object
aDouble = 2.7182818284
' The following line of code sets anObject to a pointer to aDouble.
anObject = CObj(aDouble)

Esempio di CSByteCSByte Example

Nell'esempio seguente viene utilizzata la funzione CSByte per convertire un valore numerico in SByte.The following example uses the CSByte function to convert a numeric value to SByte.

Dim aDouble As Double
Dim anSByte As SByte
aDouble = 39.501
' The following line of code sets anSByte to 40.
anSByte = CSByte(aDouble)

Esempio di CShortCShort Example

Nell'esempio seguente viene utilizzata la funzione CShort per convertire un valore numerico in Short.The following example uses the CShort function to convert a numeric value to Short.

Dim aByte As Byte
Dim aShort As Short
aByte = 100
' The following line of code sets aShort to 100.
aShort = CShort(aByte)

Esempio di CSngCSng Example

Nell'esempio seguente viene utilizzata la funzione CSng per convertire i valori Single.The following example uses the CSng function to convert values to Single.

Dim aDouble1, aDouble2 As Double
Dim aSingle1, aSingle2 As Single
aDouble1 = 75.3421105
aDouble2 = 75.3421567
' The following line of code sets aSingle1 to 75.34211.
aSingle1 = CSng(aDouble1)
' The following line of code sets aSingle2 to 75.34216.
aSingle2 = CSng(aDouble2)

Esempio di CStrCStr Example

Nell'esempio seguente viene utilizzata la funzione CStr per convertire un valore numerico in String.The following example uses the CStr function to convert a numeric value to String.

Dim aDouble As Double
Dim aString As String
aDouble = 437.324
' The following line of code sets aString to "437.324".
aString = CStr(aDouble)

Nell'esempio seguente viene utilizzata la funzione CStr per convertire i valori di Date in String valori.The following example uses the CStr function to convert Date values to String values.

Dim aDate As Date
Dim aString As String
' The following line of code generates a COMPILER ERROR because of invalid format.
' aDate = #February 12, 1969 00:00:00#
' Date literals must be in the format #m/d/yyyy# or they are invalid.
' The following line of code sets the time component of aDate to midnight.
aDate = #2/12/1969#
' The following conversion suppresses the neutral time value of 00:00:00.
' The following line of code sets aString to "2/12/1969".
aString = CStr(aDate)
' The following line of code sets the time component of aDate to one second past midnight.
aDate = #2/12/1969 12:00:01 AM#
' The time component becomes part of the converted value.
' The following line of code sets aString to "2/12/1969 12:00:01 AM".
aString = CStr(aDate)

CStr esegue sempre il rendering di un valore Date nel formato breve standard per le impostazioni locali correnti, ad esempio, "6/15/2003 4:35:47 PM".CStr always renders a Date value in the standard short format for the current locale, for example, "6/15/2003 4:35:47 PM". Tuttavia, CStr non vengono eliminati i valori neutri 1/1/0001 per la data e 00:00:00 per l'ora.However, CStr suppresses the neutral values of 1/1/0001 for the date and 00:00:00 for the time.

Per informazioni più dettagliate sui valori restituiti da CStr, vedere valori restituiti per la funzione CStr.For more detail on the values returned by CStr, see Return Values for the CStr Function.

Esempio di CUIntCUInt Example

Nell'esempio seguente viene utilizzata la funzione CUInt per convertire un valore numerico in UInteger.The following example uses the CUInt function to convert a numeric value to UInteger.

Dim aDouble As Double
Dim aUInteger As UInteger
aDouble = 39.501
' The following line of code sets aUInteger to 40.
aUInteger = CUInt(aDouble)

Esempio di CULngCULng Example

Nell'esempio seguente viene utilizzata la funzione CULng per convertire un valore numerico in ULong.The following example uses the CULng function to convert a numeric value to ULong.

Dim aDouble As Double
Dim aULong As ULong
aDouble = 39.501
' The following line of code sets aULong to 40.
aULong = CULng(aDouble)

Esempio di CUShortCUShort Example

Nell'esempio seguente viene utilizzata la funzione CUShort per convertire un valore numerico in UShort.The following example uses the CUShort function to convert a numeric value to UShort.

Dim aDouble As Double
Dim aUShort As UShort
aDouble = 39.501
' The following line of code sets aUShort to 40.
aUShort = CUShort(aDouble)

Vedere ancheSee also