Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > MS Access > как удалить слово из текстовой строки


Автор: sharkonst 25.4.2007, 22:25
У меня есть в активной форме поле с текстом
Не пойму как мне организовать при нажатии на кнопку поиск "слово1" в этой строке и удалить его. - это все равно что выделить мышкой это слово и нажать кнопку DEL 

Автор: Akina 26.4.2007, 07:41
Код

TextBox1.Text = Replace(TextBox1.Text, "слово1 ", "")

Автор: sharkonst 27.4.2007, 11:41
Спасибо  за ответ но прошу прощенья не указал что у меня Access 97 там большая база - ни как не соберусь перевести в более познюю версию
Поидее мне такая фукция и нужна но он там на Replace ругается - функция не определена
А может я туплю ? на подобе есть фонкция Mid(Заменяет указанное число символов в переменной типа Variant (String) символами из другой строки)
есть 
Метод ReplaceLine замещает указанную строку стандартного модуля или модуля класса.
объект.ReplaceLine строка, текст
но это все не то 
что делать?
http://forum.vingrad.ru/html/emoticons/pack/dash1.gif

Автор: Akina 27.4.2007, 12:20
Цитата(sharkonst @  27.4.2007,  12:41 Найти цитируемый пост)
там на Replace ругается - функция не определена

Проверь референсы - какого-то нехватает. Какого именно - не помню.

В крайнем случае

Код

Private Function Replace(WhereToSearch As String, WhatToSearch As String, WhatToInsert As String) As String
If Instr(WhereToSearch, WhatToSearch) > 0 Then
  Mid(WhereToSearch, Instr(WhereToSearch, WhatToSearch), Len(WhatToSearch)) = WhatToInsert
End If
Replace = WhereToSearch
End Function

Автор: sharkonst 27.4.2007, 14:25
щас попробую

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)