Простейший вопрос, но все же..

Тема в разделе "Lotus - Программирование", создана пользователем sanch, 1 фев 2007.

  1. sanch

    sanch Well-Known Member

    Регистрация:
    17 июл 2006
    Сообщения:
    216
    Симпатии:
    0
    Какой ф-цией удалить из строки символы перевода каретки?? весь LS перелапатил TRIM чето не работает ((
     
  2. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Это + chr(10)
    иногда использую
    Код (Text):
    Function NoSimvol10(s1 As String) As String
    NoSimvol10 = s1
    G1:
    If Len(NoSimvol10)=0 Then Exit Function
    Dim s2 As String
    s2 = Right(NoSimvol10, 1)
    If Right(NoSimvol10, 1) = Chr(10) Then
    NoSimvol10 = Left(NoSimvol10, Len(NoSimvol10)-1)
    Goto G1
    End If
    End Function
     
  3. pbnoob

    pbnoob Well-Known Member

    Регистрация:
    25 авг 2006
    Сообщения:
    135
    Симпатии:
    0
    объясняю принцип (на Lotus Script)
    в цикле от 1 до конца строки прогоняешь функцию MID.
    и в результирующий массив записываешь все символы отличные от 13
    (ascii код Enter, 10 ascii код - возврата каретки)
    (ASC\CHR - могут еще понадобиться)
     
  4. sanch

    sanch Well-Known Member

    Регистрация:
    17 июл 2006
    Сообщения:
    216
    Симпатии:
    0
    Спасибо, помогло!
     
Загрузка...
Похожие Темы - Простейший вопрос но
  1. pbnoob
    Ответов:
    8
    Просмотров:
    4.156
  2. BlackShadow
    Ответов:
    1
    Просмотров:
    1.784
  3. Генералл
    Ответов:
    2
    Просмотров:
    54
  4. ApplePen
    Ответов:
    0
    Просмотров:
    56
  5. gURaBA_N
    Ответов:
    3
    Просмотров:
    91

Поделиться этой страницей