| Вопрос: Текст | Добавлено: 10.04.10 21:23 |
Автор вопроса:  iprog | Web-сайт: usprogs.atheo-club.ru
|
| Здравствуйте. Пишу программу на VB 6. Есть массив TextBox'ов. Как проверить наличие какого-нибудь слова в одном из них? При этом известно, что слово или словосочетание находится в начале TextBox и после него находится неизвестное количество символов. И ещё, как можно эти последние символы записать в переменные? |
| Ответы | Всего ответов: 7 |
|
Номер ответа: 1 Автор ответа:  Winand Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #1 | Добавлено: 10.04.10 21:27 |
|
ну цикл и условия такого плана:
if text1(i).text like "Word1*" then или такого if mid(text1.text(i),1,5)= "Word1" then |
||
|
Номер ответа: 2 Автор ответа: AWPICQ: 345685652 Вопросов: 96 Ответов: 1212 |
Web-сайт: Профиль | | #2 | Добавлено: 10.04.10 23:15 |
|
dim S as string
i = InStr(1,text1(i).text,"word1" 
if i<>0 then ' Записываем в переменную. S = mid$(text1(i).text,i+5,len(text1(i).text)-5) end if |
||
|
Номер ответа: 3 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #3 | Добавлено: 11.04.10 00:00 |
| тогда уж If i = 1 Then | ||
|
Номер ответа: 4 Автор ответа: AWPICQ: 345685652 Вопросов: 96 Ответов: 1212 |
Web-сайт: Профиль | | #4 | Добавлено: 11.04.10 04:25 |
| а вдруг у него попадется текст так, что word1 не в самом начале будет. | ||
|
Номер ответа: 5 Автор ответа: WinandВопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | | #5 | Добавлено: 11.04.10 10:10 |
|
а вдруг это не так.
>При этом известно, что слово или словосочетание находится в начале TextBox |
||
|
Номер ответа: 6 Автор ответа: ηikolaŠ~rus ICQ: 604058327 Вопросов: 50 Ответов: 287 |
Профиль | | #6 | Добавлено: 11.04.10 10:30 |
| тогда просто не задавать позиции поиска и искать слово во всем текстбоксе. | ||
|
Номер ответа: 7 Автор ответа:  MilleniumICQ: 629966 Вопросов: 118 Ответов: 903 |
Web-сайт: Профиль | | #7 | Добавлено: 13.04.10 10:43 |
| лудще пользоватся Split-ом | ||
Страница: 1 |