I NEED YOUR HELP!!!

[Jamshid]

Здраствуйте, пожалуста помогите!!! У меня такая проблема, у каждой страны свои стандарты по "Разделителям целой и дробной частей числа", например может быть "," или что-то еще. Так, мне надо чтобы независимо от того какой именно стандарт установлен, программа распозновал и при выводе на экран отображался именно ".", например "2.478" а не "2,478". Может быть есть API, которые распозноют какой стандарт установлен и может изменять этот стандарт так чтоб отображал "."

Спасибо!!!

[RayShade]

Поиском по форуму вопрос этот решишь ты.

Слова ключевые будут GetLocaleInfo и... все, не будет слов больше.

Да пребудет с тобой bbs.vbstreets.ru и old.vbstreets.ru

[Jamshid]

Поиском по форуму вопрос этот решишь ты.
Слова ключевые будут GetLocaleInfo и... все, не будет слов больше.
Да пребудет с тобой bbs.vbstreets.ru и old.vbstreets.ru

Может что нибудь точнее есть? И если можно примерчик привести. Спасибо заранее!!!

[RayShade]

Что, совсем лень что ли?

Ну надо же усилия уметь прикладывать хоть минимальные



http://bbs.vbstreets.ru/viewtopic.php?t ... localeinfo

[Jamshid]

Что, совсем лень что ли?
Ну надо же усилия уметь прикладывать хоть минимальные

http://bbs.vbstreets.ru/viewtopic.php?t ... localeinfo

RayShade ne serdis'
Ya posmotrel kodi, oni tol'ko vidaut mne kakoy separator ustanovlen, no mne nado chtobi pri zapuske progi, na ekran vivodilas' ".", v lubom sluchaye t.e. proga sama ustanavlival "." esli tam ustanovlen ",", ne smotrya na to chto kakoy Regional'niy standart ustanovlen (t.e. Razdelitel' celoy i drobnoy chastey chisla).

[RayShade]

Алгоритм таков:

1. Определяешь, какой именно символ является разделителем.

2. Заменяешь его replace'ом на "." и нет проблем.

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

[Mikle]

Смотря куда и каким методом выдавать число. Если Print то достаточно вместо:

Код: Выделить всё

  Print var


писать:

Код: Выделить всё

  Print str$(var)


и будет всегда ".". То же для Grid
dvtcnj^

Код: Выделить всё

  grid = var


писать:

Код: Выделить всё

  grid.text = str$(var)


Все зависит от твоей задачи.

[Jamshid]

Алгоритм таков:
1. Определяешь, какой именно символ является разделителем.
2. Заменяешь его replace'ом на "." и нет проблем.
Потому что менять региональные настройки можно не всегда - к примеру если прога будет работать не под админским акаунтом - то ничего не заменишь.

А если это таблица, которая прилинкована с БД. Что, мне надо в каждой ячейке делать Replace? Есть ли такая возможность изменять на "." при выводе на экран в таблице при load'e?

[alibek]

Не тормози.
Если это БД и в ней числа храняться в виде текста, то это единственный выход. А если числа храняться как числа, то ты сам можешь задавать форматирование.

[Jamshid]

Не тормози.
Если это БД и в ней числа храняться в виде текста, то это единственный выход. А если числа храняться как числа, то ты сам можешь задавать форматирование.

alibek если ты это имел ввиду:
' User-defined formats.
MyStr = Format(5459.4, "##,##0.00") ' Returns "5,459.40".
MyStr = Format(334.9, "###0.00") ' Returns "334.90".

то я пробовал так делать, все равно выводит с "," , но получается только через str$. По другому не получилось, если есть другие варианты то подскажите ребята.

Заранее благодарю всех

[kif]

text_Change()
dim i as Integer
i=text.selstart
text=replace(text,",",".")
text.selstart=i
end sub