Страница: 1 |
Страница: 1 |
Вопрос: Строка
Добавлено: 20.09.04 12:16
Автор вопроса: ANDREY Z5Z | Web-сайт:
Как можно удалить участок из середины строки?
Ответы
Всего ответов: 4
Номер ответа: 1
Автор ответа:
cresta
Вопросов: 117
Ответов: 1538
Профиль | | #1
Добавлено: 20.09.04 14:14
Можно извращённым способом:
InString = "ABCDDDDCBA"
OutString = Replace(InString, "DDD", ""
MsgBox OutString
Номер ответа: 2
Автор ответа:
Barsik
Разработчик Offline Client
ICQ: 343368641
Вопросов: 17
Ответов: 686
Web-сайт:
Профиль | | #2
Добавлено: 21.09.04 17:36
мона функцию написать.....
Function Rezat(left As Long, right As Long)
берем left символов с начала
берем right символов с конца
клеим строки
усе
End Function
могу и функцию написать... надо????
Номер ответа: 3
Автор ответа:
Navigator
ICQ: 177815632
Вопросов: 11
Ответов: 70
Профиль | | #3
Добавлено: 21.09.04 20:34
Или просто Mid'ом:
InString = "ABCDDDDCBA"
OutString = Mid(InString, 1,3)+Mid(InString, 8,3)
MsgBox OutString
Номер ответа: 4
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #4
Добавлено: 21.09.04 20:59
Из середины никак не удалишь. Строка в памяти располагается последовательно. Нужно переписывать.