Функции преобразования типов (Visual Basic)Type Conversion Functions (Visual Basic)

Эти функции компилируются встроенным, то есть код преобразования является частью кода, который вычисляет выражение.These functions are compiled inline, meaning the conversion code is part of the code that evaluates the expression. Иногда нет вызова процедуры для выполнения преобразования, что повышает производительность.Sometimes there is no call to a procedure to accomplish the conversion, which improves performance. Каждая функция приводит выражение к определенному типу данных.Each function coerces an expression to a specific data type.

СинтаксисSyntax

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)

ЧастьPart

expression
Обязательный.Required. Любое выражение исходного типа данных.Any expression of the source data type.

Тип данных возвращаемого значенияReturn Value Data Type

Имя функции определяет тип данных возвращаемого значения, как показано в следующей таблице.The function name determines the data type of the value it returns, as shown in the following table.

Имя функцииFunction name Тип возвращаемых данныхReturn data type Диапазон для expression аргументаRange for expression argument
CBool Логический тип данныхBoolean Data Type Любое допустимое Char или String числовое выражение.Any valid Char or String or numeric expression.
CByte Тип данных ByteByte Data Type Byte.MinValue(от 0) до Byte.MaxValue (255) (без знака); дробные части округляются. 1Byte.MinValue (0) through Byte.MaxValue (255) (unsigned); fractional parts are rounded.1

Начиная с Visual Basic 15,8 Visual Basic оптимизирует производительность преобразования с плавающей запятой в байтовую CByte функцию. Дополнительные сведения см. в разделе "Примечания" .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. Пример см. в разделе пример для функции CInt .See the CInt Example section for an example.
CChar Тип данных CharChar Data Type Любое допустимое Char String выражение или; преобразуется только первый символ String ; значение может быть от 0 до 65535 (без знака).Any valid Char or String expression; only first character of a String is converted; value can be 0 through 65535 (unsigned).
CDate Тип данных DateDate Data Type Любое допустимое представление даты и времени.Any valid representation of a date and time.
CDbl Тип данных DoubleDouble Data Type -1.79769313486231570 e + 308 до-4.94065645841246544 E-324 для отрицательных значений; 4.94065645841246544 e-324 до 1.79769313486231570 E + 308 для положительных значений.-1.79769313486231570E+308 through -4.94065645841246544E-324 for negative values; 4.94065645841246544E-324 through 1.79769313486231570E+308 for positive values.
CDec Тип данных DecimalDecimal Data Type +/-79,228,162,514,264,337,593,543,950,335 для чисел с нулевым масштабом, то есть чисел без десятичных разрядов.+/-79,228,162,514,264,337,593,543,950,335 for zero-scaled numbers, that is, numbers with no decimal places. Для чисел с 28 десятичными разрядами диапазоном является +/-7.9228162514264337593543950335.For numbers with 28 decimal places, the range is +/-7.9228162514264337593543950335. Наименьшее возможное ненулевое число — 0,0000000000000000000000000001 (+/-1E-28).The smallest possible non-zero number is 0.0000000000000000000000000001 (+/-1E-28).
CInt Тип данных IntegerInteger Data Type Int32.MinValue(от-2 147 483 648) до Int32.MaxValue (2 147 483 647); дробные части округляются. 1Int32.MinValue (-2,147,483,648) through Int32.MaxValue (2,147,483,647); fractional parts are rounded.1

Начиная с Visual Basic 15,8 Visual Basic оптимизирует производительность преобразования с плавающей запятой в целое с помощью CInt функции. Дополнительные сведения см. в разделе "Примечания ".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. Пример см. в разделе пример для функции CInt .See the CInt Example section for an example.
CLng Тип данных LongLong Data Type Int64.MinValue(от-9223372036854775808) до Int64.MaxValue (9 223 372 036 854 775 807); дробные части округляются. 1Int64.MinValue (-9,223,372,036,854,775,808) through Int64.MaxValue (9,223,372,036,854,775,807); fractional parts are rounded.1

Начиная с Visual Basic 15,8 Visual Basic оптимизирует производительность преобразования с плавающей запятой в 64-разрядное целое число с помощью CLng функции; Дополнительные сведения см. в разделе "Примечания" .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. Пример см. в разделе пример для функции CInt .See the CInt Example section for an example.
CObj Object Data TypeObject Data Type Любое допустимое выражение.Any valid expression.
CSByte Тип данных SByteSByte Data Type SByte.MinValue(от-128) до SByte.MaxValue (127); дробные части округляются. 1SByte.MinValue (-128) through SByte.MaxValue (127); fractional parts are rounded.1

