переменая округляется

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Invader
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 18.01.2005 (Вт) 4:22
Откуда: Молдавия, Виноград

переменая округляется

Сообщение Invader » 18.11.2011 (Пт) 9:02

я получаю стринговую переменную из сети.
Код: Выделить всё
dim valut(14) as string
dim x as integer
valut(i) = "11,6514"
x = Val(Replace(valut(i), ",", "."))
'или
x = Val(valut(i))

возвращает х=12
пробовал присвоить тип лонг тоже х=12
если записываю
Код: Выделить всё
x = Cint(Replace(valut(i), ",", "."))

ошибка - несовпадение типов,
как получить х=11.6514
умён и жаден,
характер отсуствует

Invader
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 18.01.2005 (Вт) 4:22
Откуда: Молдавия, Виноград

Re: переменая округляется

Сообщение Invader » 18.11.2011 (Пт) 9:31

спас тип Currency
умён и жаден,
характер отсуствует

iGrok
Артефакт VBStreets
Артефакт VBStreets
 
Сообщения: 4272
Зарегистрирован: 10.05.2007 (Чт) 16:11
Откуда: Сетевое сознание

Re: переменая округляется

Сообщение iGrok » 18.11.2011 (Пт) 10:33

А матчасть учить не пробовал, чтобы с типами "пальцем в небо" не тыкаться?

Integer, Long - целочисленные.
Single, Double - с плавающей точкой (т.е. как раз то, что тебе было нужно).

Currency, конечно, тоже подходит. Но это как из пушки по воробьям... Хотя смотря, что ты там считаешь, конечно, какая нужна точность, и какие могут быть числа.
label:
cli
jmp label

Invader
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 285
Зарегистрирован: 18.01.2005 (Вт) 4:22
Откуда: Молдавия, Виноград

Re: переменая округляется

Сообщение Invader » 18.11.2011 (Пт) 14:13

переменные - курсы валют, и работа сними, точность до 5 знака после запятой.
матчасть читал тривиально сингл не подошел.
умён и жаден,
характер отсуствует


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, Yandex-бот и гости: 20

    TopList