• Артем
  • Восстановленный участник
  • На форуме с 28 августа 2004г.
  • Сообщений: 4
  • Спасибо: 0

Тема: Как преобразовать вещественное число в целое?

Подскажите как можно из вещественного числа получить цело, т.е. 23.345 = 23345; 2.5 = 25 и т.п.

  • VK
  • Восстановленный участник
  • На форуме с 17 марта 2003г.
  • Сообщений: 1,980
  • Спасибо: 0

Re: Как преобразовать вещественное число в целое?

Преобразовать в строку, найти и удалить из строки точку, преобразовать строку в число.

  • На форуме с 16 мая 2004г.
  • Сообщений: 148
  • Спасибо: 0

Re: Как преобразовать вещественное число в целое?

CInt Function Example
This example uses the CInt function to convert a value to an Integer.
Dim MyDouble, MyInt
MyDouble = 2345.5678    ' MyDouble is a Double.
MyInt = CInt(MyDouble)    ' MyInt contains 2346.

  • VK
  • Восстановленный участник
  • На форуме с 17 марта 2003г.
  • Сообщений: 1,980
  • Спасибо: 0

Re: Как преобразовать вещественное число в целое?

> Тютюнников
А что делать с хвостом после точки, как хотел > Артем (2004-09-26 18:56:01) ?