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


Автор: Piece of Cake 5.4.2002, 14:28
Привет всем!
Проблема у меня такая.
В ячейке Excel'я стоит следующее значение:
abc1
abc2
abc3

Если я присвою переменной s значение этой ячейки, то в переменной у меня будет s равна "abc1\nabc2\nabc3" ? Это был так сказать подвопрос.
А вопрос такой: как заменить все символы "\n" на "<BR>"?
Больщое спасибо?

Автор: Sheff 6.4.2002, 14:57
Вот метод для VB:
Создай на форме кнопку и текстовое поле, в событие клика кнопки напиши:
Код

Dim Txt, R, I
Txt = Text1.Text
I = 1
Do
   R = InStr(I, Txt, vbCrLf)
   I = I + 1
   If R <> 0 Then Txt = Left(Txt, R - 1) & "<BR>" & Right(Txt, Len(Txt) - R - 1)
Loop While InStr(I, Txt, vbCrLf) <> 0
Text1.Text = Txt

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