Funciones de conversión de tipos (Visual Basic)Type Conversion Functions (Visual Basic)

Estas funciones están compilados en línea, lo que significa que el código de conversión forma parte del código que evalúa la expresión.These functions are compiled inline, meaning the conversion code is part of the code that evaluates the expression. En ocasiones, no hay ninguna llamada a un procedimiento para realizar la conversión, lo que mejora el rendimiento.Sometimes there is no call to a procedure to accomplish the conversion, which improves performance. Cada función convierte una expresión a un tipo de datos específico.Each function coerces an expression to a specific data type.

SintaxisSyntax

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
Obligatorio.Required. Cualquier expresión del tipo de datos de origen.Any expression of the source data type.

Tipo de datos de valor devueltoReturn Value Data Type

El nombre de la función determina el tipo de datos del valor que devuelve, como se muestra en la tabla siguiente.The function name determines the data type of the value it returns, as shown in the following table.

Nombre de la funciónFunction name Tipo de datos devueltoReturn data type Intervalo para expression argumentoRange for expression argument
CBool Boolean (tipo de datos)Boolean Data Type Cualquier Char o String o expresión numérica.Any valid Char or String or numeric expression.
CByte Byte (tipo de datos)Byte Data Type Byte.MinValue (0) a través de Byte.MaxValue (255) (sin signo); se redondean partes fraccionarias. 1Byte.MinValue (0) through Byte.MaxValue (255) (unsigned); fractional parts are rounded.1

A partir de 15,8 Visual Basic, Visual Basic optimiza el rendimiento de punto flotante para la conversión de bytes con el CByte función; vea la comentarios sección para obtener más información.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. Consulte la ejemplo CInt sección para obtener un ejemplo.See the CInt Example section for an example.
CChar Char (tipo de datos)Char Data Type Cualquier Char o String expresión; sólo primer carácter de un String se convierten; puede oscilar entre 0 y 65535 (sin signo).Any valid Char or String expression; only first character of a String is converted; value can be 0 through 65535 (unsigned).
CDate Date (tipo de datos)Date Data Type Cualquier representación válida de una fecha y hora.Any valid representation of a date and time.
CDbl Double (tipos de datos)Double Data Type -1, 79769313486231570E + 308 a - 4, 94065645841246544E-324 para valores negativos; 4, 94065645841246544E-324 a 1, 79769313486231570E + 308 para los valores positivos.-1.79769313486231570E+308 through -4.94065645841246544E-324 for negative values; 4.94065645841246544E-324 through 1.79769313486231570E+308 for positive values.
CDec Decimal (tipo de datos)Decimal Data Type +/-79.228.162.514.264.337.593.543.950.335 para números a partir de cero, es decir, los números sin posiciones decimales.+/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, that is, numbers with no decimal places. Para números con 28 posiciones decimales, el intervalo es +/-7,9228162514264337593543950335.For numbers with 28 decimal places, the range is +/-7.9228162514264337593543950335. El menor número posible distinto de cero es 0,0000000000000000000000000001 (+/-1E-28).The smallest possible non-zero number is 0.0000000000000000000000000001 (+/-1E-28).
CInt Integer (tipo de datos)Integer Data Type Int32.MinValue (-2.147.483.648) a través de Int32.MaxValue (2.147.483.647); se redondean partes fraccionarias. 1Int32.MinValue (-2,147,483,648) through Int32.MaxValue (2,147,483,647); fractional parts are rounded.1

A partir de 15,8 Visual Basic, Visual Basic optimiza el rendimiento de punto flotante para la conversión de entero con el CInt función; vea la comentarios sección para obtener más información.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. Consulte la ejemplo CInt sección para obtener un ejemplo.See the CInt Example section for an example.
CLng Long (tipo de datos)Long Data Type Int64.MinValue (-9.223.372.036.854.775.808) a través de Int64.MaxValue (9.223.372.036.854.775.807); se redondean partes fraccionarias. 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 partir de 15,8 Visual Basic, Visual Basic optimiza el rendimiento de punto flotante para la conversión de entero de 64 bits con el CLng función; vea la comentarios sección para obtener más información.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. Consulte la ejemplo CInt sección para obtener un ejemplo.See the CInt Example section for an example.
CObj Tipo de objeto de datosObject Data Type Cualquier expresión válida.Any valid expression.
CSByte SByte (tipo de datos)SByte Data Type SByte.MinValue -(128) a través de SByte.MaxValue (127); se redondean partes fraccionarias. 1SByte.MinValue (-128) through SByte.MaxValue (127); fractional parts are rounded.1

