Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Разделение строки на отдельные слова! / 4 сообщений из 4, страница 1 из 1
18.11.2011, 15:36
    #37533714
dima_18
dima_18
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Разделение строки на отдельные слова!
Здравствуйте всем!

Будьте добры подскажите пожалуйста решить следующий вопрос.
Есть строка. К примеру:a = багин валерий петрович. Между первым словом и вторым, а также между вторым словом и третьим имеются пробелы.
Мне бы хотелось из этой строки выделить подстроки и записать в отдельные переменные, т.е.
a1 = багин
a2 = валерий
a3 = петрович

Помогите пожалуйста.
Заранее большое спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.11.2011, 15:58
    #37533768
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Разделение строки на отдельные слова!
Код: plaintext
1.
2.
a1 = GetWordNum(a,  1 )
a2 = GetWordNum(a,  2 )
a3 = GetWordNum(a,  3 )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.11.2011, 16:11
    #37533804
dima_18
dima_18
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Разделение строки на отдельные слова!
Большое спасибо за помощь, Dima_T!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.11.2011, 23:16
    #37534463
Dag
Dag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Разделение строки на отдельные слова!
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
a = 'багин валерий петрович'
lnCount=ALINES(laWord,a,' ')
FOR lnI= 1  TO lnCount
	? laWord(lnI)
ENDFOR
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Разделение строки на отдельные слова! / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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