Начиная с Visual Basic 15,8, Visual Basic оптимизирует производительность преобразования байтов с плавающей запятой в функцию с помощью CSByte функции. Дополнительные сведения см. в разделе "Примечания" .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. Пример см. в разделе пример для функции CInt .See the CInt Example section for an example.
CShort Тип данных ShortShort Data Type Int16.MinValue(от-32 768) до Int16.MaxValue (32 767); дробные части округляются. 1Int16.MinValue (-32,768) through Int16.MaxValue (32,767); fractional parts are rounded.1

Начиная с Visual Basic 15,8 Visual Basic оптимизирует производительность преобразования с плавающей запятой в 16-разрядное целое с помощью CShort функции. Дополнительные сведения см. в разделе "Примечания" .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. Пример см. в разделе пример для функции CInt .See the CInt Example section for an example.
CSng Тип данных SingleSingle Data Type -3.402823 e + 38 – 1.401298 E-45 для отрицательных значений; 1.401298 e-45 до 3.402823 E + 38 для положительных значений.-3.402823E+38 through -1.401298E-45 for negative values; 1.401298E-45 through 3.402823E+38 for positive values.
CStr Тип данных StringString Data Type Для CStr зависит от expression аргумента.Returns for CStr depend on the expression argument. См. раздел возвращаемые значения для функции CStr.See Return Values for the CStr Function.
CUInt Тип данных UIntegerUInteger Data Type UInt32.MinValue(от 0) до UInt32.MaxValue (4 294 967 295) (без знака); дробные части округляются. 1UInt32.MinValue (0) through UInt32.MaxValue (4,294,967,295) (unsigned); fractional parts are rounded.1

Начиная с Visual Basic 15,8 Visual Basic оптимизирует производительность преобразования с плавающей запятой в целое число без знака с помощью CUInt функции. Дополнительные сведения см. в разделе "Примечания" .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. Пример см. в разделе пример для функции CInt .See the CInt Example section for an example.
CULng Тип данных ULongULong Data Type UInt64.MinValue(от 0) до UInt64.MaxValue (18446744073709551615) (без знака); дробные части округляются. 1UInt64.MinValue (0) through UInt64.MaxValue (18,446,744,073,709,551,615) (unsigned); fractional parts are rounded.1

Начиная с Visual Basic 15,8, Visual Basic оптимизирует производительность преобразования с плавающей запятой в функцию длинного целого числа без знака с помощью CULng функции. Дополнительные сведения см. в разделе "Примечания" .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. Пример см. в разделе пример для функции CInt .See the CInt Example section for an example.
CUShort Тип данных UShortUShort Data Type UInt16.MinValue(от 0) до UInt16.MaxValue (65 535) (без знака); дробные части округляются. 1UInt16.MinValue (0) through UInt16.MaxValue (65,535) (unsigned); fractional parts are rounded.1

Начиная с Visual Basic 15,8, Visual Basic оптимизирует производительность преобразования 16-разрядного целого числа без знака с плавающей запятой в CUShort функцию. Дополнительные сведения см. в разделе "Примечания" .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. Пример см. в разделе пример для функции CInt .See the CInt Example section for an example.

1 дробная часть может подвергаться специальному типу округления, называемому банковским округлением.1 Fractional parts can be subject to a special type of rounding called banker's rounding. Дополнительные сведения см. в разделе "Примечания".See "Remarks" for more information.

КомментарииRemarks

Как правило, следует использовать функции преобразования типа Visual Basic в качестве предпочтений для методов .NET Framework, таких как ToString() , в Convert классе или в отдельной структуре типа или классе.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. Функции Visual Basic предназначены для оптимального взаимодействия с Visual Basicным кодом, а также для сокращения исходного кода и упрощения его чтения.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. Кроме того, методы преобразования .NET Framework не всегда дают те же результаты, что и функции Visual Basic, например при преобразовании Boolean в 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. Дополнительные сведения см. в разделе Устранение неполадок типов данных.For more information, see Troubleshooting Data Types.