A partir de 15,8 Visual Basic, Visual Basic optimiza el rendimiento de punto flotante para la conversión de bytes con signo con el CSByte función; vea la comentarios sección para obtener más información.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. Consulte la ejemplo CInt sección para obtener un ejemplo.See the CInt Example section for an example.
CShort Short (tipo de datos)Short Data Type Int16.MinValue (-32.768) a través de Int16.MaxValue (32.767); se redondean partes fraccionarias. 1Int16.MinValue (-32,768) through Int16.MaxValue (32,767); fractional parts are rounded.1

A partir de 15,8 Visual Basic, Visual Basic optimiza el rendimiento de punto flotante para la conversión de entero de 16 bits con el CShort función; vea la comentarios sección para obtener más información.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. Consulte la ejemplo CInt sección para obtener un ejemplo.See the CInt Example section for an example.
CSng Single (tipo de datos)Single Data Type -3, 402823E + 38 a - 1, 401298E-45 para los valores negativos; 1, 401298E-45 a 3, 402823E + 38 para los valores positivos.-3.402823E+38 through -1.401298E-45 for negative values; 1.401298E-45 through 3.402823E+38 for positive values.
CStr String (tipo de datos)String Data Type Devuelve para CStr dependen de la expression argumento.Returns for CStr depend on the expression argument. Consulte valores devueltos para la función CStr.See Return Values for the CStr Function.
CUInt UInteger (tipo de datos)UInteger Data Type UInt32.MinValue (0) a través de UInt32.MaxValue (4,294,967,295) (sin signo); se redondean partes fraccionarias. 1UInt32.MinValue (0) through UInt32.MaxValue (4,294,967,295) (unsigned); fractional parts are rounded.1

A partir de 15,8 Visual Basic, Visual Basic optimiza el rendimiento de punto flotante para la conversión de entero sin signo con el CUInt función; vea la comentarios sección para obtener más información.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. Consulte la ejemplo CInt sección para obtener un ejemplo.See the CInt Example section for an example.
CULng ULong (tipo de datos)ULong Data Type UInt64.MinValue (0) a través de UInt64.MaxValue (18.446.744.073.709.551.615) (sin signo); se redondean partes fraccionarias. 1UInt64.MinValue (0) through UInt64.MaxValue (18,446,744,073,709,551,615) (unsigned); fractional parts are rounded.1

A partir de 15,8 Visual Basic, Visual Basic optimiza el rendimiento de punto flotante para la conversión de entero largo sin signo con el CULng función; vea la comentarios sección para obtener más información.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. Consulte la ejemplo CInt sección para obtener un ejemplo.See the CInt Example section for an example.
CUShort UShort (tipo de datos)UShort Data Type UInt16.MinValue (0) a través de UInt16.MaxValue (65.535) (sin signo); se redondean partes fraccionarias. 1UInt16.MinValue (0) through UInt16.MaxValue (65,535) (unsigned); fractional parts are rounded.1

A partir de 15,8 Visual Basic, Visual Basic optimiza el rendimiento de punto flotante para la conversión de entero de 16 bits sin signo con el CUShort función; vea la comentarios sección para obtener más información.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. Consulte la ejemplo CInt sección para obtener un ejemplo.See the CInt Example section for an example.

1 partes fraccionarias pueden estar sujetas a un tipo especial de redondeo llamado redondeo bancario.1 Fractional parts can be subject to a special type of rounding called banker's rounding. Para obtener más información, vea "Comentarios".See "Remarks" for more information.

ComentariosRemarks

Como norma, debe utilizar las funciones de conversión de tipo Visual Basic con preferencia a los métodos de .NET Framework como ToString(), ya sea en la Convert clase o en una estructura de tipo individual o una clase.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. Las funciones de Visual Basic están diseñadas para la interacción óptima con código de Visual Basic, y también realizan el código fuente más corto y fácil de leer.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. Además, los métodos de conversión de .NET Framework no siempre producen los mismos resultados que las funciones de Visual Basic, por ejemplo, al convertir Boolean a 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. Para obtener más información, consulte solución de problemas de los tipos de datos.For more information, see Troubleshooting Data Types.

A partir de Visual Basic 15,8, se optimiza el rendimiento de la conversión de flotante a punto a entero al pasar el Single o Double valor devuelto por los métodos siguientes para una de las funciones de conversión de enteros (CByte, CShort, CInt, CLng, 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):

Esta optimización permite que el código que realiza un gran número de conversiones de enteros al ejecutarse el doble de rápido.This optimization allows code that does a large number of integer conversions to run up to twice as fast. El ejemplo siguiente muestra estas conversiones de flotante a punto para entero optimizadas: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

