Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: ??????
помогите плз, я уже сам себя запутал в строках. dim x, i as String

если писать long ругается

x = Mid(txtMesseg.Value, InStr(1, txtMesseg.Value, "не менее") + 9)
i = Left(x, 3)
pole_2.Value = i

впринципе работает, я результат беру из яндекса:
фрагмент:

Результат поиска: страниц — 3, сайтов — не менее 3
Запросов за месяц: ремонт — 123 974 754, alcatel — 19 111 725. Купить

тут мне нужна цифра 3
если оставлять как я прописал то после цифры 3 идёт абзац он и копируется тоже. Если вместо 3 стоит трёхзначное число то результат другой.


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.