| Вопрос: проблеммы с точкой в дробных числах. | Добавлено: 14.05.05 14:38 |
Автор вопроса:  Fidget | Web-сайт: www.m-o.ru | ICQ: 203311178 |
| Ответы | Всего ответов: 22 |
|
Номер ответа: 16 Автор ответа:  Morpheus Вопросов: 224 Ответов: 3777 |
Web-сайт: Профиль | | #16 | Добавлено: 18.05.05 18:13 |
|
2 LamerOnLine:
Между прочим, решение неплохое, и я бы предпочёл его, чем лазить по компу как 5 таксистов и две собаки и искать что ставит пользователь для обозначения дробной части  ))))
|
||
|
Номер ответа: 17 Автор ответа: Alexey Spirin ICQ: 135554022 Вопросов: 0 Ответов: 8 |
Web-сайт: Профиль | | #17 | Добавлено: 18.05.05 22:09 |
|
Слушайте, я всю жизнь вот так делал, и всегда работало:
Option Explicit
Private Sub Command1_Click() Dim a, b As String a = "123.45" b = "123,45" MsgBox MakeNum  & vbCrLf & MakeNum(b)
End Sub Function MakeNum(ByVal Num As String) As Double Dim Val Val = Replace(Num, ",", Mid(CStr(1.1), 2, 1)) MakeNum = Replace(Val, ".", Mid(CStr(1.1), 2, 1)) End Function |
||
|
Номер ответа: 18 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #18 | Добавлено: 19.05.05 10:52 |
| Ну, еще варианты? | ||
|
Номер ответа: 19 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #19 | Добавлено: 19.05.05 10:53 |
|
2Alexey Spirin
Если у юзера стоит разделитель не "." и не "," - что ему с твоим кодом делать? |
||
|
Номер ответа: 20 Автор ответа: Alexey SpirinICQ: 135554022 Вопросов: 0 Ответов: 8 |
Web-сайт: Профиль | | #20 | Добавлено: 19.05.05 12:20 |
|
Да хоть "?".
При преобразовании числа (1.1) в стринг точка заменится на региональный символ. |
||
|
Номер ответа: 21 Автор ответа: Sur ICQ: 1249088 Вопросов: 10 Ответов: 304 |
Web-сайт: Профиль | | #21 | Добавлено: 28.07.05 11:47 |
|
случайно наткнулся на такой вариант определения разделителя в системе
format$(0, "."
 |
||
|
Номер ответа: 22 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #22 | Добавлено: 28.07.05 12:39 |
| Самый лучший муж - это археолог. Чем старше вы становитесь, тем больший интерес в нем вызываете. | ||