Начиная с Visual Basic 15,8, производительность преобразования с плавающей запятой в целое число оптимизируется при передаче Single значения или, Double возвращаемого следующими методами, в одну из целочисленных функций преобразования (,,,,,, 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):

Такая оптимизация позволяет выполнять код, выполняющий большое количество целочисленных преобразований, в два раза быстрее.This optimization allows code that does a large number of integer conversions to run up to twice as fast. В следующем примере демонстрируются эти оптимизированные преобразования с плавающей запятой в целые числа: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

ПоведениеBehavior

  • Приведение.Coercion. В общем случае можно использовать функции преобразования типов данных для приведения результата операции к конкретному типу данных, а не по типу данных по умолчанию.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. Например, используйте CDec для принудительного выполнения десятичных арифметических операций в случаях, когда обычно выполняется операция с одиночной точностью, двойной точностью или целочисленной.For example, use CDec to force decimal arithmetic in cases where single-precision, double-precision, or integer arithmetic would normally take place.

  • Неудачные преобразования.Failed Conversions. Если expression переданный функции объект находится вне диапазона типа данных, в который она должна быть преобразована, 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.

  • Дробные части.Fractional Parts. При преобразовании нецелочисленного значения в целочисленные функции целочисленного преобразования ( CByte , CInt ,,, CLng , CSByte CShort CUInt , CULng и CUShort ) удаляют дробную часть и округляют значение до ближайшего целого.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.

    Если дробная часть равна точности 0,5, функции целочисленного преобразования округляют его до ближайшего четного целого числа.If the fractional part is exactly 0.5, the integer conversion functions round it to the nearest even integer. Например, 0,5 округляется до 0, а 1,5 и 2,5 оба округляются в 2.For example, 0.5 rounds to 0, and 1.5 and 2.5 both round to 2. Иногда это называется округлением банкаи предназначено для компенсации смещения, которое может накапливаться при одновременном добавлении многих таких чисел.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и CLng отличаются от Int функций и Fix , которые усекаются, а не округляют дробную часть числа.CInt and CLng differ from the Int and Fix functions, which truncate, rather than round, the fractional part of a number. Кроме того, Fix и Int всегда возвращают значение того же типа данных, что и при передаче.Also, Fix and Int always return a value of the same data type as you pass in.

  • Преобразования даты и времени.Date/Time Conversions. Используйте IsDate функцию, чтобы определить, можно ли преобразовать значение в дату и время.Use the IsDate function to determine if a value can be converted to a date and time. CDateраспознает литералы даты и литералы времени, но не числовые значения.CDate recognizes date literals and time literals but not numeric values. Чтобы преобразовать значение Visual Basic 6,0 в Date Date значение в Visual Basic 2005 или более поздней версии, можно использовать 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.

  • Нейтральные значения даты и времени.Neutral Date/Time Values. Тип данных Date всегда содержит сведения о дате и времени.The Date Data Type always contains both date and time information. В целях преобразования типов Visual Basic учитывает 1/1/0001 (1 января 1 года) как нейтральное значение для даты, а 00:00:00 (полночь) — как нейтральное значение времени.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. При преобразовании Date значения в строку не CStr включает нейтральные значения в результирующую строку.If you convert a Date value to a string, CStr does not include neutral values in the resulting string. Например, если преобразовать #January 1, 0001 9:30:00# в строку, то результатом будет "9:30:00 AM"; сведения о дате подавляются.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. Однако сведения о дате по-прежнему содержатся в исходном Date значении и могут быть восстановлены с помощью таких функций, как DatePart Function.However, the date information is still present in the original Date value and can be recovered with functions such as DatePart function.

  • Чувствительность языка и региональных параметров.Culture Sensitivity. Функции преобразования типов, включающие строки, выполняют преобразования в соответствии с текущими параметрами языка и региональных параметров для приложения.The type conversion functions involving strings perform conversions based on the current culture settings for the application. Например, CDate распознает форматы даты в соответствии с настройками языкового стандарта системы.For example, CDate recognizes date formats according to the locale setting of your system. Необходимо указать день, месяц и год в правильном порядке для вашего языкового стандарта, иначе Дата может интерпретироваться неправильно.You must provide the day, month, and year in the correct order for your locale, or the date might not be interpreted correctly. Длинный формат даты не распознается, если он содержит строку дня недели, например "среда".A long date format is not recognized if it contains a day-of-the-week string, such as "Wednesday".

    Если необходимо преобразовать в строковое представление значения или из него в формате, отличном от указанного в Вашем языковом стандарте, то нельзя использовать функции преобразования типа 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. Для этого используйте ToString(IFormatProvider) Parse(String, IFormatProvider) методы и типа этого значения.To do this, use the ToString(IFormatProvider) and Parse(String, IFormatProvider) methods of that value's type. Например, используйте Double.Parse при преобразовании строки в Double и используйте Double.ToString при преобразовании значения типа Double в строку.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

