| Вопрос: посимвольная обработка строк | Добавлено: 13.12.03 13:31 |
Автор вопроса:  MxmUs
|
|
как получить доступ к отдельным символам строки? пжалста. спсиба. |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа:  Виталий51 ICQ: 224290361 Вопросов: 8 Ответов: 50 |
Web-сайт: Профиль | | #1 | Добавлено: 13.12.03 16:41 |
|
Пиши мне на мыло вышлю готовую под дос и под вин, как захочешь |
||
|
Номер ответа: 2 Автор ответа:  терапевт Вопросов: 1 Ответов: 1 |
Профиль | | #2 | Добавлено: 28.12.03 16:59 |
|
Простейшее, что может прийти в голову, это - перекинуть строку в символьный массив Dim Length as Integer Dim i as Integer Dim CharArray(100) as String Dim Stroka as String Stroka = "Any text"
Length = Len (Stroka) ReDim CharArray(Length) as String For i = 1 To Length CharArray(i) = Mid(Stroka, i, 1) Next Вернуть в исходное еще проще Stroka = "" For i = 1 To Length Stroka = Stroka + CharArray(i) Next |
||
|
Номер ответа: 3 Автор ответа:  demosICQ: 31003055 Вопросов: 2 Ответов: 5 |
Профиль | | #3 | Добавлено: 06.03.04 16:53 |
|
а просто через mid без массива? там же можно как в одну так и в другую сторону: stroka="12345" i=mid(stroka,3,1)' i="3" ---- mid(stroka,3,1)="*" ' stroka="12*45" |
||
Страница: 1 |