VBNet - Форум

Вопрос: HELP!!!! Добавлено: 04.08.08 02:16

Автор вопроса: KVU

Здравствуйте.
Стакнулся с такой проблемой есть TextBox у нево формат данных денежный типа 0,00р. #,##
Получается сумма вида 350 050,00р.
Нужно её привести к виду 350050.00
Пробовал следующие методы:

Dim stxtSumManager As String
stxtSumManager = Replace(Mid(txtSumManager.Text, 1, Len(txtSumManager.Text) - 2), ",", ".")

Возвращает вида 350 050.00
Теперь пытаюсь удалить ненужный пробел следующим способом:

stxtSumManager = Trim(Replace(stxtSumManager, " ", ""))

Что ещё не пробовал не как не могу избавиться от этого пробела.
Зарание спасибо за помощь.
С уважением, Владислав.
Ответить

Ответы Всего ответов: 6

Номер ответа: 1 Автор ответа: Skywalker ICQ: 300-70-6пятьЪ Вопросов: 62 Ответов: 545	Web-сайт: iSkywalker.ru Профиль \| \| #1	Добавлено: 04.08.08 10:51
	все работает о_О Dim str As String str = "350 050.00" str = Trim(Replace(str, " ", "") MsgBox str Ответить

Номер ответа: 2 Автор ответа: Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949	Web-сайт: domkratt.com Профиль \| \| #2	Добавлено: 04.08.08 11:07
	Убрать денежный формат Ответить

Номер ответа: 3 Автор ответа: KVU Вопросов: 10 Ответов: 32	Профиль \| \| #3	Добавлено: 04.08.08 14:07
	Dim str As String str = "350 050.00" str = Trim(Replace(str, " ", "") MsgBox str Вся прелесть когда пишешь в ручную, все работает, а когда переменная заполняется из элемента textbox не работает Ответить

Номер ответа: 4 Автор ответа: KVU Вопросов: 10 Ответов: 32	Профиль \| \| #4	Добавлено: 04.08.08 14:08
	Не люблю легких путей Ответить

Номер ответа: 5 Автор ответа: Skywalker ICQ: 300-70-6пятьЪ Вопросов: 62 Ответов: 545	Web-сайт: iSkywalker.ru Профиль \| \| #5	Добавлено: 04.08.08 15:16
	Replace(stxtSumManager, Chr(160), "" наслаждайся Ответить

Номер ответа: 6 Автор ответа: KVU Вопросов: 10 Ответов: 32	Профиль \| \| #6	Добавлено: 04.08.08 23:00
	Ура! Большущие спасибо!!!! Респект, уважуХа!!! Ответить

Страница: 1 |