ComportamientoBehavior

  • Coercion.Coercion. En general, puede usar las funciones de conversión de tipo de datos para convertir el resultado de una operación a un tipo de datos concreto en lugar de con el tipo de datos de forma predeterminada.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. Por ejemplo, use CDec para forzar la aritmética decimal en los casos donde se haría precisión sencilla, doble precisión o aritmética de enteros.For example, use CDec to force decimal arithmetic in cases where single-precision, double-precision, or integer arithmetic would normally take place.

  • Error en conversiones.Failed Conversions. Si el expression pasa a la función es fuera del intervalo del tipo de datos donde va a convertir, un OverflowException se produce.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.

  • Partes fraccionarias.Fractional Parts. Escriba al convertir un valor no integral a un entero, las funciones de conversión de enteros (CByte, CInt, CLng, CSByte, CShort, CUInt, CULng, y CUShort) quitar el fraccionarios parte y redondeo del valor al entero más próximo.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.

    Si la parte fraccionaria es exactamente 0,5, las funciones de conversión de enteros que redondean el entero par más próximo.If the fractional part is exactly 0.5, the integer conversion functions round it to the nearest even integer. Por ejemplo, 0,5 se redondea a 0 y 1,5 y 2,5 se redondean a 2.For example, 0.5 rounds to 0, and 1.5 and 2.5 both round to 2. Esto se denomina a veces redondeo bancario, y su finalidad es compensar una tendencia que se podría acumular al sumar muchos de estos números.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 y CLng diferir la Int y Fix funciones, que se truncan en lugar de ida y vuelta, la parte fraccionaria de un número.CInt and CLng differ from the Int and Fix functions, which truncate, rather than round, the fractional part of a number. Además, Fix y Int siempre devuelven un valor del mismo tipo de datos que se pasa.Also, Fix and Int always return a value of the same data type as you pass in.

  • Las conversiones de fecha y hora.Date/Time Conversions. Use el IsDate función para determinar si se puede convertir un valor a una fecha y hora.Use the IsDate function to determine if a value can be converted to a date and time. CDate reconoce los literales de fecha y hora, pero no valores numéricos.CDate recognizes date literals and time literals but not numeric values. Para convertir un objeto Visual Basic 6.0 Date valor a un Date valor en Visual Basic 2005 o versiones posteriores, puede usar el DateTime.FromOADate método.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.

  • Neutral valores de fecha y hora.Neutral Date/Time Values. El tipo de datos Date siempre contiene información de fecha y hora.The Date Data Type always contains both date and time information. Para fines de conversión de tipos, Visual Basic considera 1/1/0001 (del 1 de enero del año 1) sea un valor neutral de fecha y 00:00:00 (medianoche) un valor neutral para el tiempo.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. Si convierte un Date valor en una cadena, CStr no incluye valores neutrales en la cadena resultante.If you convert a Date value to a string, CStr does not include neutral values in the resulting string. Por ejemplo, si convierte #January 1, 0001 9:30:00# en una cadena, el resultado es "9:30:00 AM"; se suprime la información de fecha.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. Sin embargo, la información de fecha aún está presente en el original Date valor y se pueden recuperar con funciones como DatePart función.However, the date information is still present in the original Date value and can be recovered with functions such as DatePart function.

  • Sensibilidad de la referencia cultural.Culture Sensitivity. Las funciones de conversión de tipo que implican cadenas realizan conversiones en función de la configuración de la referencia cultural actual para la aplicación.The type conversion functions involving strings perform conversions based on the current culture settings for the application. Por ejemplo, CDate reconoce los formatos de fecha según la configuración regional del sistema.For example, CDate recognizes date formats according to the locale setting of your system. Debe proporcionar el día, mes y año en el orden correcto para la configuración regional o la fecha no se interpreten correctamente.You must provide the day, month, and year in the correct order for your locale, or the date might not be interpreted correctly. No se reconoce el formato de fecha larga si contiene una cadena de día de la semana, por ejemplo, "Wednesday".A long date format is not recognized if it contains a day-of-the-week string, such as "Wednesday".

    Si necesita convertir hacia o desde una representación de cadena de un valor en un formato distinto al especificado por la configuración regional, no puede usar las funciones de conversión de tipo de 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. Para ello, use el ToString(IFormatProvider) y Parse(String, IFormatProvider) métodos de ese tipo de valor.To do this, use the ToString(IFormatProvider) and Parse(String, IFormatProvider) methods of that value's type. Por ejemplo, usar Double.Parse al convertir una cadena en un Doubley usar Double.ToString al convertir un valor de tipo Double en una cadena.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

