Поиск…


Синтаксис

  • CBool ​​(выражение)
  • CByte (выражение)
  • CChar (выражение)
  • CDate (выражение)
  • CDbl (выражение)
  • CDec (выражение)
  • CInt (выражение)
  • CLng (выражение)
  • CObj (выражение)
  • CSByte (выражение)
  • CShort (выражение)
  • CSng (выражение)
  • CStr (выражение)
  • CUInt (выражение)
  • CULng (выражение)
  • CUShort (выражение)

параметры

Имя функции Диапазон аргументов выражения
CBool Любое действительное выражение Char или String или numeric
CByte От 0 до 255 (без знака); дробные части округлены.
CChar Любое действительное выражение Char или String; преобразуется только первый символ строки; значение может быть от 0 до 65535 (без знака).

Преобразование текста текстового поля в целое число

Из MSDN

Используйте функцию CInt, чтобы обеспечить конверсии из любого другого типа данных в подтип Integer. Например, CInt принудительно выполняет целочисленную арифметику, когда обычно происходит обмен валюты, одноточечная или арифметика с двойной точностью.

Предположим, что у вас есть 1 кнопка и 2 текстовых поля. Если вы набираете текст textbox1.text 5.5 и textbox2.text 10 .

Если у вас есть этот код:

Dim result = textbox1.text + textbox2.text
MsgBox("Result: " & result)
'It will output
5.510

Чтобы добавить значения 2 текстовых полей, вам нужно преобразовать их значения в Int с помощью CInt(expression) .

Dim result = CInt(textbox1.text) + CInt(textbox2.text)
MsgBox("Result: " & result)
'It will output
16

Примечание. Когда дробная часть значения равна 0,5, функция CInt округляется до ближайшего четного числа. Например, 0,5 раунда до 0 , в то время как 1.5 раунда до 2 и 3.5 раундов до 4 . Цель округления до ближайшего четного числа - это компенсировать смещение, которое может накапливаться при добавлении множества чисел.



Modified text is an extract of the original Stack Overflow Documentation
Лицензировано согласно CC BY-SA 3.0
Не связан с Stack Overflow