Обработка мультилинейных Text...

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Nataliak
Начинающий
Начинающий
 
Сообщения: 21
Зарегистрирован: 10.03.2004 (Ср) 0:10

Обработка мультилинейных Text...

Сообщение Nataliak » 24.03.2004 (Ср) 15:28

Когда я заканчиваю заполнять Text со свойством MultiLine=True, то мне нужно нажать Enter для перехода в след. поле. При этом в место нажатия добавляются для лишних символа Chr(10)+Chr(13). Пробовала подменять на "пробел", а потом делать Trim - работает, пока юзер не нажимает Enter середине слова, дальше уже мне пробел мешает и убрать его проблематично.
Помогите советом :cry:

Nataliak
Начинающий
Начинающий
 
Сообщения: 21
Зарегистрирован: 10.03.2004 (Ср) 0:10

Мой вариант

Сообщение Nataliak » 24.03.2004 (Ср) 15:59

Сделала в итоге обычным перебором строки. Правда, немного "мультипликация" на экране, но в целом результат достигнут.

For i = 1 To Len(s)
If Asc(Mid(s, i, 1)) <> 13 And Asc(Mid(s, i, 1)) <> 10 Then
itog = itog + Mid(s, i, 1)
End If
Next

А других вариантов никто не подскажет? :?:

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 24.03.2004 (Ср) 16:56

А что надо-то? Заменить <CR><LF> на пробелы? Text1.Text = Replace(Text1.Text, vbCrLf, " ")
Lasciate ogni speranza, voi ch'entrate.

Rainbow
Человек-радуга
Человек-радуга
 
Сообщения: 543
Зарегистрирован: 13.05.2003 (Вт) 14:16

Сообщение Rainbow » 25.03.2004 (Чт) 10:42

А зачем мультилайновый контрол, если все равно одна строчка нужна?
Учиться - значит открывать для себя то, что уже знаешь. <...> Учить - значит напоминать другим о том, что они знают это также хорошо, как и ты. <...> Лучше всего ты учишь тому, чему тебе самому больше всего надо научиться. (Р. Бах)


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 16

    TopList