El CType Function toma un segundo argumento, typenamey convierte expression a typename, donde typename puede ser cualquier tipo de datos, estructura, clase o interfaz a la que existe una conversión válida.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.

Para obtener una comparación de CType con otro tipo palabras clave de conversión, consulte DirectCast (operador) y TryCast (operador).For a comparison of CType with the other type conversion keywords, see DirectCast Operator and TryCast Operator.

Ejemplo de CBoolCBool Example

En el ejemplo siguiente se usa el CBool función para convertir expresiones en Boolean valores.The following example uses the CBool function to convert expressions to Boolean values. Si una expresión se evalúa como un valor distinto de cero, CBool devuelve True; en caso contrario, devuelve 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)

Ejemplo de CByteCByte Example

En el ejemplo siguiente se usa el CByte función para convertir una expresión a 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)

Ejemplo de CCharCChar Example

En el ejemplo siguiente se usa el CChar función para convertir el primer carácter de un String expresión a un Char tipo.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)

El argumento de entrada CChar debe ser del tipo de datos Char o String.The input argument to CChar must be of data type Char or String. No puede usar CChar para convertir un número en un carácter, porque CChar no acepta un tipo de datos numéricos.You cannot use CChar to convert a number to a character, because CChar cannot accept a numeric data type. El ejemplo siguiente obtiene un número que representa un punto de código (código de carácter) y lo convierte en el carácter correspondiente.The following example obtains a number representing a code point (character code) and converts it to the corresponding character. Usa el InputBox función para obtener la cadena de dígitos, CInt para convertir la cadena al tipo Integer, y ChrW para convertir el número que se escriba 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)

Ejemplo de CDateCDate Example

En el ejemplo siguiente se usa el CDate función para convertir cadenas a Date valores.The following example uses the CDate function to convert strings to Date values. En general, no se recomienda codificar de forma rígida fechas y horas como cadenas (como se muestra en este ejemplo).In general, hard-coding dates and times as strings (as shown in this example) is not recommended. Utilice literales de fecha y hora, por ejemplo #Feb 12, 1969 # y # 4:45:23 PM # en su lugar.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)

Ejemplo de 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)

Ejemplo de CDecCDec Example

En el ejemplo siguiente se usa el CDec función para convertir un valor numérico para 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)

Ejemplo de CIntCInt Example

En el ejemplo siguiente se usa el CInt función para convertir un valor a 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)

Ejemplo de CLngCLng Example

En el ejemplo siguiente se usa el CLng función para convertir los valores para 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)

Ejemplo de CObjCObj Example

En el ejemplo siguiente se usa el CObj función para convertir un valor numérico para Object.The following example uses the CObj function to convert a numeric value to Object. El Object propia variable contiene sólo un puntero de cuatro bytes, que apunta a la Double valor asignado a él.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)

Ejemplo de CSByteCSByte Example

En el ejemplo siguiente se usa el CSByte función para convertir un valor numérico para 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)

Ejemplo de CShortCShort Example

En el ejemplo siguiente se usa el CShort función para convertir un valor numérico para 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)

Ejemplo de CSngCSng Example

En el ejemplo siguiente se usa el CSng función para convertir los valores para 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)

Ejemplo de CStrCStr Example

En el ejemplo siguiente se usa el CStr función para convertir un valor numérico para 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)

En el ejemplo siguiente se usa el CStr función para convertir Date valores String valores.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 siempre presenta un Date valor en el formato abreviado estándar de la configuración regional, por ejemplo, "6/15/2003 4:35:47 P.M.".CStr always renders a Date value in the standard short format for the current locale, for example, "6/15/2003 4:35:47 PM". Sin embargo, CStr suprime la valores neutrales de 1/1/0001 para la fecha y 00:00:00 durante el tiempo.However, CStr suppresses the neutral values of 1/1/0001 for the date and 00:00:00 for the time.

Para más información sobre los valores devueltos por CStr, consulte devolver valores para la función CStr.For more detail on the values returned by CStr, see Return Values for the CStr Function.

Ejemplo de CUIntCUInt Example

En el ejemplo siguiente se usa el CUInt función para convertir un valor numérico para 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)

Ejemplo de CULngCULng Example

En el ejemplo siguiente se usa el CULng función para convertir un valor numérico para 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)

Ejemplo de CUShortCUShort Example

En el ejemplo siguiente se usa el CUShort función para convertir un valor numérico para 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)

Vea tambiénSee also