Подскажите, как вывести текст в поле формы многострочно?

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

Подскажите, как вывести текст в поле формы многострочно?

Сообщение patq » 27.08.2006 (Вс) 6:07

Работаю в VBA6.
Во время работы программы в поля формы требуется вывести два вида текста.
- один текст содержит около 500 символов
- второй вида: “Это выводим в первой строке“ & vbCr & vbLf & “А это выводим во второй строке“

Используемый код программы:
With Heard
.OtlScnTxt.Text = “набор слов общей длиной около 500 символов” & _
“и его надо вывести в поле, вмещающем этот набор слов”
.OtlScnGo.Text = “Это надо вывести в первой строке“ & vbCr & vbLf & “А это во второй строке “
End With

К сожалению оба текста выводятся в одной строке. А знаки vbCr, vbLf в тексте не выполняют перевод на новую строку, а выводятся в виде двух жирных черточек.

Помогите советом, как достичь желаемого


С уважением, patq

Efiop
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 69
Зарегистрирован: 06.06.2006 (Вт) 12:14
Откуда: РК

Сообщение Efiop » 27.08.2006 (Вс) 7:20

patq, в TextBox'е MultiLine поставь в True.
Кстати вместо сочетания vbCr & vbLf можешь использовать vbNewLine или vbCrLf.

patq
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 06.08.2005 (Сб) 22:23
Откуда: Ижевск

Сообщение patq » 27.08.2006 (Вс) 18:26

Да в TextBox'е я присваивал MultiLine = True, устнавливал два бегунка по краям.
Эффект был тот же

patq
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 06.08.2005 (Сб) 22:23
Откуда: Ижевск

Сообщение patq » 27.08.2006 (Вс) 20:52

patq писал(а):Да в TextBox'е я присваивал MultiLine = True, устнавливал два бегунка по краям.
Эффект был тот же


Повторно поставил MultiLine = True, и заработало

Спасибо всем


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

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

Сейчас этот форум просматривают: Yandex-бот и гости: 113

    TopList