powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / в переменной оставить только числа
15 сообщений из 15, страница 1 из 1
в переменной оставить только числа
    #37223914
q1w1e1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
есть какое-то значение, например, c="В234А&^4", мне надо оставить только числа, а не числа заменить 0.
Первое что приходит в голову это цикл
for i=1 to len(c)
if !isnum(или что-то в этом роде)
endfor
и т.д.
Но может есть какая-нибудь функция, чтоб поставить в replace...
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223936
While_For
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
CHRTRAN('A345DF56','ADFSRT','0')
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223942
XAndy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
q1w1e1,

cVar = "В234А&^4"
? chrtran(cVar, chrtran(cVar, "123456789", ""), "000000000")
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223944
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можешь так попробовать
Код: plaintext
chrtran(c, 'BА&^', '0000')
только все возможные "нецифры" надо будет прописать
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223945
q1w1e1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это надо перечислить в CHRTRAN все буквы, символы псевдографики и невидимые символы(конец строки, перевод каретки и т.д.)?
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223948
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
q1w1e1Это надо перечислить в CHRTRAN все буквы, символы псевдографики и невидимые символы(конец строки, перевод каретки и т.д.)?
Вариант XAndy немного доработай и не надо будет.
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223952
q1w1e1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
XAndy,

спасибо...
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223973
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
q1w1e1есть какое-то значение, например, c="В234А&^4", мне надо оставить только числа, а не числа заменить 0.
Первое что приходит в голову это цикл
for i=1 to len(c)
if !isnum(или что-то в этом роде)
endfor
и т.д.
Но может есть какая-нибудь функция, чтоб поставить в replace...

Если в цикле, то примерно так

a = ""
FOR i = 1 TO LEN(ALLTRIM(c))
IF ISDIGIT(SUBSTR(c, i, 1)
a = a + SUBSTR(c, i, 1)
ENDIF
ENDFOR
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223977
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorNGq1w1e1есть какое-то значение, например, c="В234А&^4", мне надо оставить только числа, а не числа заменить 0.
Первое что приходит в голову это цикл
for i=1 to len(c)
if !isnum(или что-то в этом роде)
endfor
и т.д.
Но может есть какая-нибудь функция, чтоб поставить в replace...

Если в цикле, то примерно так

a = ""
FOR i = 1 TO LEN(ALLTRIM(c))
IF ISDIGIT(SUBSTR(c, i, 1))
a = a + SUBSTR(c, i, 1)
ENDIF
ENDFOR

Забыл поставить одну скобку
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223979
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorNG, это на порядок медленнее двойного чартрана.
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37223986
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
tanglirIgorNG, это на порядок медленнее двойного чартрана.

согласен
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37225920
DmGr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
aaa = '234d2kj3g4fb2gh556rhbthjcs'
bbb = CHRTRAN(aaa,'0123456789','')
? CHRTRAN(aaa, bbb, REPLICATE('0', LEN(bbb)))
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37225926
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmGr,

Непонятно только практическое применение ЭТОГО.
Т.е. есть строка с абракадаброй. И из нее выбрать только цифры
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37226043
DmGr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
IgorNG,

А это точно мне вопрос?
...
Рейтинг: 0 / 0
в переменной оставить только числа
    #37226055
IgorNG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DmGr,

Конечно, нет. Это скорее не вопрос, а размышление
...
Рейтинг: 0 / 0
15 сообщений из 15, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / в переменной оставить только числа
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]