Функция CType принимает второй аргумент, typename и expression typename typename применяет к, где может быть любым типом данных, структурой, классом или интерфейсом, к которому существует допустимое преобразование.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.

Сравнение CType с другими ключевыми словами преобразования типов см. в разделе Оператор DirectCast и Оператор TryCast.For a comparison of CType with the other type conversion keywords, see DirectCast Operator and TryCast Operator.

Пример CBoolCBool Example

В следующем примере функция используется CBool для преобразования выражений в Boolean значения.The following example uses the CBool function to convert expressions to Boolean values. Если результат выражения равен ненулевому значению, CBool True функция возвращает; в противном случае возвращается значение 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)

Пример CByteCByte Example

В следующем примере функция используется CByte для преобразования выражения в 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)

Пример CCharCChar Example

В следующем примере функция используется CChar для преобразования первого символа String выражения в 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)

Входной аргумент CChar должен иметь тип данных Char или String .The input argument to CChar must be of data type Char or String. Нельзя использовать CChar для преобразования числа в символ, поскольку CChar не может принимать числовые типы данных.You cannot use CChar to convert a number to a character, because CChar cannot accept a numeric data type. В следующем примере получается число, представляющее кодовую точку (код символа), и преобразуется в соответствующий символ.The following example obtains a number representing a code point (character code) and converts it to the corresponding character. Она использует InputBox функцию для получения строки разрядов, CInt преобразования строки в тип Integer и ChrW для преобразования числа в тип 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)

Пример для CDateCDate Example

В следующем примере функция используется CDate для преобразования строк в Date значения.The following example uses the CDate function to convert strings to Date values. Обычно не рекомендуется жестко кодировать даты и время в виде строк (как показано в этом примере).In general, hard-coding dates and times as strings (as shown in this example) is not recommended. Вместо этого используйте литералы даты и временные литералы, например #Feb 12, 1969 # и #4:45:23 PM #.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)

Пример с 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)

Пример CDecCDec Example

В следующем примере функция используется CDec для преобразования числового значения в 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)

Пример функции CIntCInt Example

В следующем примере функция используется CInt для преобразования значения в 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)

Пример с CLngCLng Example

В следующем примере функция используется CLng для преобразования значений в 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)

Пример CObjCObj Example

В следующем примере функция используется CObj для преобразования числового значения в Object .The following example uses the CObj function to convert a numeric value to Object. ObjectСама переменная содержит только 4-байтовый указатель, указывающий на Double присвоенное ему значение.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)

Пример КсбитеCSByte Example

В следующем примере функция используется CSByte для преобразования числового значения в 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)

Пример CShortCShort Example

В следующем примере функция используется CShort для преобразования числового значения в 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)

Пример CSngCSng Example

В следующем примере функция используется CSng для преобразования значений в 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)

Пример функции CStrCStr Example

В следующем примере функция используется CStr для преобразования числового значения в 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)

В следующем примере функция используется CStr для преобразования Date значений в String значения.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всегда отображает Date значение в стандартном коротком формате для текущего языкового стандарта, например "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". Однако CStr подавляет нейтральные значения 1/1/0001 для даты и 00:00:00 для времени.However, CStr suppresses the neutral values of 1/1/0001 for the date and 00:00:00 for the time.

Дополнительные сведения о значениях, возвращаемых CStr , см. в разделе возвращаемые значения функции CStr.For more detail on the values returned by CStr, see Return Values for the CStr Function.

Пример КуинтCUInt Example

В следующем примере функция используется CUInt для преобразования числового значения в 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)

Пример КулнгCULng Example

В следующем примере функция используется CULng для преобразования числового значения в 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)

Пример КушортCUShort Example

В следующем примере функция используется CUShort для преобразования числового значения в 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)

См. также разделSee also