Форум продуктов IBM Lotus

Общие вопросы => Разработка приложений => Тема начата: Mika_89 от 15 Июнь 2011, 10:13:52

Название: Разбить строку
Отправлено: Mika_89 от 15 Июнь 2011, 10:13:52
Необходимо разбить строку на подстроки, т.е. например у меня имеется строка : "default/profiles/about"
надо получить 3 отдельных строки default, profiles, about
Подскажите пожалуйста с помощью каких функций Lotus Scripta можно это сделать?
Название: Re: Разбить строку
Отправлено: Alla Makshanova от 15 Июнь 2011, 10:26:41
Функция split, она возвращает массив строк

Sub Initialize
   Dim ret As Variant
   dim teststr as string
   Dim delim As String
   teststr = "default/profiles/about"
   delim = "/"
   ret = split(teststr, delim)
   For x = 0 to 2
      Print ret(x)
   Next
End Sub